Routine: PSSDINT

Package

Total

Call Graph

^DIC FILE^DICN ^DIE $$GET1^DIQ ^DIR

$$KSP^XUPARAM

^XMD

Package	Total	Caller Graph
Pharmacy Data Management	1	PSS INTERACTION LOCAL ADD

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
GO
HEADER	;Message header; facility name
ADDMSG	;If adding new local interaction; send mail message.
SEVMSG	;If change in severity nationally; send mail message.
OUT

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: GO+0
Function Call: WRITE	Prompt: !!,"That interaction is nationally entered and may not be edited." Line Location: GO+5
Function Call: WRITE	Prompt: !,PSNNN," Severity : ",Y(0) Line Location: GO+10
Routine Call	DIE Line Location: GO+7
Routine Call	DIC Line Location: GO+2 GO+3
Routine Call	DIR Line Location: GO+6 GO+7 GO+9 GO+11

FileNo	Call Tags
^DIC(4 - [#4]	GET1^DIQ
^PS(56 - [#56]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^PS(56 - [#56]	GO+4, GO+12, GO+13, GO+14, SEVMSG+1, ADDMSG+3
^TMP($J	OUT+1!, SEVMSG+3, SEVMSG+4, SEVMSG+5, ADDMSG+2, ADDMSG+3*

Name	Field # of Occurrence
DA	GO+4*, GO+5, GO+7, GO+9!, OUT!, SEVMSG+1
DD	GO+14!
DIC	GO+2, GO+14, OUT!
DIC("A"	GO+2, GO+3
DIC("DR"	GO+14*
DIC("S"	GO+2, GO+3
DIC(0	GO+2, GO+14
DIE	GO+7*, OUT!
DINUM	GO+13*, OUT!
DIR	GO+6!, GO+9!, OUT!
DIR("A"	GO+6, GO+11
DIR(0	GO+6, GO+9, GO+11*
DIRUT	OUT!
DO	GO+14!
DR	GO+7*, OUT!
DTOUT	GO+9, GO+11, OUT!
DUOUT	GO+9, GO+11, OUT!
DUZ	HEADER+2
PSN	GO+1!, GO+4, GO+5, GO+9, GO+14, GO+15!, OUT!
PSN1	GO+1!, GO+2*, GO+4, GO+14, GO+15!, OUT!
PSN2	GO+1!, GO+3*, GO+4, GO+14, GO+15!, OUT!
PSNDF	GO+1*, OUT!
PSNIFN	OUT!, SEVMSG+1*, SEVMSG+4
PSNL	GO+4*, GO+5, OUT!, SEVMSG+1
PSNN	GO+1!, GO+11!, GO+15!, OUT!
PSNN(	GO+2, GO+3, GO+8
PSNN(""	GO+8
PSNNN	GO+1!, GO+8*, GO+10, GO+11!, GO+14, GO+15!, OUT!, ADDMSG+2
PSNSEV	OUT!
PSSFLTY	OUT!, SEVMSG+2, ADDMSG+1, HEADER+1*
PSSIIEN	OUT!, HEADER+1*
U	SEVMSG+1, SEVMSG+4, ADDMSG+3
X	GO+14*, OUT!
XMDUZ	OUT!, HEADER+2*
XMSUB	OUT!, SEVMSG+2, ADDMSG+1
XMTEXT	OUT!, SEVMSG+6, ADDMSG+4
XMY	OUT!
XMY("G.NDF SU	PPORT@ISCPNDF.ISC-BIRM.VA.GOV" , HEADER+2*
Y	GO+2, GO+3, GO+6, GO+7, GO+9, GO+11, OUT!, ADDMSG+3
Y(0	GO+2, GO+3, GO+10

Information