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 |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SD53P234

Package: Scheduling

Routine: SD53P234


Information

SD53P234 ;ALB/RBS - Patch SD*5.3*234 Install Utility Routine ; 3/12/01 1:03pm

Source Information

Source file <SD53P234.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 2 ($$DT,$$FMTE,$$HTFM,$$NOW)^XLFDT  (BMES,MES)^XPDUTL  
Scheduling 2 STATUS^SCMCHLRR  $$UPCLNLST^SCMCUT  
MailMan 1 ^XMD  
Registration 1 $$SITE^VASITE  
VA Fileman 1 ($$GET1,GETS)^DIQ  

Entry Points

Name Comments DBIA/ICR reference
PRE ;Main entry point for Pre-init items.
MSG(SCTOT,SCTOTAL,SCXERR) ; send e-mail to user's
PROGCHK(XPDABORT) ;checks for necessary programmer variables
SETUP ; setup start processing time
; The ^XTMP global will be used as an audit trail for 30 days to
; prevent this process from running more than once.
; ^XTMP("SD53P234",0)=STRING
; STRING = 7 fields of data delimited by "^" up-arrow
; 1 = purge date = date ^XTMP global will be purged
; 2 = run date = date routine was run
; 3 = start d/t = start date & time of processing
; 4 = stop d/t = stop date & time of processing
; 5 = DUZ of User= ID # of user running process
; 6 = HL7 count = Total number or HL7's marked for retransmit
; 7 = TOTAL HL7'S that should be loaded from original Baseline.
ZPC(TRANI) ; count number of (#404.49,ien) pointers to Provider ID's
POST2 ;Loop (#404.471)-PCMM HL7 TRANSMISSION LOG file
; Search for HL7's with 'A'ccepted Status and Transmission D/T within
; the Beginning and Ending date's.
POST1 ;Update client/server files.
CNTZPC ; Total Number HL7's since Baseline Seeding to current date
; Output; SCTOTAL = total HL7's since Baseline seeding
;
ENV ;Main entry point for Environment check point.
POST ;Main entry point for Post-init items.
PARMCHK(XPDABORT) ;checks for proper param file ien
LOOP ;Loop thru PCMM HL7 TRANSMISSION LOG file and find every entry
; with STATUS="A", and re-transmit.
; Output; SCTOT = total marked counter
CHECK(SCP212) ; Determine whether or not the Baseline has run.
; Input: None
; Output:
; Function Value: Return date Baseline was run

External References

Name Field # of Occurrence
$$GET1^DIQ CHECK+13
GETS^DIQ LOOP+9
STATUS^SCMCHLRR LOOP+22
$$UPCLNLST^SCMCUT POST1+2
$$SITE^VASITE MSG+3
$$DT^XLFDT SETUP+14
$$FMTE^XLFDT ENV+9, MSG+14, MSG+15, MSG+18
$$HTFM^XLFDT SETUP+14
$$NOW^XLFDT MSG+5, SETUP+15
^XMD MSG+26
BMES^XPDUTL ENV+8, PROGCHK+3, PARMCHK+3
MES^XPDUTL ENV+9, ENV+10, ENV+11, PROGCHK+4, PROGCHK+5, PROGCHK+6, PARMCHK+4, PARMCHK+5, PARMCHK+6, POST1+3
, POST1+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SCTM(404.44 - [#404.44] GET1^DIQ
^SCPT(404.471 - [#404.471] GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SCPT(404.471 - [#404.471] LOOP+6, ZPC+4, ZPC+5, ZPC+6
^SCPT(404.49 - [#404.49] ZPC+7
^SCTM(404.44 - [#404.44] PARMCHK+2, CHECK+8
^TMP($J POST2+28!, CNTZPC+3, CNTZPC+5, ZPC+8*, CHECK+12!, CHECK+14, CHECK+17!
^XTMP("SD53P234" ENV+6, ENV+7, POST+2, POST2+23, POST2+26*, MSG+4, MSG+27*, SETUP+16*

Label References

Name Line Occurrences
CHECK POST2+12
CNTZPC POST2+18
LOOP POST2+16
MSG POST2+20, CHECK+10, CHECK+16, CHECK+21, CHECK+26
PARMCHK ENV+3
POST1 POST+4
POST2 POST+5
PROGCHK ENV+2
SETUP POST+3
ZPC LOOP+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIFROM MSG+2~
DT PROGCHK+2
DUZ PROGCHK+2, MSG+6, SETUP+15
DUZ(0 PROGCHK+2
SC1 POST2+5~, POST2+6*, MSG+23, CHECK+7*
SC2 POST2+5~, POST2+6*, MSG+24, CHECK+9*, CHECK+15*, CHECK+20*, CHECK+25*
SC3 POST2+5~, POST2+6*
SCARR LOOP+4~, LOOP+7!
SCARR( LOOP+11, LOOP+12, LOOP+13, LOOP+14, LOOP+15, LOOP+16
SCBDATE POST2+5~, POST2+9*, LOOP+19, CHECK+30*
SCEDATE POST2+5~, POST2+9*, LOOP+20, CHECK+24
SCERR LOOP+4~, LOOP+7!, LOOP+10
SCETIME MSG+2~, MSG+5*, MSG+15
SCP212 POST2+5~, POST2+6*, POST2+12, POST2+13, LOOP+18, MSG+18, CHECK~, CHECK+26*, CHECK+32*
SCSEQ CNTZPC+4~, CNTZPC+5*, ZPC+2~, ZPC+3*, ZPC+4*, ZPC+5
SCSEQI ZPC+2~, ZPC+3*, ZPC+5*, ZPC+6
SCSTIME MSG+2~, MSG+4*, MSG+14
SCTEXT MSG+2~
SCTEXT(1 MSG+10*
SCTEXT(10 MSG+20*
SCTEXT(11 MSG+21*
SCTEXT(12 MSG+22*
SCTEXT(13 MSG+23*
SCTEXT(14 MSG+24*
SCTEXT(15 MSG+25*
SCTEXT(2 MSG+11*
SCTEXT(3 MSG+12*
SCTEXT(4 MSG+13*
SCTEXT(5 MSG+14*
SCTEXT(6 MSG+15*
SCTEXT(7 MSG+16*
SCTEXT(8 MSG+17*
SCTEXT(9 MSG+18*
SCTOT POST2+5~, POST2+6*, POST2+20, POST2+24, LOOP+23*, MSG~, MSG+17
SCTOTAL POST2+5~, POST2+6*, POST2+20, POST2+25, CNTZPC+5*, MSG~, MSG+18
SCTRANDT LOOP+4~, LOOP+16*, LOOP+18, LOOP+19, LOOP+20
SCTRANI LOOP+4~, LOOP+5*, LOOP+6*, LOOP+8, LOOP+18, LOOP+22
SCX ENV+5~, ENV+7*, ENV+9, POST2+22~, POST2+23*, POST2+24*, POST2+25*, POST2+26, LOOP+4~, LOOP+8*
, LOOP+9, LOOP+11, LOOP+12, LOOP+13, LOOP+14, LOOP+15, LOOP+16, MSG+2~, MSG+4*, MSG+5*
, MSG+27, CHECK+5~, CHECK+13*, CHECK+19, CHECK+24, CHECK+26, CHECK+30, CHECK+32, SETUP+13~, SETUP+14*
, SETUP+15*, SETUP+16
SCXERR MSG~, MSG+19
SCXSITE MSG+2~, MSG+3*, MSG+8, MSG+11, MSG+12
SCZPCID ZPC+2~, ZPC+3*, ZPC+6*, ZPC+7, ZPC+8
TRANI ZPC~, ZPC+4, ZPC+5, ZPC+6
U ENV+9, PROGCHK+2, POST2+24, POST2+25, MSG+4, MSG+5, MSG+8, SETUP+14, SETUP+15
XMDUN MSG+2~
XMDUZ MSG+2~, MSG+6*
XMSUB MSG+2~, MSG+8*
XMTEXT MSG+2~, MSG+6*
XMY MSG+2~
XMY( MSG+6*
XMY("G.PCMM T ESTING@FORUM.VA.GOV" , MSG+7*
XMZ MSG+2~
XPDABORT ENV+1*, ENV+2, ENV+3, ENV+12*, ENV+13!, PROGCHK~, PROGCHK+7*, PARMCHK~, PARMCHK+7*
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All