Routine: PSDREC4

Package	Total	Call Graph
VA Fileman	4	NOW^%DTC ^DIC ^DIE ^DIR
Controlled Substances	1	DEV^PSDREVC
IFCAP	1	$$UNITCODE^PRCPUX1

Package	Total	Caller Graph
Controlled Substances	1	PSDREC2

Entry Points

External References

Name	Field # of Occurrence
NOW^%DTC	POST+3
^DIC	SEL, NON+1, MON+1, FIND+1, FIND+6
^DIE	NON+9, IT+2, MON+2, FIND+2
^DIR	PRE, CHO, NON+8, POST
$$UNITCODE^PRCPUX1	ITEM+3
DEV^PSDREVC	PRE

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Previous receipts have been processed for this transaction.",! Line Location: PRE+0
Function Call: WRITE	Prompt: !!,$P(PSDIT,U) Line Location: ITEM+0
Function Call: WRITE	Prompt: ?5,$E($P($G(^PRCS(410,+PSDCON,"IT",+PSDI,1,PSDW,0)),U),1,75),! Line Location: ITEM+1
Function Call: WRITE	Prompt: !,"Packaging: " Line Location: ITEM+2
Function Call: WRITE	Prompt: $$UNITCODE^PRCPUX1(+$P(PSDIT,U,3)) Line Location: ITEM+3
Function Call: WRITE	Prompt: ?18,"Price :$",$P(PSDIT,U,7) Line Location: ITEM+4
Function Call: WRITE	Prompt: ?33,"Item #: ",$P(PSDIT,U,5),?48,"Vendor Stock #: ",$P(PSDIT,U,6),! Line Location: ITEM+5
Function Call: WRITE	Prompt: !!,PSDRUGN,!! Line Location: IT+1
Function Call: WRITE	Prompt: !!,"Quantity ordered: ",$P($G(^PRCS(410,+PSDCON,"IT",+PSDI,0)),U,2) Line Location: DISP+0
Function Call: WRITE	Prompt: ?40,"Quantity warehouse posted: ",$P($G(^(0)),U,12) Line Location: DISP+1
Function Call: WRITE	Prompt: !!,"Quantity received by Primary: ",$P($G(^(0)),U,13) Line Location: DISP+2
Function Call: WRITE	Prompt: ?40,"Converted quantity: ",PSDREC*$P($G(^PSDRUG(+PSDRUG,660)),U,5),! Line Location: DISP+3
Function Call: WRITE	Prompt: !,"Sorry, but this drug is not stocked in this pharmacy location.",! Line Location: DISP+5
Routine Call	DIE Line Location: NON+9 IT+2 MON+2 FIND+2
Routine Call	DIC Line Location: SEL NON+1 MON+1 FIND+1 FIND+6
Routine Call	DIR Line Location: PRE CHO NON+8 POST

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PSDRUG - [#50]	Classic Fileman Calls
^PSD(58.8 - [#58.8]	Classic Fileman Calls
^PSD(58.81 - [#58.81]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PRC(441 - [#441]	NON+3, NON+5
^PRCS(410	CHO+1, ITEM+1, DISP, DISP+1, DISP+2
^PSD(58.8 - [#58.8]	NON, NON+2, DISP+5, POST+1, POST+2, POST+4, POST+5*, POST+6, MON, MON+1 , FIND+3
^PSD(58.81 - [#58.81]	PRE, TR, FIND*, FIND+1
^PSDRUG - [#50]	NON+2, IT, DISP+3
^PSDRUG("AB"	NON, NON+3, IT

Label References

Name	Line Occurrences
FIND	FIND
ITEM	CHO+1, SEL
QUIT	PRE, CHO, CHO+1, SEL
SEL	CHO

Naked Globals

Name	Field # of Occurrence
^(0	DISP, DISP+1, DISP+2, POST+1, MON, FIND+3
^(660	DISP+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	POST+3
DA	NON+9, IT+2, MON+2, FIND+2, FIND+6!
DA(1	SEL, NON+1, MON+1, MON+2, FIND+5*
DA(2	MON+1, MON+2, FIND+5*
DIC	SEL!, NON+1!, MON+1!, FIND+1!, FIND+4*, FIND+6!
DIC("A"	NON+1*
DIC("S"	NON+1*
DIC(0	SEL, NON+1, MON+1, FIND+1, FIND+4*
DIE	NON+9!, IT+2!, MON+2, FIND+2!
>> DILOCKTM	POST+2, TR
>> DINUM	FIND+1, FIND+5
DIR	PRE!, CHO!, NON+8!, POST!
DIR("?"	CHO, NON+7, POST*
DIR("A"	PRE, CHO, NON+4, NON+5, NON+6, NON+7, POST*
DIR("B"	PRE, CHO, NON+6, POST
DIR(0	PRE, CHO, NON+4, POST
>> DIRUT	PRE, CHO
DLAYGO	FIND+1!, FIND+4, FIND+6!
>> DR	NON+9, IT+2, MON+2, FIND+2
DT	MON+1, MON+2
>> DTOUT	CHO+1, SEL, NON, NON+1
>> DUOUT	CHO+1, SEL, NON, NON+1
>> PSDAT	POST+3*
>> PSDB	NON+2, POST+4, POST+5
>> PSDCON	PRE, CHO+1, SEL, ITEM+1, DISP, DISP+1, DISP+2
>> PSDI	CHO, CHO+1, SEL*, ITEM+1, DISP, DISP+1, DISP+2
>> PSDIT	CHO+1, SEL, ITEM, ITEM+3, ITEM+4, ITEM+5, NON, NON+3, NON+5, NON+9 , IT
>> PSDLOC	NON, NON+1, NON+2, DISP+5, POST+1, POST+2, POST+4, POST+5, POST+6, MON , MON+1, MON+2, FIND+3, FIND+5
>> PSDLOCN	NON+1
>> PSDREC	DISP, DISP+1, DISP+2, DISP+3, POST+1, POST+5
PSDRUG	NON+2, NON+9, IT, IT+2!, DISP+3, DISP+5, POST!, POST+1, POST+2, POST+4 , POST+5, POST+6, MON, MON+1, MON+2, FIND+3, FIND+5, FIND+6!
>> PSDRUGN	NON+2, NON+6, NON+9, IT, IT+1
>> PSDT	FIND*, FIND+1, FIND+2, FIND+5
>> PSDW	ITEM+1*
U	ITEM, ITEM+1, ITEM+3, ITEM+4, ITEM+5, NON, NON+2, NON+3, NON+5, NON+9 , IT, DISP, DISP+1, DISP+2, DISP+3, POST+1, POST+4, POST+5, FIND
>> X	MON+1, FIND+1, FIND+5*
>> Y	PRE, CHO, CHO+1, SEL, NON, NON+1, NON+2, NON+8, NON+9*, IT+2 , POST
>> Y(0	SEL

Customize PDF page

Package: Controlled Substances

Routine: PSDREC4

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: