Routine: GMRCP5C

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Caller Graph
Entry Points
Interaction Calls
Global Variables Directly Accessed
Label References
Local Variables

Information

GMRCP5C ;SLC/DCM,RJS - Print Consult form 513 (Assemble Segments And Print) ;4/30/98 09:41

Source Information

Source file <GMRCP5C.m>

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Consult Request Tracking	1	GMRCP5A

Entry Points

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

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !," Press: " Line Location: PAUSE+5
Function Call: WRITE	Prompt: "<Enter> To Quit (^) To Quit : " Line Location: PAUSE+7
Function Call: WRITE	Prompt: "<Enter> For Next Page (^) To Quit : " Line Location: PAUSE+8
Function Call: WRITE	Prompt: "<Enter> To Quit (-) For Previous Page (^) To Quit : " Line Location: PAUSE+9
Function Call: WRITE	Prompt: "<Enter> For Next Page (-) For Previous Page (^) To Quit : " Line Location: PAUSE+10
Function Call: READ	Timeout: DTIME Variable: X Line Location: PAUSE+12
Function Call: WRITE	Prompt: " (timeout)" Line Location: PAUSE+12
Function Call: WRITE	Prompt: ! Line Location: PAUSE+13

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

Label References

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

Local Variables

Legend:

>>	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

Customize PDF page

Package: Consult Request Tracking

Routine: GMRCP5C

Caller Graph Total: 1