Routine: GMRCP5A

Information

GMRCP5A ;SLC/DCM,RJS,MA - Print Consult form 513 (Gather Data - TIU Results) ;15-Mar-2012 10:40;PLS

Source Information

Source file <GMRCP5A.m>

Call Graph

Call Graph Total: 14

Package	Total	Call Graph
Consult Request Tracking	6	AUDIT^GMRCP INIT^GMRCP5B ($$CRT,ASSMBL,PRINT)^GMRCP5C (ADDEND,FORMAT)^GMRCP5D PRINT^GMRCTIUP DEM^GMRCU
Kernel	3	^%ZISC KILL^%ZTLOAD $$FMTE^XLFDT
VA Fileman	3	^%DT ^DIE $$GET1^DIQ
Registration	2	ELIG^VADPT $$SITE^VASITE

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Consult Request Tracking	1	GMRCP5
Order Entry Results Reporting	1	ORQQCN2

Entry Points

Name	Comments	DBIA/ICR reference
SUB(ZONE,SUB,NDX,TEXT)	;
CENTER(X)	;
EXDT(X)	;EXTERNAL DATE FORMAT
FORMAT(PAGEWID)	;
BLD(SUB,NDX,LINE,TAB,TEXT,RUNTIME)	;
LASTLN(SUB,NDX)	;
PRNTAUDT(GMRCIFN,ZTIO,GMRCAUDT)	; Update the last activity field in 123 and ; Processing Activity multiple ; Update the activity log to reflect "Printed To:" and the printer ; GMRCAUDT=1 indicates the consult is NW or Discontinued ; and it should update the audit trail.
PRNT(GMRCIFN,TIUFLG,GMRCQUED,GMRCCPY,GMRCGUI,GMRCAUDT)	;

External References

Name	Field # of Occurrence
^%DT	EXDT+4
^%ZISC	PRNT+28
KILL^%ZTLOAD	PRNT+30
^DIE	PRNTAUDT+11
$$GET1^DIQ	FORMAT+22
AUDIT^GMRCP	PRNTAUDT+14
INIT^GMRCP5B	FORMAT+43
$$CRT^GMRCP5C	PRNT+22, PRNT+28
ASSMBL^GMRCP5C	PRNT+17, PRNT+24
PRINT^GMRCP5C	PRNT+26
ADDEND^GMRCP5D	FORMAT+119
FORMAT^GMRCP5D	FORMAT+121
PRINT^GMRCTIUP	FORMAT+34
DEM^GMRCU	FORMAT+17
ELIG^VADPT	FORMAT+13
$$SITE^VASITE	FORMAT+21
$$FMTE^XLFDT	EXDT+5

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: PRNT+22
Function Call: WRITE	Prompt: !,"PRINTING... " Line Location: PRNT+22
Function Call: READ	Prompt: T C O P Y" Timeout: "W Variable: 1 Line Location: FORMAT+46
Routine Call	DIE Line Location: PRNTAUDT+11

FileNo	Call Tags
^GMR(123 - [#123]	Classic Fileman Calls
^DIC(4 - [#4]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^GMR(123 - [#123]	PRNTAUDT+10, PRNTAUDT+12, FORMAT+11, FORMAT+28, FORMAT+29
^TMP("GMRC"	PRNT+19!, PRNT+32!, FORMAT+69, BLD+5, BLD+7, BLD+8, SUB+3, SUB+4, LASTLN+1
^TMP("GMRCR"	PRNT+18!, PRNT+33!, FORMAT+36, FORMAT+38, FORMAT+39, FORMAT+56, FORMAT+60, FORMAT+62, FORMAT+67, FORMAT+86 , FORMAT+89, FORMAT+90, FORMAT+91, FORMAT+110, FORMAT+111, FORMAT+112, FORMAT+114, FORMAT+115, FORMAT+119

Label References

Name	Line Occurrences
$$CENTER	FORMAT+46, FORMAT+48, FORMAT+50, FORMAT+52, FORMAT+55, FORMAT+57, FORMAT+58, FORMAT+94, FORMAT+95, FORMAT+113
$$EXDT	FORMAT+75, FORMAT+76, FORMAT+81, FORMAT+82, FORMAT+98, FORMAT+101, FORMAT+102, FORMAT+105
$$LASTLN	BLD+5, BLD+7, BLD+8
BLD	FORMAT+46, FORMAT+48, FORMAT+50, FORMAT+52, FORMAT+55, FORMAT+57, FORMAT+58, FORMAT+93, FORMAT+94, FORMAT+95 , FORMAT+96, FORMAT+99, FORMAT+103, FORMAT+107, FORMAT+109, FORMAT+111, FORMAT+113, FORMAT+115
FORMAT	PRNT+16, PRNT+24
PRNTAUDT	PRNT+36
SUB	FORMAT+70, FORMAT+71, FORMAT+72, FORMAT+74, FORMAT+77, FORMAT+78, FORMAT+80, FORMAT+83, FORMAT+84, FORMAT+87 , FORMAT+88, FORMAT+90, FORMAT+91

Name	Field # of Occurrence
^("MCAR"	FORMAT+56

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	EXDT+2~, EXDT+4*
%I	FORMAT+2~
CMT	FORMAT+2~
COL	CENTER+2~, CENTER+3*, CENTER+4
COUNT	FORMAT+2~
D0	FORMAT+2~
DA	PRNTAUDT+6~, PRNTAUDT+9*
DATE	EXDT+2~
DFN	FORMAT+2~, FORMAT+11, FORMAT+12, FORMAT+17
DIC	FORMAT+2~
DIE	PRNTAUDT+6~, PRNTAUDT+9*
DIQ2	FORMAT+2~
DR	PRNTAUDT+9*, FORMAT+2~
DUZ(2	FORMAT+20
GLOBAL	FORMAT+2~
GMRC400	FORMAT+2~
GMRCA	PRNTAUDT+6~, PRNTAUDT+7*, PRNTAUDT+15!
GMRCAD	PRNTAUDT+6~
GMRCADD	FORMAT+2~
GMRCADDS	PRNT+12~
GMRCADDT	FORMAT+2~
GMRCAGE	FORMAT+2~
GMRCAUDT	PRNT~, PRNT+36, PRNTAUDT~, PRNTAUDT+5!
GMRCCPY	PRNT~, FORMAT+45, FORMAT+46
GMRCCSDT	FORMAT+2~, FORMAT+63~, FORMAT+81, FORMAT+82
GMRCCSGM	FORMAT+63~, FORMAT+81, FORMAT+82
GMRCCSIG	PRNT+12~, FORMAT+63~, FORMAT+79, FORMAT+81, FORMAT+82
GMRCCTIT	FORMAT+3~, FORMAT+63~, FORMAT+84
GMRCDEV	PRNTAUDT+8*, PRNTAUDT+15!
GMRCDFN	FORMAT+3~, FORMAT+11*, FORMAT+17
GMRCDOB	FORMAT+3~
GMRCDVL	FORMAT+3~, FORMAT+14*
GMRCELIG	FORMAT+3~, FORMAT+13*
GMRCENT	FORMAT+64~, FORMAT+97, FORMAT+98, FORMAT+101
GMRCEQL	FORMAT+3~, FORMAT+15*
GMRCERR	FORMAT+3~
GMRCFAC	FORMAT+3~, FORMAT+19, FORMAT+20, FORMAT+21, FORMAT+22, FORMAT+23*
GMRCFF	PRNTAUDT+6~
GMRCFP	FORMAT+3~, FORMAT+10*
GMRCFTR	FORMAT+4~, FORMAT+10*
GMRCGUI	PRNT~, PRNT+15, PRNT+17
GMRCHRCN	FORMAT+8~
GMRCIFN	PRNT~, PRNT+36, PRNTAUDT~, PRNTAUDT+8, FORMAT+11, FORMAT+28, FORMAT+29, FORMAT+34, FORMAT+119, FORMAT+121
GMRCINO	FORMAT+4~, FORMAT+27*
GMRCIPH	FORMAT+4~
GMRCIRL	FORMAT+4~, FORMAT+30*
GMRCLAST	FORMAT+4~, BLD+10*
GMRCMODE	FORMAT+4~
GMRCND	FORMAT+4~
GMRCNDX	FORMAT+4~, FORMAT+69*, FORMAT+70, FORMAT+71, FORMAT+72, FORMAT+74, FORMAT+77, FORMAT+78, FORMAT+80, FORMAT+83 , FORMAT+84, FORMAT+87, FORMAT+88, FORMAT+90, FORMAT+91, FORMAT+93, FORMAT+94, FORMAT+95, FORMAT+96, FORMAT+99 , FORMAT+103, FORMAT+107, FORMAT+109, FORMAT+111, FORMAT+115, FORMAT+119
GMRCNODT	FORMAT+64~, FORMAT+100, FORMAT+101, FORMAT+102
GMRCNT	FORMAT+4~, FORMAT+62*
GMRCO	PRNTAUDT+8*, PRNTAUDT+9, PRNTAUDT+10, PRNTAUDT+12, PRNTAUDT+15!
GMRCOM	PRNTAUDT+6~
GMRCORNP	PRNTAUDT+6~
GMRCPA	PRNTAUDT+6~
GMRCPG	FORMAT+4~, FORMAT+10*
GMRCPGR	FORMAT+4~
GMRCPNM	FORMAT+4~
GMRCPRNM	FORMAT+4~
GMRCPTR	FORMAT+5~
GMRCQSTR	FORMAT+5~
GMRCQSTT	FORMAT+5~
GMRCQUED	PRNT~, PRNT+22, PRNT+30
GMRCR0	FORMAT+5~, FORMAT+38, FORMAT+39, FORMAT+62, FORMAT+67, FORMAT+70, FORMAT+71, FORMAT+86, FORMAT+89, FORMAT+90 , FORMAT+91, FORMAT+94, FORMAT+95, FORMAT+110, FORMAT+111, FORMAT+112, FORMAT+114, FORMAT+115, FORMAT+119
GMRCR1	FORMAT+5~, FORMAT+114*, FORMAT+115
GMRCR2	FORMAT+5~
GMRCRB	FORMAT+5~
GMRCRD	FORMAT+5~, FORMAT+11*, FORMAT+19, FORMAT+26, FORMAT+27, FORMAT+47, FORMAT+49, FORMAT+51, FORMAT+54, FORMAT+119 , FORMAT+121
GMRCRD(12	FORMAT+28*, FORMAT+30
GMRCRD(13	FORMAT+29*
GMRCRPT	FORMAT+5~, FORMAT+57, FORMAT+58, FORMAT+63~, FORMAT+70, FORMAT+71, FORMAT+94, FORMAT+95
GMRCSDT	PRNT+12~, FORMAT+63~, FORMAT+75, FORMAT+76
GMRCSG	FORMAT+5~, FORMAT+36!, FORMAT+38, FORMAT+43
GMRCSG(	FORMAT+41*
GMRCSGAD	FORMAT+5~
GMRCSIG	PRNT+12~, FORMAT+40, FORMAT+64~, FORMAT+73, FORMAT+75, FORMAT+76
GMRCSIGM	FORMAT+5~, FORMAT+64~, FORMAT+75, FORMAT+76
GMRCSIGT	PRNT+12~, FORMAT+64~, FORMAT+78
GMRCSN	FORMAT+6~
GMRCSR	FORMAT+6~
GMRCSVC	FORMAT+6~
GMRCTO	FORMAT+6~
GMRCUL	FORMAT+6~, FORMAT+16*
GMRCV	FORMAT+39, FORMAT+41, FORMAT+64~, FORMAT+66*, FORMAT+67
GMRCVIS	FORMAT+64~, FORMAT+104, FORMAT+105
GMRCVLOC	FORMAT+64~, FORMAT+106, FORMAT+108
GMRCWARD	FORMAT+6~
GMRCWLI	FORMAT+6~
GMRCX	PRNT+18, PRNT+32, PRNT+33, FORMAT+6~, FORMAT+75, FORMAT+76, FORMAT+77, FORMAT+81, FORMAT+82, FORMAT+83 , FORMAT+98, FORMAT+99, FORMAT+102, FORMAT+103, FORMAT+105, FORMAT+106, FORMAT+107, FORMAT+108
HR	EXDT+2~
IO	PRNT+22, PRNT+25
IO(0	PRNT+22, PRNT+28
IOF	PRNT+22
IOM	PRNT+13*, PRNT+24, PRNT+26
IOSL	PRNT+24, PRNT+26
LINE	BLD~, BLD+5
LINECNT	BLD+3~, BLD+5*
LN	FORMAT+6~
MCFILE	FORMAT+6~
MCPROC	FORMAT+6~
MN	EXDT+2~
ND	FORMAT+7~
ND1	FORMAT+7~
ND2	FORMAT+7~
NDS	FORMAT+7~
NDX	BLD~, BLD+5, BLD+7, BLD+8, SUB~, SUB+3, SUB+4, LASTLN~, LASTLN+1
NEXT	SUB+2~, SUB+3*, SUB+4
ORACTION	FORMAT+7~
PAGEWID	FORMAT~, FORMAT+14, FORMAT+15, FORMAT+119, FORMAT+121
PD	EXDT+2~
RUNTIME	BLD~, BLD+8
SEX	FORMAT+7~
SUB	BLD~, BLD+2, BLD+5, BLD+7, BLD+8, BLD+10, SUB~, SUB+3, SUB+4, LASTLN~ , LASTLN+1
TAB	FORMAT+7~, BLD~, BLD+7
TEXT	CENTER+2~, CENTER+4*, CENTER+5, BLD~, BLD+7, SUB~, SUB+4
TIME	EXDT+2~
TIUFLG	PRNT~, PRNT+22, PRNT+28
U	FORMAT+11, FORMAT+13, FORMAT+19, FORMAT+26, FORMAT+27, FORMAT+30, FORMAT+47, FORMAT+49, FORMAT+51, FORMAT+54
VAEL	FORMAT+13!
VAEL(6	FORMAT+13
X	FORMAT+7~, EXDT~, EXDT+3, EXDT+4*, EXDT+5, CENTER~, CENTER+3, CENTER+4
XTRA	FORMAT+89~*, FORMAT+90, FORMAT+91
Y	FORMAT+7~, EXDT+2~, EXDT+4
ZONE	SUB~, SUB+3, SUB+4
ZTIO	PRNT+36, PRNTAUDT~, PRNTAUDT+8
>> ZTSK	PRNT+30

Customize PDF page

Package: Consult Request Tracking

Routine: GMRCP5A

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: