Routine: PSSPOIDT

Package	Total	Call Graph
VA Fileman	4	DD^%DT ^DIE $$GET1^DIQ ^DIR
Pharmacy Data Management	3	DRG^PSSDGUPD EN2^PSSHL1 DRG^PSSHUIDG
Kernel	1	^%ZTLOAD

Package	Total	Caller Graph
Pharmacy Data Management	16	PSSADDIT PSSDEE PSSPOID1 PSSPOID3 PSSPOIM1 PSSPOIM2 PSSPOIMO PSSPOST2 PSSPRUTL PSSSOLI1 PSSSOLIT PSSUNMSI ^PSDRUG PSSSUTIL ^PS(52.6 ^PS(52.7
Order Entry Results Reporting	1	ORY176

Entry Points

Name	Comments	DBIA/ICR reference
SET
EN(PSPOINT)	;
DTEX
REST(PSSREST)	;Ask to reactivate or inactivate others
LDIS	;list dispense drugs
DTE
DHEAD
SUP(PSSORDIT)	;Supply at Orderable Item
EN1		ICR #4098 Status: Active Usage: Private
QREST
ENT	;Enter here if coming from Inactive date, or from queued job
MSSG
NONVA	; Evaluates the Non-VA Med Indicator of the Orderable Item
ASKQ
ENTZ
NONFORM	;

External References

Name	Field # of Occurrence
DD^%DT	DTE, DTEX
^%ZTLOAD	ENT+12
^DIE	ASKQ+16
$$GET1^DIQ	ASKQ+14, ASKQ+15, ASKQ+19, ASKQ+20
^DIR	ASKQ+1, DHEAD
DRG^PSSDGUPD	ASKQ+15, ASKQ+20
EN2^PSSHL1	ENTZ
DRG^PSSHUIDG	ASKQ+11, ASKQ+16

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: ASKQ+0
Function Call: WRITE	Prompt: !,"Please wait..",! Line Location: ASKQ+4
Function Call: WRITE	Prompt: !,"Finished!",! Line Location: ASKQ+4
Function Call: WRITE	Prompt: !,$P($G(^PSDRUG(ZZ,0)),"^") Line Location: LDIS+2
Function Call: WRITE	Prompt: ! Line Location: LDIS+10
Function Call: WRITE	Prompt: ?50,Y Line Location: DTE+0
Function Call: WRITE	Prompt: ?50,$G(Y) Line Location: DTEX+0
Function Call: WRITE	Prompt: !!,"This Orderable Item is "_$S($P($G(^PS(50.7,PSSORDIT,0)),"^",12):"Non-Formulary.",1:"Formulary."),! Line Location: MSSG+0
Function Call: WRITE	Prompt: !!,"The Pharmacy Orderable Item ",$P($G(^PS(50.7,PSSORDIT,0)),"^") Line Location: NONVA+13
Routine Call	DIE Line Location: ASKQ+16
Routine Call	DIR Line Location: ASKQ+1 DHEAD

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PS(59 - [#59]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(50.606 - [#50.606]	EN1+4, ENT+9, ENT+10, DHEAD+1, NONFORM+14
^PS(50.7 - [#50.7]	EN1, EN1+2, EN1+3, EN1+4, EN1+7, EN1+13, EN1+15, ENT+1, ENT+2, ENT+5 , ENT+9, ENT+10, ASKQ+5, ASKQ+11, DHEAD+1, NONFORM+5, NONFORM+6, NONFORM+11, NONFORM+12, NONFORM+13 , NONFORM+14, MSSG, NONVA+4, NONVA+5, NONVA+9, NONVA+10*, NONVA+12, NONVA+13
^PS(52.6 - [#52.6]	EN1+9, ASKQ+7, ASKQ+10, LDIS+5, LDIS+7, LDIS+8
^PS(52.7 - [#52.7]	EN1+11, ASKQ+6, ASKQ+9, LDIS+11, LDIS+12, LDIS+13
^PS(59 - [#59]	ASKQ+13, ASKQ+18
^PSDRUG - [#50]	EN1+8, ENT+6, ASKQ+11*, ASKQ+16, LDIS+2, DTE, NONFORM+7, NONFORM+8, NONFORM+9, NONVA+6 , NONVA+7
^PSDRUG("A526"	EN1+9
^PSDRUG("A527"	EN1+11
^PSDRUG("ASP"	ASKQ+11, ASKQ+16, LDIS+2

Label References

Name	Line Occurrences
ASKQ	ASKQ+3
DHEAD	LDIS+2, LDIS+5, LDIS+11
DTE	LDIS+2
DTEX	LDIS+8, LDIS+13
ENT	EN1+3, EN1+16
ENTZ	ENT+2
LDIS	ASKQ+3
NONFORM	ENT+2, ENT+4
NONVA	ENT+4
QREST	ASKQ+3
SET	EN1+3, EN1+16

Naked Globals

Name	Field # of Occurrence
^("I"	ENT+6, ASKQ+9, ASKQ+10, NONFORM+8, NONVA+6
^(0	EN1+4, ENT+9, ENT+10, LDIS+12, NONFORM+14
^(2	ENT+6, NONFORM+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	EN1+1~, ASKQ+16*, ASKQ+21!
DIE	EN1+1~, ASKQ+16*, ASKQ+21!
DIR	ASKQ!, ASKQ+1!, DHEAD!
DIR("A"	ASKQ, DHEAD
DIR("B"	ASKQ+1*
DIR(0	ASKQ+1, DHEAD
>> DIRUT	ASKQ+1
DMFU	ASKQ+12~, ASKQ+14, ASKQ+15, ASKQ+17~, ASKQ+19, ASKQ+20
DNSNAM	ASKQ+12~, ASKQ+15, ASKQ+17~, ASKQ+20
DNSPORT	ASKQ+12~, ASKQ+15, ASKQ+17~, ASKQ+20
DR	EN1+1~, ASKQ+16*, ASKQ+21!
DT	EN1+5, EN1+14, EN1+15, ENT+8, NONFORM+8, NONVA+6
>> DTOUT	ASKQ+1
>> DUOUT	ASKQ+1
DVER	ASKQ+12~, ASKQ+14, ASKQ+15, ASKQ+17~, ASKQ+19, ASKQ+20
FLAG	LDIS+1~, LDIS+2, LDIS+4, DHEAD, DHEAD+1
HLDCROSS	ENT+3~, ENT+12*
II	ASKQ+6, ASKQ+7, ASKQ+9, ASKQ+10, ASKQ+11, ASKQ+15, ASKQ+16, ASKQ+20, ASKQ+22!
INACFLAG	EN1+1~, EN1+6, EN1+8, EN1+10, EN1+12, EN1+13, EN1+15
INCDATE	EN1+1~
IOF	DHEAD+1
IOSL	LDIS+2, LDIS+5, LDIS+11
PSACDATE	EN1+1~, EN1+5*
PSDRG	NONVA+1~, NONVA+4, NONVA+5, NONVA+6, NONVA+7
PSIDATEX	ASKQ+5, ASKQ+6, ASKQ+7, ASKQ+11, ASKQ+22!
>> PSINORDE	ASKQ, ASKQ+5, ASKQ+8, ASKQ+11, ASKQ+16
PSLATEST	EN1+1~, EN1+5, EN1+8, EN1+10, EN1+12, EN1+14, EN1+15*
PSNFX	NONFORM+3~, NONFORM+6*, NONFORM+7, NONFORM+8, NONFORM+9
PSNFX1	NONFORM+3~, NONFORM+4, NONFORM+9, NONFORM+11
PSNFX2	NONFORM+3~, NONFORM+4, NONFORM+10, NONFORM+11, NONFORM+12
PSNFXB	NONFORM+3~, NONFORM+5*, NONFORM+13
PSNONVA	NONVA+1~, NONVA+4*, NONVA+12, NONVA+14
PSNVADG	NONVA+1~, NONVA+4, NONVA+5, NONVA+7, NONVA+9, NONVA+10
PSPOINT	EN~, EN1*, EN1+2, EN1+3, EN1+4, EN1+7, EN1+13, EN1+15, SET
PSSCDATE	LDIS+1~, LDIS+8, LDIS+13, DTEX
PSSCFLAG	LDIS+1~, LDIS+4, LDIS+6
PSSCOUT	ASKQ+3!, QREST!, LDIS+2, LDIS+3, LDIS+5, LDIS+9, LDIS+11, DHEAD
PSSCROSS	EN1, EN1+14, ENT+9, ENT+10, ENT+12*!, ENTZ, NONFORM+13, MSSG, NONVA+12
PSSCXXX	ASKQ+3!, QREST!, LDIS+2, LDIS+6
>> PSSHUIDG	ASKQ+11, ASKQ+16
PSSINA	ENT+3~, ENT+6*, ENT+7, ENT+8
PSSORDIT	EN1+1~, SUP~, ENT+1, ENT+2, ENT+5, ENT+9, ENT+10, ENTZ, SET*, NONFORM+2 , NONFORM+5, NONFORM+6, NONFORM+11, NONFORM+12, NONFORM+13, NONFORM+14, MSSG, NONVA+3, NONVA+4, NONVA+5 , NONVA+9, NONVA+10, NONVA+12, NONVA+13
PSSQDATE	ENT+3~
PSSQDATE(	ENT+8*, ENT+11
PSSQDATE(0	ENT+11
PSSQYES	ENT+3~, ENT+5, ENT+7, ENT+11
PSSREST	REST~, ASKQ+5, ASKQ+6, ASKQ+7, ASKQ+9, ASKQ+10, ASKQ+11, ASKQ+16, LDIS+2, LDIS+5 , LDIS+11, DHEAD+1
PSSSAP	ENT+3~, ENT+6*, ENT+7, ENT+8
PSSSUP	ENT+3~, ENT+5*, ENT+9, ENT+10
PSSSUYES	ENT+3~, ENT+5, ENT+7, ENT+8*, ENT+9, ENT+10, ENT+11
>> PSSTEST	EN1
PSSVAP	EN1+1~, EN1+8, EN1+9, EN1+10, EN1+11*, EN1+12
PSSVDOSE	EN1+1~, EN1+4*, EN1+14
PSSVNAME	EN1+1~, EN1+4*, EN1+14
PSUAPP	EN1+1~, EN1+8*
WWWW	EN1+1~
X	EN1+1~
XX	ASKQ+12~, ASKQ+13, ASKQ+14, ASKQ+15, ASKQ+17~, ASKQ+18, ASKQ+19, ASKQ+20
Y	EN1+1~, ASKQ+3, ASKQ+4, DHEAD, DTE!, DTEX!
>> ZTDESC	ENT+12*
>> ZTDTH	ENT+12*
>> ZTIO	ENT+12*
>> ZTQUEUED	EN1, ENT+1, ENTZ+1
>> ZTREQ	EN1, ENT+1, ENTZ+1*
>> ZTRTN	ENT+12*
>> ZTSAVE("PSSCROSS"	ENT+12*
>> ZTSAVE("PSSORDIT"	ENT+12*
ZZ	LDIS+1~, LDIS+2, LDIS+5, LDIS+7, LDIS+8, LDIS+11*, LDIS+12, LDIS+13, DTE
ZZZ	EN1+1~, EN1+7, EN1+8, EN1+9, EN1+11, ENT+3~, ENT+5, ENT+6
ZZZA	EN1+1~, EN1+9*
ZZZS	EN1+1~, EN1+11*
ZZZZ	ENT+3~, ENT+11*, ENT+12

Customize PDF page

Package: Pharmacy Data Management

Routine: PSSPOIDT

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 17

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: