Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: SDRPA00

Package: Scheduling

Routine: SDRPA00


Information

SDRPA00 ;BP-OIFO/OWAIN,ESW - Patient Appointment Information Transmission ;11/2/04 11:09am;2/24/08 11:25am

Source Information

Source file <SDRPA00.m>

Call Graph

Call Graph

Call Graph Total: 15

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 2 (,$$S,STAT)^%ZTLOAD  (BMES,MES)^XPDUTL  
MailMan 1 ^XMD  
Registration 1 $$SITE^VASITE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

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

Entry Points

Name Comments DBIA/ICR reference
EN ;manual entry
; SD*639 Disable Manual Startup PAIT Transmission option
START ;Tasked entry
; SD*639 Disable Taskman PAIT Transmission option
STMES ;generate start message
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

External References

Name Field # of Occurrence
^%DT EN+13
^%DTC GT90DAYS+3
NOW^%DTC START+31, START+44, START+66, START+120, STMES+6
^%ZTLOAD EN+19
$$S^%ZTLOAD START+54, START+99
STAT^%ZTLOAD EN+10, START+16
FILE^DICN START+32, START+78, START+130
^DIE START+33, START+57, START+79, START+86, START+131, START+136
^DIK START+97
$$GET1^DIQ START+52, START+59, START+107, START+108
GETS^DIQ STMES+3
$$RUNCK^SDRPA02 EN+8, START+8
MSGT^SDRPA04 START+54, START+99, START+144
$$STATUS^SDRPA05 START+67, START+120
SNDS19^SDRPA07 START+54, START+83, START+99, START+139, START+142
$$DPT^SDRPA08 START+74, START+126
$$DTCONV^SDRPA08 START+81, START+137
APPT^SDRPA08 START+81, START+137
$$SITE^VASITE STMES+8
^XMD START+29, STMES+24
BMES^XPDUTL EN+2, START+2
MES^XPDUTL EN+3, EN+4, START+3, START+4

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+8
Function Call: WRITE
  • Prompt: !,"A task is currently active."
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !,"Task # "_ZTSK_" queued!"
  • Line Location: EN+20
Function Call: WRITE
  • Prompt: !!,"Task not queued, check Taskman",!
  • Line Location: EN+21
Function Call: WRITE
  • Prompt: !!,"Task number: ",ZTSK,!
  • Line Location: EN+22
Function Call: WRITE
  • Prompt: !,"NOT AN INTERACTIVE OPTION...schedule through TaskMan",!!
  • Line Location: START+10
Routine Call
  • DIE
  • Line Location:
    • START+33
    • START+57
    • START+79
    • START+86
    • START+131
    • START+136

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+45, START+47, START+50, START+85, START+104
^HLCS(870 - [#870] STMES+2
^SDWL(409.6 - [#409.6] EN+9, EN+10, EN+16, START+12, START+14, START+16, START+38, START+39, START+41, START+56
, START+89, START+93, START+94!
^TMP("SDDPT" START+37!, START+54!, START+83!, START+99!, START+113, START+139!, START+142, START+143!

Label References

Name Line Occurrences
$$GT90DAYS START+71
STAT START+82, START+138
STMES START+35

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % STMES+7
>> %DT EN+13*
>> %DT("A" EN+12*
APPTID START+90~, START+91*, START+93*, START+94, START+97, START+136
ARRAY STMES+3~
ARRAY(870 STMES+5
CMY STMES+9~
CRUNID START+38~*, START+39, START+54, START+56, START+57, START+77, START+86, START+89, START+99, START+129
, START+144
DA START+33*, START+55~, START+57*, START+75~, START+79*, START+86*, START+97*, START+127~, START+131*, START+132~
, START+136*
DA(1 START+77*, START+97*, START+129*, START+135*
DFN START+7~, START+46~*, START+47*, START+50, START+52, START+59, START+67, START+74, START+78, START+81
, START+95*, START+104, START+107, START+108, START+113, START+120, START+126, START+130, START+137
DFNEND START+7~
DIC START+30*, START+33, START+75~, START+77*, START+79, START+127~, START+129*, START+131, START+132~, START+135*
, START+136
DIC("P" START+77*, START+129*
DIC(0 START+30*, START+77*, START+129*
DIE START+33*, START+55~, START+57*, START+79*, START+86*, START+131*, START+136*
DIK START+97~*
DO START+32!, START+78!, START+130!
DR START+33*, START+55~, START+57*, START+79*, START+86*, START+131*, START+136*
DT EN+13*
FIRST START+7~, START+40*, START+41*
REC EN+7~, START+90~, START+93*, START+94, START+95, START+101, START+102
RUNDT START+7~, START+39*
RUNID EN+7~, EN+9*, EN+10, EN+16, START+7~, START+42*, START+88*, START+89*, START+93, START+94
, START+97, START+135
RUNIDP START+7~
SD1 START+13~*, START+16*, START+25, START+26*
SD68 START+7~
SD6A START+7~, START+70*, START+72, START+79, START+122*, START+131
SD87 STMES+1~, STMES+4~*, STMES+5
SD870 STMES+1~, STMES+2*, STMES+3, STMES+4
SD8A START+7~, START+70*, START+72, START+79, START+122*, START+131
SDADT START+48~*, START+49*, START+50*, START+51, START+52, START+59, START+67, START+79, START+81, START+90~
, START+95*, START+97, START+104, START+107, START+108, START+113, START+120, START+131, START+137
SDAMX START+18~, STMES+9~
SDAMX(1 START+23*, STMES+15*
SDAMX(2 START+24*, STMES+16*
SDAMX(3 START+25*, START+27*, STMES+17*
SDAMX(4 START+25*, START+28*, STMES+20*
SDAMX(5 STMES+21*
SDAMX(6 STMES+22*
SDAMX(7 STMES+23*
SDBCID START+54~, START+83, START+99~, START+139, START+142
SDCE START+74~, START+100~, START+126~
SDCL START+58~, START+59*, START+60, START+67, START+69*, START+79, START+81, START+100~, START+108*, START+109
, START+110, START+117, START+119*, START+120, START+123*, START+131, START+137
SDCLL START+69~*, START+123~*
SDCLO START+100~, START+101*, START+110*, START+117, START+119
SDCNT START+7~, START+36*, START+54*, START+99*
SDCNT0 START+7~
SDCOA START+73~*, START+122~*
SDCON EN+11~*, EN+13, EN+16*, EN+18
SDD START+55~, START+56*, START+57, START+85~*, START+86, START+104~*
SDDAM START+7~, START+43*, START+45*, START+47, START+50, START+52, START+71, START+79, START+81, START+100~
, START+107*, START+111*, START+117, START+119*, START+131, START+137
SDDAMO START+100~, START+102*, START+103, START+104*, START+105, START+111, START+117, START+119
SDDT STMES+7~*, STMES+17
SDF START+42~*, START+82, START+138, STAT~, STAT+2*
SDFF START+82*, START+138*, STAT~, STAT+2
SDFIN START+42~*, START+54, START+82, START+99, START+138, START+144, STAT~, STAT+1*
SDI EN+7~, EN+19*
SDLAST START+55~, START+56*
SDMCID START+54~, START+83, START+99~, START+139, START+142
SDMSHA START+73~*, START+122~*
SDOUT START+7~, START+36*, START+45, START+47, START+50, START+54*, START+84, START+89, START+93, START+99*
, START+141
SDPEN START+42~*, START+54, START+82, START+99, START+138, START+144, STAT~, STAT+2*
SDPR START+7~, START+12*, START+13, START+14, START+16, START+24, START+40, START+41
SDPREV START+7~, START+40*, START+41*, START+43
SDREJ START+100~, START+102*, START+125, START+134
SDRET START+75~, START+76~*, START+79, START+128~*, START+131, START+134~*, START+136
SDS STMES+1~
SDST STMES+7~, STMES+8*, STMES+10, STMES+17, STMES+20
SDSTAT START+58~, START+67*, START+68, START+69, START+70, START+73, START+81, START+82, START+100~, START+116*
, START+119*, START+120*, START+121, START+122, START+123, START+124, START+137, START+138, STMES+5*, STMES+17
, STMES+19
SDSTOP START+54~*, START+99~*
SDSTTY START+58~, START+70*, START+71, START+72, START+76, START+82, START+124*, START+125, START+128, START+138
, STAT~, STAT+1, STAT+2
SDTODAY START+120~*
SDTR START+42~*, START+83*, START+139*
STODAY START+66~*, START+67
TODAY START+7~, START+31*, START+44*, START+45, START+85
U EN+16, START+14, START+41, START+56, START+69, START+70, START+73, START+119, START+122, START+123
, START+124
X START+31, START+44, START+66, START+75~, START+78*, START+120, START+127~, START+130*, GT90DAYS+4
X1 GT90DAYS~
X2 GT90DAYS~
XMDUZ START+18~, START+22*, STMES+9~, STMES+14*
XMSUB START+18~, START+19*, STMES+9~, STMES+10*
XMTEXT START+18~, START+21*, STMES+9~, STMES+13*
XMY START+18~
XMY("G.SD-PAIT" START+20*, STMES+11*
XMY("S.SD-PAIT-SERVER@DOMAIN.EXT" STMES+12*
XMY("VHACIONHD@DOMAIN.EXT" STMES+19*
Y EN+7~, EN+13, EN+14, START+33, START+79, START+131
ZTDESC EN+7~, EN+15*
ZTDTH EN+7~, EN+14*
ZTIO EN+7~, EN+14*
ZTRTN EN+7~, EN+14*
ZTSAVE EN+7~
ZTSK EN+7~, EN+10*, EN+11!, EN+19, EN+20, EN+21, EN+22, START+9, START+11, START+15~
, START+16*, START+24, START+33, START+38, START+54, START+83, START+99, START+139, START+142, STMES+15
, STMES+17
ZTSK(1 EN+10, START+16
ZTSKN START+7~, START+11*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All