Routine: GMRYRP3

Name	Comments	DBIA/ICR reference
BODY	;
H1	;I/O SUMMARY BY PT
FOOTER	;
H2	;I/O SUMMARY
H3	;SF511 REPORT
TITLE	;CREATE HEADER FOR I/O SUMMARY REPORT,GTYPI(TYPE)=ORDER,GTYP(O)=ORDER
REPORT1	;
DAYP	;FIELD TO SAVE '+' CODE FOR DAY TOTAL
HEADER	;
SHFTP	;FIELD TO SAVE '+' CODE FOR SHIFT TOTAL
INITOT	;
INISHFT	;
BLANK

Name	Field # of Occurrence
$$GET1^DIQ	HEADER+6, FOOTER+4
SUM^GMRYRP4	BODY+2
INP^VADPT	HEADER+5, FOOTER+3

Interaction Calls

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: X Line Location: HEADER+2
Function Call: WRITE	Prompt: !,?GG,"PATIENT INTAKE/OUTPUT SUMMARY",$S(GRPT=2:" (CURRENT)",GRPT=3:" (PREVIOUS DAY)",GRPT=4:" (48 HRS)",1:" ") Line Location: HEADER+4
Function Call: WRITE	Prompt: ?70,"PAGE: ",GPC,! Line Location: HEADER+7
Function Call: WRITE	Prompt: GLN(1),!,GLN(2),!,GLN(3) Line Location: HEADER+7
Function Call: WRITE	Prompt: !,$E(GMRX,1,GMRCOL),! Line Location: HEADER+8
Function Call: WRITE	Prompt: GMRNAM Line Location: FOOTER+1
Function Call: WRITE	Prompt: ?32,GMRBTH Condition for execution: SSN'="" ?17,SSN W:GMRBTH'="" Line Location: FOOTER+1
Function Call: WRITE	Prompt: ?53,GMRSEX Condition for execution: GMRAGE'="" ?42,"(",GMRAGE," YRS)" W:GMRSEX'="" Line Location: FOOTER+1
Function Call: WRITE	Prompt: !,"UNIT: " Line Location: FOOTER+2
Function Call: WRITE	Prompt: ?41,GMRBED Condition for execution: GMRWARD(1)'="" ?7,GMRWARD(1) W ?33,"RM/BED: " W:GMRBED'="" Line Location: FOOTER+2
Function Call: WRITE	Prompt: ! Line Location: FOOTER+2
Function Call: WRITE	Prompt: "DIVISION: "_$S(GMRVHLOC>0:$$GET1^DIQ(4,+$$GET1^DIQ(44,+GMRVHLOC,3,"I"),.01,"I"),1:""),! Line Location: FOOTER+4
Function Call: READ	Timeout: DTIME Variable: X Line Location: H1+1
Function Call: WRITE	Prompt: !,"RM/BED : ",GMRBED,?20,GMRNAM,?40,SSN,! Line Location: H2+1
Function Call: READ	Timeout: DTIME Variable: X Line Location: H2+2
Function Call: WRITE	Prompt: ! Line Location: BLANK+0

FileNo	Call Tags
^DIC(4 - [#4]	GET1^DIQ
^SC - [#44]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42 - [#42]	HEADER+5, FOOTER+3
^GMRD(126.56 - [#126.56]	TITLE+2, TITLE+3
^GMRD(126.58 - [#126.58]	TITLE+5
^TMP($J	BODY+1

Name	Line Occurrences
BODY	H1+1, H2+1, H3+1
DAYP	BODY+2
FOOTER	HEADER+1, H1+1
HEADER	H1+1, H2+1
INISHFT	BODY+2
INITOT	BODY+2
SHFTP	BODY+2
TITLE	REPORT1+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DTIME	HEADER+2, H1+1, H2+2
>> GBLNK	TITLE+1*, TITLE+3, TITLE+4, TITLE+5
>> GDIP(	DAYP+1*
>> GDOP(	DAYP+2*
GFACI	HEADER+6*, HEADER+7!
GG	HEADER+4*!
>> GIN(	INISHFT+1*
>> GLN(1	HEADER+7, TITLE+1, TITLE+3, TITLE+4*
>> GLN(2	HEADER+7, TITLE+1, TITLE+3, TITLE+5*
>> GLN(3	HEADER+7, TITLE+1, TITLE+3, TITLE+5*
>> GLN(4	TITLE+1, TITLE+4
>> GLN(5	TITLE+6*
>> GMRAGE	FOOTER+1
>> GMRBED	FOOTER+2, H2+1
>> GMRBTH	FOOTER+1
>> GMRCOL	HEADER+8
>> GMRDT1	HEADER+7
>> GMRDT2	HEADER+7
>> GMRNAM	FOOTER+1, H2+1
>> GMROUT	HEADER+2, H1+1, H2+1, H2+2*
>> GMRSEX	FOOTER+1
>> GMRVHLOC	HEADER+5, HEADER+6, FOOTER+3, FOOTER+4
>> GMRWARD(1	HEADER+7, FOOTER+2
>> GMRX	REPORT1+1*, HEADER+8
>> GN(1	INITOT+1, INISHFT+1, TITLE+1, TITLE+3, TITLE+4, TITLE+6, SHFTP+1, DAYP+1
>> GN(2	INITOT+2, INISHFT+2, TITLE+1, TITLE+5, TITLE+6, SHFTP+2, DAYP+2
>> GNN	TITLE+2, TITLE+3, TITLE+5, TITLE+6*
>> GNN(1	TITLE+3, TITLE+5
>> GOP	REPORT1+2*
>> GOUT(	INISHFT+2*
>> GPC	HEADER+3, HEADER+4*, HEADER+7
>> GQ	HEADER+2, HEADER+3, H2+1
>> GQT	REPORT1+1, HEADER+1, HEADER+2, HEADER+4, BODY+1, H1+1*, H2+1
>> GRNDIP	BODY+2*
>> GRNDOP	BODY+2*
>> GRPT	REPORT1+2, HEADER+1, HEADER+2, HEADER+4, HEADER+7, BODY+1, H2+1
>> GSIP(	SHFTP+1*
>> GSOP(	SHFTP+2*
>> GTOTIN(	INITOT+1*
>> GTOTOUT(	INITOT+2*
>> GTYPI(	TITLE+3*
>> GTYPO(	TITLE+5*
>> II	INITOT+1, INITOT+2, INISHFT+1, INISHFT+2, SHFTP+1, SHFTP+2, DAYP+1, DAYP+2
IOF	HEADER+3
IOM	REPORT1+1
IOSL	H2+1, BLANK
IOST	HEADER+2, HEADER+3, H1+1, H2+1, H2+2, BLANK
>> SSN	FOOTER+1, H2+1
>> VAIN(4	HEADER+5, FOOTER+3
>> X	HEADER+2, H1+1, H2+2, BLANK

Customize PDF page

Package: General Medical Record - IO

Routine: GMRYRP3

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 8

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: