Routine: PSONEWG

Package	Total	Call Graph
Outpatient Pharmacy	5	COPAY^PSOCPB (SC,SHAD)^PSOMLLD2 ($$DT,CV,HNC,MST,PGW,RAD,VEH)^PSOMLLDT (ICD,SET3)^PSONEWF SCP^PSORN52D
VA Fileman	1	^DIK

Package	Total	Caller Graph
Outpatient Pharmacy	1	PSOORNE1

Entry Points

Name	Comments	DBIA/ICR reference
MESS	;
START	;
SET	;Set original answers that were passed from CPRS
SET2	;for when patient status is exempt, null IBQ node was set for exempts or SC>50 - data is in ICD node
ICD	;

External References

Name	Field # of Occurrence
^DIK	ICD+8
COPAY^PSOCPB	START+10
SC^PSOMLLD2	START+13
SHAD^PSOMLLD2	START+26
$$DT^PSOMLLDT	START+16, SET+5
CV^PSOMLLDT	START+18
HNC^PSOMLLDT	START+30
MST^PSOMLLDT	START+28
PGW^PSOMLLDT	START+24
RAD^PSOMLLDT	START+22
VEH^PSOMLLDT	START+20
ICD^PSONEWF	ICD+6
SET3^PSONEWF	SET2+2
SCP^PSORN52D	START+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: START+10
Function Call: WRITE	Prompt: !!,"The Pharmacy Orderable Item has changed for this order. Please review any",!,"existing SC or Environmental Indicator defaults carefully for appropriateness.",! Line Location: MESS+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(53 - [#53]	START+10, START+13
^PSDRUG - [#50]	START+5
^PSRX - [#52]	START+2, SET+2, SET2+2, ICD+4, ICD+5, ICD+6, ICD+7!*, ICD+8

Label References

Name	Line Occurrences
MESS	START+18, START+20, START+22, START+24, START+26, START+28, START+30
SET	START+9
SET2	SET+4

Naked Globals

Name	Field # of Occurrence
^("IBQ"	SET+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	ICD+8*!
DA(1	ICD+8*
DIK	ICD+8*!
DUZ("AG"	START+10
FLD	ICD+1~, ICD+6*
ICD	ICD+1~, ICD+6*
II	ICD+1~, ICD+5*, ICD+6
JJ	ICD+1~
JJJ	SET2+1~
PSOANSQ	START+9!, START+13!, START+16!
PSOANSQ("CV"	START+18, SET+11*
PSOANSQ("HNC"	START+30, SET+10*
PSOANSQ("MST"	START+28, SET+6*
PSOANSQ("PGW"	START+24, SET+9*
PSOANSQ("RAD"	START+22, SET+8*
PSOANSQ("SC"	START+12, SET+2*, SET+3!
PSOANSQ("SHAD"	START+26, SET+12*
PSOANSQ("VEH"	START+20, SET+7*
>> PSOANSQD("CV"	START+19*
>> PSOANSQD("HNC"	START+31*
>> PSOANSQD("MST"	START+29*
>> PSOANSQD("PGW"	START+25*
>> PSOANSQD("RAD"	START+23*
>> PSOANSQD("SC"	START+12*
>> PSOANSQD("SHAD"	START+27*
>> PSOANSQD("VEH"	START+21*
>> PSOBILL	START+13
>> PSOCOPY	START+2, ICD+5
>> PSOCPZ("DFLG"	START+9*, START+13, START+14, START+16, START+18, START+20, START+22, START+24, START+26, START+28 , START+30
>> PSODFN	START+18, START+20, START+22, START+24, START+26, START+28, START+30, SET2+2
>> PSODRUG("OI"	START+4, START+5
>> PSOFLAG	START+6*
>> PSOIBQS(	START+18, START+20, START+22, START+24, START+26, START+28, START+30
PSOMESOI	START+1~, START+3, START+5, START+13!, START+14!, START+16!, START+32!, MESS+1*
>> PSONEW("ICD"	ICD+3
>> PSONEW("IDFLG"	ICD+6, ICD+7, ICD+9!
>> PSONEW("NEWCOPAY"	START+9*, START+13!, START+14!, START+16!, START+18!, START+20!, START+22!, START+24!, START+26!, START+28! , START+30!
>> PSONEW("PATIE	NT STATUS" , START+10, START+13
PSONEWFF	START+6*, START+13!, START+14!, START+16!, START+32!
PSONOCHG	ICD+1~, ICD+3, ICD+5
PSOOICD	SET2+1~, SET2+2*
PSOPENIB	START+1~, START+2*, START+19, START+21, START+23, START+25, START+27, START+29, START+31, SET+4 , SET+6, SET+7, SET+8, SET+9, SET+10, SET+11, SET+12
>> PSORXED	START+2, START+3, MESS+1
>> PSORXED("ICD"	ICD+3
>> PSORXED("IDFLG"	ICD+9!
>> PSORXED("IRXN"	START+2, SET+1, SET+2, SET2+2, ICD+2
>> PSORXED("RX0"	START+4, START+5
PSOSCA	START+13, START+32!
>> PSOSCP	START+10, START+13
RXN	ICD+1~, ICD+2*, ICD+4, ICD+5, ICD+6, ICD+7, ICD+8
TNEW	ICD+1~, ICD+7, ICD+8
U	ICD+6

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSONEWG

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: