Routine: PSGWARP

Package	Total	Call Graph
Auto Replenishment Ward Stock	1	$$PSGWDT^PSGWUTL1

Package	Total	Caller Graph
Auto Replenishment Ward Stock	1	PSGWAR1

Entry Points

Name	Comments	DBIA/ICR reference
SUB4	;PRINT SUB-HEADER FOR SECTION 4: BLOOD AND BLOOD PRODUCTS.
SUB2	;PRINT SUB-HEADER FOR SECTION 2: UNITS OF ISSUE.
SUB3	;PRINT SUB-HEADER FOR SECTION 3: FLUIDS & ADMIN SETS.
SUMRY	;PRINT SUMMARY OF FIELDS THAT ARE ACTUALLY REPORTED ON AMIS
SUB1	;PRINT SUB-HEADER FOR SECTION 1: DOSES BY TYPE.
HDR	;PRINT REPORT MAIN HEADER

External References

Name	Field # of Occurrence
$$PSGWDT^PSGWUTL1	HDR+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HDR+1
Function Call: WRITE	Prompt: !,?43,"AUTOMATIC REPLENISHMENT/WARD STOCK AMIS REPORT",!?46,"FOR INPATIENT SITE: ",SITE(SITE),!!?11,"FROM " Line Location: HDR+1
Function Call: WRITE	Prompt: Y," TO " Line Location: HDR+1
Function Call: WRITE	Prompt: Y," TO " Line Location: HDR+1
Function Call: WRITE	Prompt: ?93,"PRINTED ON: ",$$PSGWDT^PSGWUTL1,! Line Location: HDR+2
Function Call: WRITE	Prompt: "-" Line Location: HDR+2
Function Call: WRITE	Prompt: !,"(INPATIENT SEGMENT 158)",!?3,"DOSES BY TYPE:",!?116,"AVERAGE",!?6,"FIELD",?19,"DOSES",?33,"COST OF",?50,"DOSES",?65,"COST OF",?83,"TOTAL",?99,"TOTAL",?115,"COST PER" Line Location: SUB1+1
Function Call: WRITE	Prompt: !?17,"DISPENSED",?32,"DISPENSED",?49,"RETURNED",?65,"RETURNS",?81,"DISPENSED",?99,"COST",?117,"DOSE",!," " Line Location: SUB1+2
Function Call: WRITE	Prompt: "-" Line Location: SUB1+2
Function Call: WRITE	Prompt: !!?3,"UNITS OF ISSUE:",!?116,"AVERAGE",!?6,"FIELD",?19,"UNITS",?33,"COST OF",?50,"UNITS",?65,"COST OF",?83,"TOTAL",?99,"TOTAL",?115,"COST PER" Line Location: SUB2+1
Function Call: WRITE	Prompt: !?17,"DISPENSED",?32,"DISPENSED",?49,"RETURNED",?65,"RETURNS",?81,"DISPENSED",?99,"COST",?117,"UNIT",!," " Line Location: SUB2+2
Function Call: WRITE	Prompt: "-" Line Location: SUB2+2
Function Call: WRITE	Prompt: !!?3,"FLUIDS AND ADMINISTRATION SETS:",!?116,"AVERAGE",!?6,"FIELD",?33,"COST OF",?65,"COST OF",?83,"TOTAL",?99,"TOTAL",?117,"UNIT" Line Location: SUB3+1
Function Call: WRITE	Prompt: !?17,"DISPENSED",?32,"DISPENSED",?49,"RETURNED",?65,"RETURNS",?81,"DISPENSED",?99,"COST",?117,"COST",!," " Line Location: SUB3+2
Function Call: WRITE	Prompt: "-" Line Location: SUB3+2
Function Call: WRITE	Prompt: !!!,"(OUTPATIENT SEGMENT 157)",!?3,"BLOOD AND BLOOD PRODUCTS:",!?116,"AVERAGE",!?6,"FIELD",?33,"COST OF",?65,"COST OF",?83,"TOTAL",?99,"TOTAL",?117,"UNIT" Line Location: SUB4+1
Function Call: WRITE	Prompt: !?17,"DISPENSED",?32,"DISPENSED",?49,"RETURNED",?65,"RETURNS",?81,"DISPENSED",?99,"COST",?117,"COST",!," " Line Location: SUB4+2
Function Call: WRITE	Prompt: "-" Line Location: SUB4+2
Function Call: WRITE	Prompt: !!!!?52,"SUMMARY OF REPORTED FIELDS:",!!?34,"INPATIENT SEGMENT 158",?75,"OUTPATIENT SEGMENT 157",!?33,LN,?75,LN Line Location: SUMRY+1
Function Call: WRITE	Prompt: !?33,"FIELD 03 ",$J($P(LOC("03"),"^",5),10,0),?75,"FIELD 22 ",$J($P(LOC("22"),"^",6),10,2),!?33,"FIELD 04 ",$J($P(LOC("04"),"^",5),10,0),!?33,"FIELD 05 ",$J($P(LOC("05"),"^",7),10,2) Line Location: SUMRY+2
Function Call: WRITE	Prompt: !?33,"FIELD 06 ",$J($P(LOC("06"),"^",5),10,0),!?33,"FIELD 07 ",$J($P(LOC("07"),"^",5),10,0),!?33,"FIELD 08 ",$J($P(LOC("08"),"^",7),10,2) Line Location: SUMRY+3
Function Call: WRITE	Prompt: !?33,"FIELD 17 ",$J($P(LOC("17"),"^",5),10,0),!?33,"FIELD 18 ",$J($P(LOC("18"),"^",7),10,2) Line Location: SUMRY+4

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BDT	HDR+1
>> EDT	HDR+1
IOF	HDR+1
>> J	HDR+2, SUB1+2, SUB2+2, SUB3+2, SUB4+2*
>> LN	SUMRY+1*
>> LOC("03"	SUMRY+2
>> LOC("04"	SUMRY+2
>> LOC("05"	SUMRY+2
>> LOC("06"	SUMRY+3
>> LOC("07"	SUMRY+3
>> LOC("08"	SUMRY+3
>> LOC("17"	SUMRY+4
>> LOC("18"	SUMRY+4
>> LOC("22"	SUMRY+2
>> SITE	HDR+1
>> SITE(	HDR+1
>> Y	HDR+1*

Customize PDF page

Package: Auto Replenishment Ward Stock

Routine: PSGWARP

Information

Source Information

Call Graph

Call Graph Total: 1

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Local Variables

Legend: