Routine: PSSWRNE

Package	Total	Call Graph
Pharmacy Data Management	2	FULL^PSSLOOK (CHECK20,CHECKLST,WARNLST)^PSSWRNA
VA Fileman	2	^DIE ^DIR

Package	Total	Caller Graph
Pharmacy Data Management	4	PSSLOOK PSSWRNB PSSWRNC ^PSDRUG

Entry Points

Name	Comments	DBIA/ICR reference
FULL	;
HDR	;
FORMAT	;
EDIT	;
WARN54	;
NOTE2
NEWWARN	;
NOTE	;
VALID	; VALIDATE NEW WARNING LABEL LIST
PRINT	;
DEA	;

External References

Name	Field # of Occurrence
^DIE	PRINT+23, PRINT+35
^DIR	PRINT+30, HDR+1
FULL^PSSLOOK	NEWWARN+7, WARN54+6
CHECK20^PSSWRNA	PRINT+36, DEA+3
CHECKLST^PSSWRNA	DEA+3
WARNLST^PSSWRNA	DEA+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"No warnings from the new data source exist for this drug." Line Location: PRINT+5
Function Call: WRITE	Prompt: !,"Labels will print in the order in which they appear for local and CMOP fills:" Line Location: PRINT+8
Function Call: WRITE	Prompt: !!,"Pharmacy fill card display: DRUG WARNING ",PSSWRN Line Location: PRINT+15
Function Call: WRITE	Prompt: !," RX CONSULT file Drug Warning="_WARN54 Line Location: PRINT+19
Function Call: WRITE	Prompt: !," ",WARN_" "_$G(^PS(54,WARN,0))_" is not mapped to the new data source" Line Location: PRINT+20
Function Call: WRITE	Prompt: !,"NOTE: Because the NEW WARNING LABEL LIST field is empty, the warnings above" Line Location: PRINT+26
Function Call: WRITE	Prompt: !,"are the warnings that our national data source distributes for this drug." Line Location: PRINT+27
Function Call: WRITE	Prompt: !,"NEW WARNING LABEL LIST: ",NEWLIST Line Location: PRINT+29
Function Call: WRITE	Prompt: ! Line Location: PRINT+30
Function Call: WRITE	Prompt: ! Line Location: NEWWARN+4
Function Call: WRITE	Prompt: ! Line Location: WARN54+3
Function Call: WRITE	Prompt: !,"TOO MANY WARNINGS. LIMIT ANSWER STRING TO 30 CHARACTERS OR LESS" Line Location: VALID+3
Function Call: WRITE	Prompt: !,PSOWARN," does not exist in the WARNING LABEL-ENGLISH file" Line Location: VALID+6
Function Call: WRITE	Prompt: !,PSOWARN," does not exist in the RX CONSULT file" Line Location: VALID+7
Function Call: WRITE	Prompt: !,PTEXT Line Location: FORMAT+5
Function Call: WRITE	Prompt: !,PTEXT Line Location: FORMAT+6
Function Call: WRITE	Prompt: @IOF Line Location: HDR+2
Function Call: WRITE	Prompt: "Current Warning labels for ",DRUG," (continued)" Line Location: HDR+3
Function Call: WRITE	Prompt: !!,?5,"The RX CONSULT File (#54) contains local label expansions." Line Location: NOTE2+0
Function Call: WRITE	Prompt: !,?5,"The WARNING LABEL-ENGLISH file (#50.625) contains national label" Line Location: NOTE2+1
Function Call: WRITE	Prompt: !,?5,"expansions in English." Line Location: NOTE2+2
Function Call: WRITE	Prompt: !,?5,"The WARNING LABEL-SPANISH file (#50.626) contains national label" Line Location: NOTE2+3
Function Call: WRITE	Prompt: !,?5,"expansions in Spanish." Line Location: NOTE2+4
Function Call: WRITE	Prompt: !,?5,"It is important to note that RX Consult entry numbers do not" Line Location: NOTE2+5
Function Call: WRITE	Prompt: !,?5,"correlate with the other files (i.e. Number 7 in file 54 is not" Line Location: NOTE2+6
Function Call: WRITE	Prompt: !,?5,"included in file 50.625)." Line Location: NOTE2+7
Function Call: WRITE	Prompt: !!,?5,"You should print a list of the current RX CONSULT file entries" Line Location: NOTE2+8
Function Call: WRITE	Prompt: !,?5,"and the current WARNING LABEL-ENGLISH file entries." Line Location: NOTE2+9
Function Call: WRITE	Prompt: ! Line Location: NOTE2+10
Routine Call	DIE Line Location: PRINT+23 PRINT+35
Routine Call	DIR Line Location: PRINT+30 HDR+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PSDRUG - [#50]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(50.625 - [#50.625]	NEWWARN+3, NEWWARN+6, VALID+6
^PS(54 - [#54]	PRINT+20, WARN54+2, WARN54+5, VALID+7
^PS(59.7 - [#59.7]	NOTE+2
^PSDRUG - [#50]	PRINT+24, PRINT+36, DEA+1, DEA+2
^PSDRUG("B"	EDIT+4
^TMP("PSSWRNB"	EDIT+3, PRINT+18, PRINT+32!, PRINT+33!

Label References

Name	Line Occurrences
DEA	EDIT+4, PRINT+37
FORMAT	NEWWARN+7, WARN54+6
FULL	PRINT+15, PRINT+19, PRINT+20, PRINT+26, PRINT+27, PRINT+29, PRINT+30, FORMAT+5, FORMAT+6
HDR	FULL+1
NEWWARN	PRINT+13
PRINT	EDIT+4, PRINT+36, PRINT+37
WARN54	PRINT+14

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BAD	VALID+1~, VALID+2, VALID+6, VALID+7*, VALID+8
DA	PRINT+23!, PRINT+35!
>> DEA	DEA+1*
DIE	PRINT+23!, PRINT+35!
DIR	PRINT+30!, HDR+1!
DIR("A"	PRINT+30*
DIR("B"	PRINT+30*
DIR(0	PRINT+30, HDR+1
DR	PRINT+23!, PRINT+35!
>> DRUG	EDIT+3*, EDIT+4, PRINT+4, PRINT+18, HDR+3
>> DRUGENT	PRINT+32, PRINT+33
>> DRUGN	EDIT+4*, PRINT+23, PRINT+24, PRINT+35, PRINT+36, DEA+1, DEA+2
>> DTOUT	PRINT+30
>> DUOUT	PRINT+30
>> ENDWARN	PRINT+9*, PRINT+11
I	PRINT+20~, VALID+4, FORMAT+1~, FORMAT+3, FORMAT+5
IOF	PRINT+3, HDR+2
IOSL	FULL+1
JJJ	NEWWARN+1~, NEWWARN+6, WARN54+5
LEN	FORMAT+1~, FORMAT+2, FORMAT+4, FORMAT+5*
NEWLIST	PRINT+1~, PRINT+5, PRINT+24*, PRINT+29
>> OLDWARN	PRINT+34*, PRINT+37
>> PSOWARN	PRINT+11, PRINT+13, NEWWARN+3, NEWWARN+5, WARN54+2, WARN54+4, WARN54+5, VALID+4, VALID+5, VALID+6 , VALID+7
PSOWRNN	NEWWARN+1~, NEWWARN+3, NEWWARN+6, VALID+5, VALID+6
>> PSSLOOK	PRINT+2, PRINT+8, PRINT+16, PRINT+28, NEWWARN+4, NEWWARN+7, WARN54+3, WARN54+6
PSSOUT	EDIT+1~, EDIT+2, PRINT+15, PRINT+26, PRINT+27, PRINT+29, PRINT+30, FULL+1, FORMAT+5, FORMAT+6 , HDR+1
>> PSSWRN	PRINT+5, PRINT+7, PRINT+11, PRINT+15, PRINT+25, PRINT+34, PRINT+36, PRINT+37, DEA+2
PSSWSITE	NOTE+1~, NOTE+2*
PTEXT	FORMAT+1~, FORMAT+2, FORMAT+4, FORMAT+5, FORMAT+6
QUIT	EDIT+1~, EDIT+2, EDIT+3, PRINT+30, HDR+1*
>> SEL	PRINT+17, PRINT+21
STAR	EDIT+1~, EDIT+2, PRINT+1~, PRINT+10, PRINT+12*, NEWWARN+5, WARN54+4
STR	NEWWARN+1~, NEWWARN+6, FORMAT+3, FORMAT+4
>> TEXT	NEWWARN+2, NEWWARN+5, NEWWARN+6, NEWWARN+7, WARN54+1, WARN54+4, WARN54+5, WARN54+6, FORMAT+3
WARN	PRINT+20~*
>> WARN54	PRINT+18*, PRINT+19, PRINT+20
>> WARNEDIT	PRINT+32, PRINT+33
>> WWW	PRINT+11*, PRINT+12
X	VALID+3, VALID+4, VALID+8!
>> XX	DEA+2*
Y	PRINT+31, VALID+3!, HDR+1

Customize PDF page

Package: Pharmacy Data Management

Routine: PSSWRNE

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: