Routine: SDRPA00

Package	Total	Call Graph
VA Fileman	6	^%DT (,NOW)^%DTC FILE^DICN ^DIE ^DIK ($$GET1,GETS)^DIQ
Scheduling	5	$$RUNCK^SDRPA02 MSGT^SDRPA04 $$STATUS^SDRPA05 SNDS19^SDRPA07 ($$DPT,$$DTCONV,APPT)^SDRPA08
Kernel	1	(,$$S,STAT)^%ZTLOAD
MailMan	1	^XMD
Registration	1	$$SITE^VASITE

Package	Total	Caller Graph
Scheduling	2	SD-PAIT MANUAL TRANSMISSION SD-PAIT TASKED TRANSMISSION

Entry Points

Name	Comments	DBIA/ICR reference
START	;Tasked entry
EN	;manual entry
GT90DAYS(X1,X2)	; Date is older than Sep 1st 2003, see specs. ; X1 - creation date. More efficient to have it set at the top instead of every time this subroutine is called. ; X2 - comparison date, now sent as Sep 1 2003, both in Vista format cyymmdd
STAT(SDSTTY,SDFF,SDFIN,SDPEN,SDF)	;summarize pending and finals
STMES	;generate start message

External References

Name	Field # of Occurrence
^%DT	EN+7
^%DTC	GT90DAYS+3
NOW^%DTC	START+25, START+38, START+60, START+114, STMES+6
^%ZTLOAD	EN+13
$$S^%ZTLOAD	START+48, START+93
STAT^%ZTLOAD	EN+4, START+10
FILE^DICN	START+26, START+72, START+124
^DIE	START+27, START+51, START+73, START+80, START+125, START+130
^DIK	START+91
$$GET1^DIQ	START+46, START+53, START+101, START+102
GETS^DIQ	STMES+3
$$RUNCK^SDRPA02	EN+2, START+2
MSGT^SDRPA04	START+48, START+93, START+138
$$STATUS^SDRPA05	START+61, START+114
SNDS19^SDRPA07	START+48, START+77, START+93, START+133, START+136
$$DPT^SDRPA08	START+68, START+120
$$DTCONV^SDRPA08	START+75, START+131
APPT^SDRPA08	START+75, START+131
$$SITE^VASITE	STMES+8
^XMD	START+23, STMES+24

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"You attempted to start PAIT outside the authorized transmission dates.",!,"Job has been terminated.",! Line Location: EN+2
Function Call: WRITE	Prompt: !,"A task is currently active." Line Location: EN+4
Function Call: WRITE	Prompt: ! Line Location: EN+7
Function Call: WRITE	Prompt: !,"Task # "_ZTSK_" queued!" Line Location: EN+14
Function Call: WRITE	Prompt: !!,"Task not queued, check Taskman",! Line Location: EN+15
Function Call: WRITE	Prompt: !!,"Task number: ",ZTSK,! Line Location: EN+16
Function Call: WRITE	Prompt: !,"NOT AN INTERACTIVE OPTION...schedule through TaskMan",!! Line Location: START+4
Routine Call	DIE Line Location: START+27 START+51 START+73 START+80 START+125 START+130

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
2.98	GET1^DIQ
^HLCS(870 - [#870]	GETS^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT("ASADM"	START+39, START+41, START+44, START+79, START+98
^HLCS(870 - [#870]	STMES+2
^SDWL(409.6 - [#409.6]	EN+3, EN+4, EN+10, START+6, START+8, START+10, START+32, START+33, START+35, START+50 , START+83, START+87, START+88!
^TMP("SDDPT"	START+31!, START+48!, START+77!, START+93!, START+107, START+133!, START+136, START+137!

Label References

Name	Line Occurrences
$$GT90DAYS	START+65
STAT	START+76, START+132
STMES	START+29

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	STMES+7
>> %DT	EN+7*
>> %DT("A"	EN+6*
APPTID	START+84~, START+85, START+87, START+88, START+91, START+130
ARRAY	STMES+3~
ARRAY(870	STMES+5
CMY	STMES+9~
CRUNID	START+32~*, START+33, START+48, START+50, START+51, START+71, START+80, START+83, START+93, START+123 , START+138
DA	START+27, START+49~, START+51, START+69~, START+73, START+80, START+91, START+121~, START+125, START+126~ , START+130*
DA(1	START+71, START+91, START+123, START+129
DFN	START+1~, START+40~, START+41, START+44, START+46, START+53, START+61, START+68, START+72, START+75 , START+89*, START+98, START+101, START+102, START+107, START+114, START+120, START+124, START+131
DFNEND	START+1~
DIC	START+24, START+27, START+69~, START+71, START+73, START+121~, START+123, START+125, START+126~, START+129 , START+130
DIC("P"	START+71, START+123
DIC(0	START+24, START+71, START+123*
DIE	START+27, START+49~, START+51, START+73, START+80, START+125, START+130
DIK	START+91~*
DO	START+26!, START+72!, START+124!
DR	START+27, START+49~, START+51, START+73, START+80, START+125, START+130
DT	EN+7*
FIRST	START+1~, START+34, START+35
REC	EN+1~, START+84~, START+87*, START+88, START+89, START+95, START+96
RUNDT	START+1~, START+33*
RUNID	EN+1~, EN+3, EN+4, EN+10, START+1~, START+36, START+82, START+83, START+87, START+88 , START+91, START+129
RUNIDP	START+1~
SD1	START+7~, START+10, START+19, START+20*
SD68	START+1~
SD6A	START+1~, START+64, START+66, START+73, START+116, START+125
SD87	STMES+1~, STMES+4~*, STMES+5
SD870	STMES+1~, STMES+2*, STMES+3, STMES+4
SD8A	START+1~, START+64, START+66, START+73, START+116, START+125
SDADT	START+42~, START+43, START+44, START+45, START+46, START+53, START+61, START+73, START+75, START+84~ , START+89, START+91, START+98, START+101, START+102, START+107, START+114, START+125, START+131
SDAMX	START+12~, STMES+9~
SDAMX(1	START+17, STMES+15
SDAMX(2	START+18, STMES+16
SDAMX(3	START+19, START+21, STMES+17*
SDAMX(4	START+19, START+22, STMES+20*
SDAMX(5	STMES+21*
SDAMX(6	STMES+22*
SDAMX(7	STMES+23*
SDBCID	START+48~, START+77, START+93~, START+133, START+136
SDCE	START+68~, START+94~, START+120~
SDCL	START+52~, START+53, START+54, START+61, START+63, START+73, START+75, START+94~, START+102, START+103 , START+104, START+111, START+113, START+114, START+117*, START+125, START+131
SDCLL	START+63~, START+117~
SDCLO	START+94~, START+95, START+104, START+111, START+113
SDCNT	START+1~, START+30, START+48, START+93*
SDCNT0	START+1~
SDCOA	START+67~, START+116~
SDCON	EN+5~, EN+7, EN+10, EN+12
SDD	START+49~, START+50, START+51, START+79~, START+80, START+98~*
SDDAM	START+1~, START+37, START+39, START+41, START+44, START+46, START+65, START+73, START+75, START+94~ , START+101, START+105, START+111, START+113*, START+125, START+131
SDDAMO	START+94~, START+96, START+97, START+98, START+99, START+105, START+111, START+113
SDDT	STMES+7~*, STMES+17
SDF	START+36~, START+76, START+132, STAT~, STAT+2
SDFF	START+76, START+132, STAT~, STAT+2
SDFIN	START+36~, START+48, START+76, START+93, START+132, START+138, STAT~, STAT+1
SDI	EN+1~, EN+13*
SDLAST	START+49~, START+50*
SDMCID	START+48~, START+77, START+93~, START+133, START+136
SDMSHA	START+67~, START+116~
SDOUT	START+1~, START+30, START+39, START+41, START+44, START+48, START+78, START+83, START+87, START+93* , START+135
SDPEN	START+36~, START+48, START+76, START+93, START+132, START+138, STAT~, STAT+2
SDPR	START+1~, START+6*, START+7, START+8, START+10, START+18, START+34, START+35
SDPREV	START+1~, START+34, START+35, START+37
SDREJ	START+94~, START+96*, START+119, START+128
SDRET	START+69~, START+70~, START+73, START+122~, START+125, START+128~*, START+130
SDS	STMES+1~
SDST	STMES+7~, STMES+8*, STMES+10, STMES+17, STMES+20
SDSTAT	START+52~, START+61, START+62, START+63, START+64, START+67, START+75, START+76, START+94~, START+110 , START+113, START+114, START+115, START+116, START+117, START+118, START+131, START+132, STMES+5*, STMES+17 , STMES+19
SDSTOP	START+48~, START+93~
SDSTTY	START+52~, START+64, START+65, START+66, START+70, START+76, START+118, START+119, START+122, START+132 , STAT~, STAT+1, STAT+2
SDTODAY	START+114~*
SDTR	START+36~, START+77, START+133*
STODAY	START+60~*, START+61
TODAY	START+1~, START+25, START+38, START+39, START+79
U	EN+10, START+8, START+35, START+50, START+63, START+64, START+67, START+113, START+116, START+117 , START+118
X	START+25, START+38, START+60, START+69~, START+72, START+114, START+121~, START+124, GT90DAYS+4
X1	GT90DAYS~
X2	GT90DAYS~
XMDUZ	START+12~, START+16, STMES+9~, STMES+14
XMSUB	START+12~, START+13, STMES+9~, STMES+10
XMTEXT	START+12~, START+15, STMES+9~, STMES+13
XMY	START+12~
XMY("G.SD-PAIT"	START+14, STMES+11
XMY("S.SD-PAIT-SERVER@FORUM.VA.GOV"	STMES+12*
XMY("VHACIONHD@MED.VA.GOV"	STMES+19*
Y	EN+1~, EN+7, EN+8, START+27, START+73, START+125
ZTDESC	EN+1~, EN+9*
ZTDTH	EN+1~, EN+8*
ZTIO	EN+1~, EN+8*
ZTRTN	EN+1~, EN+8*
ZTSAVE	EN+1~
ZTSK	EN+1~, EN+4, EN+5!, EN+13, EN+14, EN+15, EN+16, START+3, START+5, START+9~ , START+10, START+18, START+27, START+32, START+48, START+77, START+93, START+133, START+136, STMES+15 , STMES+17
ZTSK(1	EN+4, START+10
ZTSKN	START+1~, START+5*

Customize PDF page

Package: Scheduling

Routine: SDRPA00

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: