The Decision Module Compiler |
From inside the book
Results 1-3 of 34
Page 264
... FILE . YES NO 20. GETSI D271 of 28 -A 1- IS GET FILE ΦΡΕΝ -A2- GET SYMBOLIC INSTRUCTION RECORD Nø -B1- 10 -B2- INDICATE FILE ΝΟΤ END ΦΡΕΝ OF FILE MOVE LOGICAL TP 8 TAPE ENTRY TO TAPE TABLE D 1 MØVE END MARKER TØ TAPE TABLE -E 1- LINK TO ...
... FILE . YES NO 20. GETSI D271 of 28 -A 1- IS GET FILE ΦΡΕΝ -A2- GET SYMBOLIC INSTRUCTION RECORD Nø -B1- 10 -B2- INDICATE FILE ΝΟΤ END ΦΡΕΝ OF FILE MOVE LOGICAL TP 8 TAPE ENTRY TO TAPE TABLE D 1 MØVE END MARKER TØ TAPE TABLE -E 1- LINK TO ...
Page 268
... FILE IN OUTPUT IS FILE OPEN STATUS NØ 10 -B 1- -B2- IS FILE OPEN CHANGE FILE STATUS TO OUTPUT YES -C1- C2- MESSAGE " TAPE OPEN IN INPUT STATUS " INDICATE OUTPUT STATUS OPEN NO EOR NO EOF -D1- ERRØR EØS -E 1- -F1- -D2- SET ØN END OF FILE ...
... FILE IN OUTPUT IS FILE OPEN STATUS NØ 10 -B 1- -B2- IS FILE OPEN CHANGE FILE STATUS TO OUTPUT YES -C1- C2- MESSAGE " TAPE OPEN IN INPUT STATUS " INDICATE OUTPUT STATUS OPEN NO EOR NO EOF -D1- ERRØR EØS -E 1- -F1- -D2- SET ØN END OF FILE ...
Page 269
... FILE ΦΡΕΝ IS FILE IN YES INDICATE FILE OUTPUT STATUS REWIND FILE ΝΟΤ ΦΡΕΝ -B 1- NO C1- YES 10 -B2- B3 . B4 PAD OUT AND CLOSE FILE C2 . C3 . A 4 B4- C4- EXIT 99 TRANE OF -D4- RETURN TO TOCS D 1- TRANEØR IS FILE IN INPUT NO STATUS -D2 ...
... FILE ΦΡΕΝ IS FILE IN YES INDICATE FILE OUTPUT STATUS REWIND FILE ΝΟΤ ΦΡΕΝ -B 1- NO C1- YES 10 -B2- B3 . B4 PAD OUT AND CLOSE FILE C2 . C3 . A 4 B4- C4- EXIT 99 TRANE OF -D4- RETURN TO TOCS D 1- TRANEØR IS FILE IN INPUT NO STATUS -D2 ...
Common terms and phrases
addend ADDRESS BLANK COUNTER box area CARD IN MEMORY CHECK coding Column COMMA Cont'd contains CONTINUATION CARD CRDRD CURRENT TAG defined DESTINATION DMALG DMCOD DMDEF DMEND DMLOG DMSND DMSRC DMTAB DMTAG Edit Phase ELEMENT encountered End-of-file end-of-operand ERRØR EØJ EXIT DIRECTLY EXTRACTED FALSE TAG fatal switch FILE FIXWB given HIGH SPEED inclusion test INDICATE input internal tag LASN LEFT OPERAND left parenthesis LEGAL LEVEL LINK TO CKPUT linkage literal table load LPAR MAJOR PROCESSING ROUTINE MINUS MØRE MØVE NEGATED NØ YES PIVOT POINT program tape pseudo-command RCVS RESET RIGHT OPERAND RIGHT PARENTHESIS SAVNN tag SIGET signed literal simple expression SINS card SIPUT STEP SCAN POSITION STØP STOP LIST STORAGE SWITCHES subroutine sum box switch statements symbolic instructions TAGA TAGB transfer TRANSLATION TRUE TAG types unsigned user tag VALID vehicle WØRD WØRK YES C1 YES NØ YES YES ZERO ΝΟ