Routine: PSOCIDC1

Call Graph Total: 10

Package	Total	Call Graph
Kernel	3	^%ZTLOAD ($$DT,$$FMADD,$$FMTE,$$FMTH,$$HTE,$$NOW)^XLFDT (BMES,MES)^XPDUTL
Outpatient Pharmacy	3	(CANCEL,CHECK,TOTAL)^PSOCIDC2 MAIL3^PSOCIDC3 (MAIL,MAIL2)^PSOCIDC4
VA Fileman	3	DD^%DT NOW^%DTC ^DIR
Registration	1	ELIG^VADPT

Package	Total	Caller Graph
Outpatient Pharmacy	1	PSOCIDC3

Package

Total

Caller Graph

Outpatient Pharmacy

PSOCIDC3

Name	Comments	DBIA/ICR reference
STATUS	;show status of job running
QUIT	;
EN	;
NAMSP()	;
STOP	;stop job command
INITXTMP(NAMSP,TITLE,LIFE)	;create ^Xtmp according to SAC std
STP	;
ST()	;status

External References

Name	Field # of Occurrence
DD^%DT	EN+10
NOW^%DTC	EN+10
^%ZTLOAD	PSOCIDC1+74
^DIR	PSOCIDC1+29, PSOCIDC1+51
CANCEL^PSOCIDC2	EN+41
CHECK^PSOCIDC2	EN+37
TOTAL^PSOCIDC2	EN+42
MAIL3^PSOCIDC3	EN+22
MAIL^PSOCIDC4	EN+44
MAIL2^PSOCIDC4	EN+45
ELIG^VADPT	EN+35
$$DT^XLFDT	EN+12
$$FMADD^XLFDT	INITXTMP+3
$$FMTE^XLFDT	PSOCIDC1+41, EN+11, STATUS+4, STATUS+10
$$FMTH^XLFDT	PSOCIDC1+52, PSOCIDC1+55
$$HTE^XLFDT	PSOCIDC1+59
$$NOW^XLFDT	PSOCIDC1+36, PSOCIDC1+52, PSOCIDC1+63, PSOCIDC1+66, PSOCIDC1+68, EN+5, EN+21, EN+28, EN+43, INITXTMP+2
BMES^XPDUTL	PSOCIDC1+11, PSOCIDC1+37, PSOCIDC1+57, PSOCIDC1+61, PSOCIDC1+77, PSOCIDC1+78
MES^XPDUTL	PSOCIDC1+12, PSOCIDC1+58, PSOCIDC1+59, PSOCIDC1+60, PSOCIDC1+76

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,*7,"The last install of this patch you selected to NOT Run the Copay Correction process." Line Location: PSOCIDC1+23
Function Call: WRITE	Prompt: !,"If you have changed your mind, you must re-install the patch to run",!! Line Location: PSOCIDC1+24
Function Call: WRITE	Prompt: !,"Halting..." Line Location: PSOCIDC1+29
Function Call: WRITE	Prompt: !!,*7,"This job has been run before to completion on " Line Location: PSOCIDC1+40
Function Call: WRITE	Prompt: $$FMTE^XLFDT($P($G(^XTMP(NAMSP,0,"LAST")),"^",2)),!! Line Location: PSOCIDC1+41
Function Call: WRITE	Prompt: !,"Halting..." Line Location: PSOCIDC1+51
Function Call: WRITE	Prompt: !,"Currently processing:" Line Location: STATUS+2
Function Call: WRITE	Prompt: !,"COMPLETED ON ",$$FMTE^XLFDT($P($G(^XTMP($$NAMSP,0,"LAST")),"^",2)),! Line Location: STATUS+4
Function Call: WRITE	Prompt: !?5,"Released Date > ",$P(^XTMP($$NAMSP,0,"LAST"),"^",3) Line Location: STATUS+5
Function Call: WRITE	Prompt: !?5," RX # > ",$P(^XTMP($$NAMSP,0,"LAST"),"^",4) Line Location: STATUS+6
Function Call: WRITE	Prompt: !?5," TOTAL RX's > ",$P(^XTMP($$NAMSP,0,"LAST"),"^",5),! Line Location: STATUS+7
Function Call: WRITE	Prompt: !,"COMPLETED ON ",$$FMTE^XLFDT($P($G(^XTMP($$NAMSP,0,"LAST")),"^",2)),! Line Location: STATUS+10
Function Call: WRITE	Prompt: !,"Outpatient RX Copay Correction Job - set to STOP Soon" Line Location: STOP+2
Function Call: WRITE	Prompt: !!,"Check Status to be sure it has stopped and is not running..." Line Location: STOP+3
Function Call: WRITE	Prompt: !," (D STATUS^PSOCIDC1)" Line Location: STOP+4
Function Call: WRITE	Prompt: !,"* NOT CURRENTLY RUNNING! *",! Line Location: ST+3
Routine Call	DIR Line Location: PSOCIDC1+29 PSOCIDC1+51

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	EN+34
^PSRX - [#52]	EN+30, EN+33
^PSRX("AD"	EN+26, EN+29, EN+37
^XPD(9.7 - [#9.7]	EN+17, EN+18
^XTMP(	PSOCIDC1+10, PSOCIDC1+15, PSOCIDC1+21, PSOCIDC1+36, PSOCIDC1+39, PSOCIDC1+41, PSOCIDC1+63, PSOCIDC1+65, PSOCIDC1+66, PSOCIDC1+68 , PSOCIDC1+73, QUIT+1, EN+3, EN+5, EN+13, EN+14, EN+20, EN+21, EN+22, EN+25! , EN+27, EN+28, EN+32, EN+43, STP+1, STP+2, STATUS+3, STATUS+4, STATUS+5, STATUS+6 , STATUS+7, STATUS+9, STATUS+10, STOP+1, ST+1, ST+2, INITXTMP+4*

Label References

Name	Line Occurrences
$$NAMSP	PSOCIDC1+7, EN+1, STATUS+3, STATUS+4, STATUS+5, STATUS+6, STATUS+7, STATUS+9, STATUS+10, STOP+1 , ST+1, ST+2
$$ST	STATUS+1, STOP+1
INITXTMP	PSOCIDC1+15
QUIT	PSOCIDC1+13, PSOCIDC1+19, PSOCIDC1+34, PSOCIDC1+42, PSOCIDC1+45, PSOCIDC1+61
STP	EN+38, EN+41

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EN+9~, EN+10, EN+11
BEGDT	INITXTMP+1~, INITXTMP+2*, INITXTMP+3, INITXTMP+4
CC	EN+8~, EN+26*
DFN	EN+7~, EN+33*
DIR	PSOCIDC1+25!, PSOCIDC1+46!
DIR("?"	PSOCIDC1+50*
DIR("A"	PSOCIDC1+26, PSOCIDC1+27, PSOCIDC1+47*
DIR("B"	PSOCIDC1+48*
DIR(0	PSOCIDC1+28, PSOCIDC1+49
DT	EN+12*
DTOUT	PSOCIDC1+6~, PSOCIDC1+29, PSOCIDC1+52
DUOUT	PSOCIDC1+6~, PSOCIDC1+29, PSOCIDC1+51
FOUND	EN+8~
I	EN+9~
JOBN	PSOCIDC1+6~, PSOCIDC1+8*, PSOCIDC1+11, PSOCIDC1+47, PSOCIDC1+58, PSOCIDC1+61, PSOCIDC1+71, STP+4!
LIFE	INITXTMP~, INITXTMP+3
LIN	EN+9~
NAMSP	PSOCIDC1+6~, PSOCIDC1+7, PSOCIDC1+10, PSOCIDC1+15, PSOCIDC1+21, PSOCIDC1+36, PSOCIDC1+39, PSOCIDC1+41, PSOCIDC1+63, PSOCIDC1+65 , PSOCIDC1+66, PSOCIDC1+68, PSOCIDC1+73, QUIT+1, EN+1~, EN+3, EN+5, EN+13, EN+14, EN+20 , EN+21, EN+22, EN+25, EN+27, EN+28, EN+32, EN+43, STP+1, STP+2, INITXTMP~ , INITXTMP+4
PSOAMT	EN+8~
PSOCAMT	EN+8~
PSOCCNT	EN+7~, EN+40*
PSOCCNTS	EN+9~
PSOCNT	EN+7~, EN+40*
PSOCNTS	EN+9~
PSOCVETS	EN+7~
PSODFN	EN+8~, EN+33*, EN+34
PSODT	EN+7~, EN+13, EN+18, EN+19, EN+26*, EN+29, EN+32, EN+37
PSOEND	EN+7~
PSOEND2	EN+8~
PSOINST	EN+9~
PSOREL	EN+8~
PSOS1	EN+9~, EN+10*
PSOSCMX	EN+8~
PSOSCP	EN+9~, EN+35*, EN+37
PSOSTART	EN+7~, EN+10*
PSOSTNM	EN+9~
PSOSTRT2	EN+8~, EN+11*
PSOTC	EN+9~
PSOTEXT	EN+7~
PSOTIME	EN+9~
PSOTRF	EN+8~, EN+24*
PSOTRX	EN+7~, EN+24, EN+29, EN+32
PSOUAMT	EN+8~
PSOUCNT	EN+7~, EN+40*
PSOUCNTS	EN+9~
PSOUDFN	EN+8~
PSOUVETS	EN+7~
PSOVETS	EN+7~
PURGDT	INITXTMP+1~, INITXTMP+3*, INITXTMP+4
QUIT	PSOCIDC1+6~, PSOCIDC1+16, PSOCIDC1+19, PSOCIDC1+22, PSOCIDC1+29, PSOCIDC1+31
RUNOPT	PSOCIDC1+6~, PSOCIDC1+30, PSOCIDC1+31, PSOCIDC1+34, PSOCIDC1+35, PSOCIDC1+36, PSOCIDC1+37
RXP	EN+7~, EN+14, EN+29, EN+30, EN+32, EN+33, EN+37
STO	EN+9~
STOP	EN+25~, EN+26, EN+28, EN+38, EN+41
TITLE	INITXTMP~, INITXTMP+4
U	EN+35
VAEL	EN+35!
VAEL(3	EN+35
X1	EN+9~
XIEN	EN+7~, EN+17*, EN+18
XMY	EN+9~
XPDQUES	PSOCIDC1+79!
XPDQUES("POS1"	PSOCIDC1+19, PSOCIDC1+34, PSOCIDC1+35
XPDQUES("POS2"	PSOCIDC1+45, PSOCIDC1+55
XX	EN+7~
Y	PSOCIDC1+6~, PSOCIDC1+30, PSOCIDC1+52, EN+10
YY	EN+7~, EN+37*
ZTDESC	PSOCIDC1+6~, PSOCIDC1+71*
ZTDTH	PSOCIDC1+6~, PSOCIDC1+45, PSOCIDC1+51, PSOCIDC1+52, PSOCIDC1+55*, PSOCIDC1+59, PSOCIDC1+61
ZTIO	PSOCIDC1+6~, PSOCIDC1+70*
>> ZTQUEUED	EN+4, STP+3
>> ZTREQ	EN+4, STP+3
ZTRTN	PSOCIDC1+6~, PSOCIDC1+70*
>> ZTSAVE("JOBN"	PSOCIDC1+72*
ZTSK	PSOCIDC1+6~, PSOCIDC1+75, PSOCIDC1+76

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOCIDC1

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items