©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
AMQQEM1 ; IHS/CMI/THL - GETS DOS/UNIX PATH AND FILE NAME ;
Source file <AMQQEM1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CK | ||
| F1 | ||
| CHKIT | ||
| RUN | ||
| FWD | ||
| OVER | ; OVERWRITE OLD FILE ; 13
|
|
| MARK | ||
| PC | ; PC CHOICES ; 11
|
|
| UNIX | ; UNIX CHOICES ; 11
|
|
| EXIT | ||
| FILE | ; FILE NAME AND PATH ; 12
|
|
| VAR | ;EP; OS VARIABLES
|
|
| BACKUP |
| Name | Field # of Occurrence |
|---|---|
| ^DIR | UNIX+7, PC+5, FILE+6, OVER+7 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("OS" | AMQQEM1+4, AMQQEM1+5 |
| ^DD("OS" - [#.7] | AMQQEM1+3, VAR+6 |
| Name | Line Occurrences |
|---|---|
| @( | RUN+1 |
| BACKUP | UNIX+10, PC+8, FILE+9, OVER+10, OVER+14 |
| CK | UNIX+11, PC+9, FILE+10, OVER+11 |
| F1 | OVER+15 |
| FILE | CHKIT+7 |
| FWD | UNIX+13, PC+11, FILE+12 |
| MARK | UNIX+1, FILE+2, OVER+1 |
| PC | UNIX+3 |
| RUN | AMQQEM1+4, AMQQEM1+5 |
| VAR | FILE+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | F1+3*, F1+4 |
| AMQQEFN | FILE+14~, FILE+15* |
| >> AMQQEM("FORMAT" | AMQQEM1+3*, AMQQEM1+4*, AMQQEM1+5*, AMQQEM1+6*, UNIX+3, UNIX+14*, UNIX+16*, PC+12*, FILE+4, F1+1 |
| >> AMQQEMS | FWD*, BACKUP, BACKUP+1* |
| >> AMQQERUN | RUN+1*, FWD, BACKUP*, UNIX+16*, PC+14*, FILE+9*, F1+6* |
| >> AMQQEX( | VAR+16* |
| >> AMQQEX("CHECK" | VAR+7*, CHKIT, CHKIT+3, CHKIT+7 |
| >> AMQQEX("CLOSE" | VAR+12*, CHKIT+5, CHKIT+7 |
| >> AMQQEX("DOC" | F1+7* |
| >> AMQQEX("EOF" | VAR+13* |
| >> AMQQEX("EXT" | F1+4* |
| >> AMQQEX("FILE" | FILE+13*, FILE+15, F1, F1+5, F1+7 |
| >> AMQQEX("IOP" | VAR+8* |
| >> AMQQEX("NAME" | F1+5* |
| >> AMQQEX("PATH" | UNIX+15!, PC+13!, F1+2* |
| >> AMQQEX("READ" | VAR+9* |
| >> AMQQEX("USE" | VAR+11* |
| >> AMQQEX("WRAPOFF" | VAR+14* |
| >> AMQQEX("WRITE" | VAR+10*, CHKIT+7 |
| >> AMQQQUIT | RUN+1, CK*, UNIX+12, PC+10, FILE+11, CHKIT+1, CHKIT+3*, OVER+12 |
| D | CHKIT+2~*, CHKIT+3 |
| DIR | UNIX+8!, PC+6!, FILE+7!, OVER+8! |
| DIR("?" | UNIX+6*, PC+3*, FILE+4*, FILE+5*, OVER+6* |
| DIR("??" | PC+4* |
| DIR("A" | UNIX+5*, PC+2*, FILE+4*, FILE+5*, OVER+5* |
| DIR("B" | OVER+6* |
| DIR(0 | UNIX+4*, PC+1*, FILE+4*, FILE+5*, OVER+4* |
| DIROUT | CK! |
| DIRUT | CK!, UNIX+9*, PC+7*, FILE+8*, OVER+9* |
| DTOUT | CK! |
| DUOUT | CK!, UNIX+9, PC+7, FILE+8, OVER+9 |
| H | CHKIT+2~* |
| I | VAR+1~, VAR+16* |
| T | CHKIT+2~*, CHKIT+3 |
| U | RUN*, RUN+1, FWD, BACKUP, BACKUP+1, VAR+16, UNIX+10, PC+8, FILE+9, OVER+10 |
| X | CK, VAR+1~, VAR+15*, VAR+16, UNIX+10, PC+8, FILE+9, F1*, F1+1, F1+2* , F1+3, F1+4, OVER+10 |
| >> Y | UNIX+14, UNIX+16, PC+12, PC+14, FILE+13, CHKIT+6, CHKIT+7, F1+1*, F1+2, F1+5 , OVER+13*, OVER+14 |
| >> Z | F1+1*, F1+2, F1+5 |