Routine: PSOLLL4

Package	Total	Call Graph
CIA Utilities	1	$$BC^CIAUBC28
IHS Changes To Pharmacy	1	$$NDCVAL^APSPFUNC
National Drug File	1	$$EN^PSNPPIO
Outpatient Pharmacy	1	STRT^PSOLLU1
Pharmacy Data Management	1	$$WTEXT^PSSWRNA
VA Fileman	1	$$GET1^DIQ

Package	Total	Caller Graph
Outpatient Pharmacy	1	PSOLLL1

Entry Points

External References

Name	Field # of Occurrence
$$NDCVAL^APSPFUNC	EN+4
$$BC^CIAUBC28	EN+4
$$GET1^DIQ	EN+5
$$EN^PSNPPIO	PSOLLL4+8
STRT^PSOLLU1	CONT+5
$$WTEXT^PSSWRNA	MOREWARN+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $$BC^CIAUBC28($TR($$NDCVAL^APSPFUNC(RX,+$G(RXFL(RX))),"-","")_","_+$G(QTY),0,50,PSOX,PSOY) Line Location: EN+4
Function Call: WRITE	Prompt: $P(T,":"),":" Line Location: PRINT+9
Function Call: WRITE	Prompt: $P(T,":",2,99) Line Location: PRINT+11
Function Call: WRITE	Prompt: T Line Location: PRINT+12
Function Call: WRITE	Prompt: ! Line Location: PRINT2+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^APSPCTRL - [#9009033]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	EN+10, EN+11, CONT+2, CONT+3

Label References

Name	Line Occurrences
CONT	EN+8
MOREWARN	EN+1
PRINT	EN+7, EN+8, EN+9, EN+10, EN+11, CONT+10, CONT+12, CONT+18, CONT+20, MOREWARN+4 , MOREWARN+8, MOREWARN+11, MOREWARN+12, MOREWARN+13
PRINT2	PRINT+8

Naked Globals

Name	Field # of Occurrence
^(0	CONT+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	CONT+1!, CONT+2, CONT+3
A(	CONT+1*, CONT+2
>> B	CONT+3*, CONT+9, CONT+11, CONT+17, CONT+19
>> CNT	CONT, CONT+1
>> CONT	EN+8*
>> DRUG	EN+7
>> FLAG	PSOLLL4+8*, EN+9
HDR	CONT+2, CONT+8, CONT+10, CONT+15, CONT+16, CONT+17, CONT+19, PRINT~, PRINT+4*, PRINT+7 , PRINT+8
I	CONT+4, CONT+5, CONT+6, CONT+7, CONT+9, CONT+11, CONT+13, CONT+17, CONT+19, MOREWARN+1~ , MOREWARN+5*
J	CONT+2, CONT+9, CONT+11, CONT+17, CONT+19, MOREWARN+1~, MOREWARN+9
>> L	CONT+5
>> L(	CONT+6
LEN	MOREWARN+1~, MOREWARN+2*
LEN2	MOREWARN+1~, MOREWARN+6*, MOREWARN+11
>> LENGTH	CONT+2, CONT+6, CONT+7*
>> MSG	PSOLLL4+8, EN+9
NEWWARN	MOREWARN+1~, MOREWARN+3*, MOREWARN+5
>> OUT	CONT, CONT+2, CONT+3, CONT+5, CONT+9, CONT+11, CONT+15, CONT+16, CONT+17, CONT+19*
>> PMIF(	CONT+13*
>> PMIF("A"	CONT+2, CONT+9, CONT+11, CONT+17, CONT+19
>> PMIF("B"	CONT+2, CONT+3, CONT+9, CONT+11, CONT+14, CONT+17, CONT+19*
>> PMIF("H"	EN+8, CONT+15, CONT+17, CONT+19*
>> PMIF("I"	CONT+5, CONT+9, CONT+11, CONT+17, CONT+19
>> PMIF("T"	EN+8, CONT+15, CONT+17, CONT+19*
>> PMIM	EN+1, EN+8, CONT, CONT+9, CONT+11, CONT+13, CONT+14, CONT+17, CONT+19*
>> PNM	EN+7
PRE	MOREWARN+1~, MOREWARN+6, MOREWARN+8, MOREWARN+11, MOREWARN+12, MOREWARN+13
>> PSOFONT	CONT, PRINT+5, PRINT+7, PRINT+10
>> PSOIO(	PRINT+5, PRINT+7, PRINT+10
>> PSOIO("ET"	PRINT2
>> PSOIO("PMII"	EN
>> PSOIO("ST"	PRINT+6
>> PSOLAN	MOREWARN+7
>> PSOSITE	EN+5
PSOWARN	MOREWARN+1~, MOREWARN+5*, MOREWARN+6, MOREWARN+7
>> PSOX	EN+4
>> PSOY	EN+3, EN+4, EN+6, EN+7, EN+10, EN+11, CONT+2, CONT+9, CONT+11, CONT+17 , CONT+19, MOREWARN+14*
>> PSOYI	EN+7, EN+10, EN+11, CONT+2, MOREWARN+14
>> PSOYM	CONT+9, CONT+11, CONT+17, CONT+19
>> PTEXT	CONT+2, CONT+6, CONT+10, CONT+12, CONT+15, CONT+16, CONT+17, CONT+18, CONT+19, CONT+20 , MOREWARN+9, MOREWARN+10, MOREWARN+11, MOREWARN+12, MOREWARN+13
>> QTY	EN+4
>> RX	EN+4
>> RXF	EN+5
>> RXFL(	EN+4
>> RXN	EN+7
>> RXY	PSOLLL4+8
T	EN+7, EN+10, EN+11, PRINT~, PRINT+9, PRINT+11, PRINT+12, MOREWARN+4, MOREWARN+8, MOREWARN+11 , MOREWARN+12, MOREWARN+13
>> TEXT	CONT+3, CONT+4, CONT+5, CONT+6, MOREWARN+7*, MOREWARN+8, MOREWARN+9
>> WARN	MOREWARN+2, MOREWARN+3
>> XFONT	CONT*, CONT+6

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOLLL4

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:

Name	Comments	DBIA/ICR reference
MOREWARN	; SEE ID MORE THAN 5 WARNINGS AND PRINT REMAINDER, IF SO
PRINT(T,HDR)	; ; Input: T - text to be printed ; HDR - 0-no / 1-yes
EN
CONT
PRINT2