Routine: APSPRT2

Package	Total	Call Graph
Kernel	2	^%ZIS ^%ZISC

Entry Points

Name	Field # of Occurrence
^%ZIS	ZIS+1
^%ZISC	EOJ+1

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: START+0
Function Call: WRITE	Prompt: !,?APSP(21),$E(APSP("LINE1"),1,APSP(22)) Line Location: START+3
Function Call: WRITE	Prompt: ! Line Location: C1+1
Function Call: WRITE	Prompt: !,?APSP(21),"** CONTINUED **" Line Location: C1+3
Function Call: WRITE	Prompt: ! Line Location: C1+4
Function Call: WRITE	Prompt: ! Line Location: C1+5
Function Call: WRITE	Prompt: !,?APSP(21),APSP("DRUG") Line Location: NEXT+1
Function Call: WRITE	Prompt: ?(APSP(21)+APSP(22)-$L(APSP("QTY"))),APSP("QTY") Line Location: NEXT+2
Function Call: WRITE	Prompt: !,?APSP(21),APSP("CNTL#") Line Location: NEXT+3
Function Call: WRITE	Prompt: ?(APSP(21)+APSP(22)-$L(APSPRT("EXPDATE"))),APSPRT("EXPDATE") Line Location: NEXT+4
Function Call: WRITE	Prompt: !,?APSP(21),$E(APSP("LINE2"),1,APSP(22)) Line Location: NEXT+5
Function Call: WRITE	Prompt: ! Line Location: NEXT+6
Function Call: WRITE	Prompt: ! Line Location: NEXT+8
Function Call: WRITE	Prompt: !,?APSP(21),X Line Location: SIG1+0
Routine Call	%ZIS Line Location: ZIS+1

Name	Field # of Occurrence
>> APSP("CNTL#"	NEXT+3, EOJ+3!
>> APSP("COPIES"	START*, NEXT+7, EOJ+3!
>> APSP("DRUG"	NEXT+1, EOJ+3!
>> APSP("LINE1"	START+3
>> APSP("LINE2"	NEXT+5
>> APSP("QTY"	NEXT+2
>> APSP("QTYFLG"	NEXT+2
>> APSP(16	START+2, C1, C1+1, NEXT+8
>> APSP(17	START, C1+4, NEXT+8
>> APSP(18	C1+4, NEXT+6, NEXT+8
>> APSP(19	NEXT+8
>> APSP(21	START+3, C1+3, C1+5, NEXT+1, NEXT+2, NEXT+3, NEXT+4, NEXT+5, SIG1
>> APSP(22	START+3, NEXT+2, NEXT+4, NEXT+5
APSPDR	SIG+1, CON, C1*, C1+1, C1+2, C1+5, C1+6, SIG1, EOJ+2!
APSPF	CON, C1+2, C1+3, EOJ+2!
APSPGC	SIG+1, C1+5, C1+6, EOJ+2!
APSPGY	EOJ+2!
APSPGY(	C1, C1+1, C1+2, SIG1
>> APSPRT("EXPDATE"	NEXT+4, EOJ+3!
>> APSPRT("IO"	ZIS+1
APSPZLA	START+2*, SIG+1, C1+1, C1+2, C1+5, EOJ+2!
APSPZM	C1+5*, EOJ+2!
APSPZZL	START+1*, START+2, EOJ+2!
I	START, C1, C1+1, C1+2, C1+4, C1+5, NEXT+6, NEXT+8, EOJ+2!, EOJ+4!
II	C1+1*, EOJ+2!
IO	ZIS+1
IOP	ZIS+1*, EOJ+2!, EOJ+4!
X	SIG1*, EOJ+2!