GMRCP5C ;SLC/DCM,RJS - Print Consult form 513 (Assemble Segments And Print) ;4/30/98 09:41
Source file <GMRCP5C.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ADDLN(ZONE,TEXT,RUNTIME) | ;
|
|
FORMAT(SUB,PAGELEN,PAGEWID,OFFSET) | ;
|
|
MERGE(SUB,NDX,ZONE) | ;
|
|
ASSMBL(PAGELEN,PAGEWID) | ;
|
|
PAUSE(PF,PG) | ; Pause After Each Screen for CRT's
|
|
ADDFTR(SUB,NDX,PAGEWID) | ;
|
|
OUTPUT(GMRCPG) | ;
|
|
CLRZONE(ZONE) | ;
|
|
SIZE(SUB,NDX) | ;
|
|
BLDPAGE(ZONE,TEXT,PAGEWID,RUNTIME,SUB,NDX) | ;
|
|
ROOM(LEN) | ;
|
|
CRT() | ; IS THE PRINT DEVICE A CRT ?
|
|
CHKPAGE(SUB,NDX,PAGELEN,OFFSET) | ;
|
|
NEWPAGE(SUB,NDX) | ;
|
|
NEWSUB(ZONE,SUB,NDX,PAGEWID) | ;
|
|
PRINT(PAGELEN,PAGEWID) | ; Print the Consult
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("GMRC" | ASSMBL+5*, FORMAT+5, FORMAT+7, FORMAT+10, FORMAT+12, NEWSUB+9, NEWSUB+10, ADDFTR+4, ADDFTR+5, SIZE+2 , MERGE+3, MERGE+4, OUTPUT+9, OUTPUT+10*, PRINT+4, PRINT+6, PRINT+9, PRINT+19, PRINT+20 |
Name | Line Occurrences |
---|---|
$$CHKPAGE | FORMAT+4, FORMAT+8, FORMAT+11, BLDPAGE+12, BLDPAGE+25 |
$$CRT | PAUSE+3 |
$$PAUSE | PRINT+21 |
$$ROOM | CHKPAGE+2, PRINT+7 |
$$SIZE | ASSMBL+17 |
ADDFTR | FORMAT+14 |
ADDLN | BLDPAGE+4, BLDPAGE+23, BLDPAGE+25 |
BLDPAGE | FORMAT+5, FORMAT+12, FORMAT+13, NEWSUB+10, ADDFTR+5, MERGE+4, PRINT+8 |
CLRZONE | ASSMBL+7, FORMAT+4, FORMAT+8, NEWSUB+7, ADDFTR+3, OUTPUT+11 |
FORMAT | ASSMBL+13, ASSMBL+17, ASSMBL+21, ASSMBL+25, ASSMBL+29, ASSMBL+33 |
MERGE | ASSMBL+8, ASSMBL+9, NEWPAGE+7, NEWPAGE+8 |
NEWPAGE | CHKPAGE+2 |
NEWSUB | FORMAT+9, NEWPAGE+10 |
OUTPUT | ASSMBL+35, NEWPAGE+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
C | PAUSE+2~ |
DTIME | PAUSE+12 |
ENDLN | CLRZONE+9~, CLRZONE+10*, CLRZONE+11 |
FLN | NEWSUB+2~, NEWSUB+9*, NEWSUB+10, ADDFTR+2~, ADDFTR+4*, ADDFTR+5 |
GMRCDVL | ASSMBL+2~, ASSMBL+4*, FORMAT+5 |
GMRCHDR | ASSMBL+2~, ASSMBL+6*, NEWPAGE+2~ |
GMRCL | BLDPAGE+2~, BLDPAGE+15*, BLDPAGE+17, BLDPAGE+19 |
GMRCPAGE | ASSMBL+2~, OUTPUT+10, CLRZONE+8!, PRINT+2~, PRINT+6!* |
GMRCPAGE( | ROOM+3, ADDLN+3*, ADDLN+4, ADDLN+5*, ADDLN+6*, OUTPUT+3, OUTPUT+4, OUTPUT+5, OUTPUT+7*, CLRZONE+11 , CLRZONE+12!, PRINT+10, PRINT+11, PRINT+12, PRINT+15*, PRINT+16 |
GMRCPAGE(300000 | ASSMBL+35, FORMAT+5 |
GMRCPG | ASSMBL+2~, ASSMBL+6*, ASSMBL+35, NEWPAGE+4, NEWPAGE+6*, OUTPUT~, PRINT+9* |
GMRCR1 | BLDPAGE+2~, BLDPAGE+13*, BLDPAGE+21*, BLDPAGE+22*, BLDPAGE+23 |
GMRCR2 | BLDPAGE+2~, BLDPAGE+13*, BLDPAGE+18*, BLDPAGE+19*, BLDPAGE+24 |
GMRCX | BLDPAGE+2~, BLDPAGE+16*, BLDPAGE+17, BLDPAGE+19, BLDPAGE+22, BLDPAGE+25* |
IOF | PRINT+5 |
IOST | CRT+1 |
LEN | ROOM~, ROOM+4 |
LN | FORMAT+2~, FORMAT+10*, FORMAT+12, ROOM+2~, ROOM+3*, MERGE+2~, MERGE+3*, MERGE+4, OUTPUT+2~, OUTPUT+3* , OUTPUT+4, OUTPUT+5, OUTPUT+7, CLRZONE+9~, CLRZONE+11*, CLRZONE+12, PRINT+2~, PRINT+8*, PRINT+10*, PRINT+11 , PRINT+12, PRINT+15, PRINT+16 |
LN1 | OUTPUT+2~, OUTPUT+4*, OUTPUT+5, PRINT+2~, PRINT+11*, PRINT+12 |
LNCNT | PRINT+2~, PRINT+10* |
NDX | FORMAT+2~, FORMAT+7*, FORMAT+8, FORMAT+9, FORMAT+10, FORMAT+11, FORMAT+12, FORMAT+13, FORMAT+14, NEWSUB~ , NEWSUB+9, NEWSUB+10, ADDFTR~, ADDFTR+4, ADDFTR+5, NEWPAGE~, NEWPAGE+10, CHKPAGE~, CHKPAGE+2, SIZE~ , SIZE+2, MERGE~, MERGE+3, MERGE+4, BLDPAGE~, BLDPAGE+12, BLDPAGE+25 |
NEXT | OUTPUT+2~, OUTPUT+9*, OUTPUT+10 |
NEXTLN | ADDLN+2~, ADDLN+4*, ADDLN+5, ADDLN+6 |
NZONE | NEWSUB+2~, NEWSUB+4*, NEWSUB+5*, NEWSUB+6, NEWSUB+7, NEWSUB+10 |
OFFSET | FORMAT~, FORMAT+4, FORMAT+8, CHKPAGE~, CHKPAGE+2 |
PAGE | PRINT+2~, PRINT+4*, PRINT+5, PRINT+6, PRINT+9, PRINT+19, PRINT+20, PRINT+21, PRINT+22* |
PAGELEN | ASSMBL~, ASSMBL+5, ASSMBL+13, ASSMBL+17, ASSMBL+21, ASSMBL+25, ASSMBL+29, ASSMBL+33, FORMAT~, FORMAT+4 , FORMAT+8, FORMAT+11, CHKPAGE~, CHKPAGE+2, BLDPAGE+12, BLDPAGE+25, PRINT~, PRINT+7 |
PAGEWID | ASSMBL~, ASSMBL+4, ASSMBL+13, ASSMBL+17, ASSMBL+21, ASSMBL+25, ASSMBL+29, ASSMBL+33, FORMAT~, FORMAT+5 , FORMAT+9, FORMAT+12, FORMAT+13, FORMAT+14, NEWSUB~, NEWSUB+10, ADDFTR~, ADDFTR+5, NEWPAGE+10, MERGE+4 , BLDPAGE~, BLDPAGE+4, BLDPAGE+6, BLDPAGE+8, BLDPAGE+11, PRINT~, PRINT+8 |
PAUSE | PRINT+2~, PRINT+4, PRINT+18*, PRINT+19*, PRINT+20*, PRINT+21*, PRINT+22 |
PF | PAUSE~, PAUSE+7, PAUSE+8, PAUSE+9, PAUSE+10 |
PG | PAUSE~ |
PTR | BLDPAGE+2~, BLDPAGE+6*, BLDPAGE+7, BLDPAGE+9*, BLDPAGE+11*, BLDPAGE+15, BLDPAGE+23, BLDPAGE+24*, OUTPUT+2~, OUTPUT+6* , OUTPUT+7, PRINT+2~, PRINT+13*, PRINT+14, PRINT+15 |
ROOM | PRINT+2~, PRINT+7*, PRINT+8 |
RUNTIME | BLDPAGE~, BLDPAGE+4, BLDPAGE+14, BLDPAGE+16, BLDPAGE+17, BLDPAGE+19, BLDPAGE+22, BLDPAGE+24*, BLDPAGE+25, ADDLN~ , ADDLN+6 |
SIZE | ROOM+2~, ROOM+3*, ROOM+4 |
STLN | CLRZONE+9~, CLRZONE+10*, CLRZONE+11 |
SUB | ASSMBL+2~, FORMAT~, FORMAT+5, FORMAT+7, FORMAT+8, FORMAT+9, FORMAT+10, FORMAT+11, FORMAT+12, FORMAT+13 , FORMAT+14, NEWSUB~, NEWSUB+9, NEWSUB+10, ADDFTR~, ADDFTR+4, ADDFTR+5, NEWPAGE~, NEWPAGE+10, CHKPAGE~ , CHKPAGE+2, SIZE~, SIZE+2, MERGE~, MERGE+3, MERGE+4, BLDPAGE~, BLDPAGE+12, BLDPAGE+25 |
TEXT | BLDPAGE~, BLDPAGE+4, BLDPAGE+6, BLDPAGE+7, BLDPAGE+9*, BLDPAGE+11, BLDPAGE+15, BLDPAGE+23, BLDPAGE+24*, BLDPAGE+25 , ADDLN~, ADDLN+3, ADDLN+5 |
>> TIUFLG | CRT+1 |
U | PRINT+4, PAUSE+12 |
VAR | OUTPUT+2~, OUTPUT+5*, OUTPUT+6*, OUTPUT+7, PRINT+2~, PRINT+12*, PRINT+13*, PRINT+14, PRINT+15 |
WORD | BLDPAGE+2~, BLDPAGE+7*, BLDPAGE+8*, BLDPAGE+9 |
X | PAUSE+2~, PAUSE+12*, PAUSE+14 |
ZONE | NEWSUB~, NEWSUB+4, NEWSUB+5, NEWSUB+9, NEWSUB+10, MERGE~, MERGE+4, BLDPAGE~, BLDPAGE+4, BLDPAGE+12 , BLDPAGE+23, BLDPAGE+25, ADDLN~, ADDLN+3, ADDLN+4, OUTPUT+2~, OUTPUT+11*, CLRZONE~, CLRZONE+8, CLRZONE+10 |