Routine: PSDORL

Information

PSDORL ;BIR/JPW/LTL-CS Order Entry Listing and Cancel ; 19 Dec 94

Package	Total	Call Graph
VA Fileman	2	^DIE ^DIR

Package	Total	Caller Graph
Controlled Substances	8	PSDORD PSDORD4 PSDORN PSDORNC PSDORNO PSDORNV PSDORP PSDORV

Name	Field # of Occurrence
^DIE	ORD+1, ORD+3
^DIR	CANC+2, ASK+3

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Searching for pending orders..." Line Location: LIST+1
Function Call: WRITE	Prompt: !,"You may cancel one order at a time.",! Line Location: ASK+1
Function Call: WRITE	Prompt: $C(7),!!," The order you selected has been cancelled. ",! Line Location: ORD+4
Function Call: WRITE	Prompt: !!,"No orders cancelled. Continue processing your order.",! Line Location: MSG+0
Function Call: WRITE	Prompt: !!,$S(OCNT:"Orders pending: "_OCNT_" Quantity Ordered ("_NBKU_"): "_TOT,1:"No orders pending"),!! Line Location: SORT+5
Function Call: WRITE	Prompt: $C(7),"All pending orders are currently being processed. Please review the PENDING ",!,"CS ORDERS REPORT for more information.",! Line Location: SORT+7
Function Call: WRITE	Prompt: !!,"Accessing pending orders for ",PSDRN,"...",!!,"The following orders may be cancelled:",! Line Location: PRT+2
Function Call: WRITE	Prompt: !,?6,"DATE ORDERED",?25,"QUANTITY",?38,"ORDERED BY",! Line Location: PRT+3
Function Call: WRITE	Prompt: ! Line Location: PRT+10
Routine Call	DIE Line Location: ORD+1 ORD+3
Routine Call	DIR Line Location: CANC+2 ASK+3

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	PRT+6
^PSD(58.85 - [#58.85]	SORT+2, SORT+3, SORT+4, PRT+4, PRT+5
^VA(200 - [#200]	PRT+7

Name	Field # of Occurrence
^(0	PRT+7

Name	Field # of Occurrence
AA	END!, SORT+2*, SORT+4
DA	CANC+1!, ASK!, ORD+1!, ORD+2, ORD+3!, END!
DA(1	ORD+1*
DA(2	ORD+1*
DIE	ORD+1!, ORD+3!
DIR	CANC+1!, ASK!, END!
DIR("?"	CANC+1, ASK+2
DIR("A"	CANC+1, ASK+2
DIR("B"	CANC+2*
DIR(0	CANC+1, ASK+2
DIROUT	END!
DIRUT	CANC+1!, CANC+2, ASK!, END!
DR	ORD+1!, ORD+3!
DTOUT	END!
DUOUT	END!
JJ	END!, SORT+2*
KK	END!, SORT+2, SORT+3, SORT+4, PRT+3, PRT+4*, PRT+5, PRT+8
KK2	END!, PRT+6*, PRT+8
KK3	END!, PRT+6*, PRT+8, PRT+9
KK4	END!, PRT+6*, PRT+8, PRT+9
KK5	END!, PRT+7*, PRT+8, PRT+9
KKO	ASK+4*, ORD+1, ORD+2, END!
LL	END!, SORT+1!
LL(	SORT+4*, PRT+4
LL(0	SORT+7
LOC	END!, PRT+1!
LOC(	ORD+1, ORD+2, PRT+8*
>> NAOU	ORD+1, SORT+2
>> NBKU	SORT+5
NODEL	END!, SORT+3, PRT+5, PRT+6, PRT+7
OCNT	ASK+2, END!, SORT+2, SORT+3, SORT+5, SORT+6, PRT+3, PRT+8, PRT+9
PSDOUT	LIST+2, END!, SORT+6, SORT+7*
>> PSDR	ORD+1, SORT+2
>> PSDRN	PRT+2
TOT	END!, SORT+2, SORT+3, SORT+5
Y	CANC+2, ASK+3, ASK+4, END!, PRT+6*