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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BDWRDR

Package: Data Warehouse Export System

Routine: BDWRDR


Information

BDWRDR ; IHS/CMI/LAB - MAIN DRIVER DW EXPORT ;

Source Information

Source file <BDWRDR.m>

Call Graph

Call Graph Total: 19

Package Total Call Graph
Data Warehouse Export System 8 GIS^BDW1VBLI  $$UIDV^BDWAID  $$FLG^BDWBHL  (,ALPMR)^BDWRDR2  ^BDWRDRI  ERRBULL^BDWRDRI2  ^BDWRERR  $$ORF^BDWUTIL1  
VA Fileman 4 (COMMA,NOW)^%DTC  ^DIE  (,IX1)^DIK  ^DIR  
IHS VA Utilities 3 $$VAL^XBDIQ1  ^XBFMK  EN^XBVK  
IHS Patient 2 KILL^AUPNPAT  $$UID^AUPNVSIT  
IHS Support HL7 Interfaces 1 ($$DW1HDR,$$DW1MRG,$$DW1REG,$$DW1TRLR)^BHLEVENT  
Kernel 1 ($$FMADD,$$FMTE)^XLFDT  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Data Warehouse Export System 3 BDWBHL  BDWDDR  BDWREDO  

Entry Points

Name Comments DBIA/ICR reference
RESET ; kill ADW xref and set flag if tx 23 or 24 generated
QUEUE ;EP - called from option that can be scheduled to run automatically
SET
RST4AF(BDWLOG) ;EP
LOG ; UPDATE LOG
PROCESS ;
TR ;trailer report
PURGE2 ;
DRIVER ;EP called from TSKMN+2
PURGE ; PURGE 'ADW' XREF FOR VISITS JUST DONE
START ;EP - called from option
S ;
ABORT ; ABNORMAL TERMINATION
EOJ ; EOJ
C(X,X2,X3) ;
PROCESS3 ;
PROCESS2 ;
CHKLOG ; CHECK LOG FILE
RUNTIME ;EP - SHOW RUN

External References

Name Field # of Occurrence
COMMA^%DTC C+2
NOW^%DTC DRIVER+2, LOG+3
KILL^AUPNPAT PROCESS3+2, EOJ+5
$$UID^AUPNVSIT PROCESS3+11
GIS^BDW1VBLI PROCESS+1
$$UIDV^BDWAID PROCESS3+12
$$FLG^BDWBHL PROCESS+19, PROCESS+20, PROCESS+21, PROCESS+22, PROCESS+23
^BDWRDR2 PROCESS3+14
ALPMR^BDWRDR2 DRIVER+9
^BDWRDRI START+4, QUEUE+4
ERRBULL^BDWRDRI2 ABORT+2
^BDWRERR PROCESS3+10
$$ORF^BDWUTIL1 PROCESS+16
$$DW1HDR^BHLEVENT PROCESS+4
$$DW1MRG^BHLEVENT PROCESS+26
$$DW1REG^BHLEVENT PROCESS+28
$$DW1TRLR^BHLEVENT DRIVER+13
^DIE DRIVER+3, DRIVER+17, PROCESS+6, PROCESS3+11, PROCESS3+12, RESET+2, RST4AF+6, LOG+4, LOG+6, LOG+9
, LOG+12
^DIK PROCESS+12, PROCESS+13, PROCESS+14, PROCESS+16, RST4AF+7
IX1^DIK TR+36
^DIR START+8, DRIVER+20, ABORT+4
$$VAL^XBDIQ1 TR+2, TR+5, TR+6, TR+7, TR+9
^XBFMK PROCESS3+11, PROCESS3+12, TR+37, EOJ+4
EN^XBVK EOJ+6
$$FMADD^XLFDT PROCESS+7
$$FMTE^XLFDT TR+3, TR+29

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Okay, request queued!!",!!
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !!,"Bye",!!
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !,"Generating Registration HL7 messages (1)"
  • Line Location: PROCESS+3
Function Call: WRITE
  • Prompt: !,"-->There are more than 25 generations of ENCOUNTERs stored in the LOG file.",!,"-->Time to do a purge."
  • Line Location: CHKLOG+2
Function Call: WRITE
  • Prompt: !!,"Abnormal termination!! QFLG=",BDW("QFLG")
  • Line Location: ABORT+3
Routine Call
  • DIE
  • Line Location:
    • DRIVER+3
    • DRIVER+17
    • PROCESS+6
    • PROCESS3+11
    • PROCESS3+12
    • RESET+2
    • RST4AF+6
    • LOG+4
    • LOG+6
    • LOG+9
    • LOG+12
Routine Call
  • DIR
  • Line Location:
    • START+8
    • DRIVER+20
    • ABORT+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPAT - [#9000001] Classic Fileman Calls
^AUPNDWAF - [#9000003.3] Classic Fileman Calls
^AUPNVSIT - [#9000010] Classic Fileman Calls
^BDWXLOG - [#90213] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNDWAF - [#9000003.3] PROCESS+9, PROCESS+15, PROCESS+17, PROCESS+33, RST4AF+5
^AUPNPAT - [#9000001] PROCESS+12, RST4AF+2
^AUPNVSIT - [#9000010] PROCESS3+4, PROCESS3+8, PROCESS3+9, PROCESS3+11, PROCESS3+12
^AUPNVSIT("ADWO" PROCESS+45, PROCESS2+1, PROCESS3+4!, PROCESS3+10!, RESET+1!
^AUTTLOC - [#9999999.06] TR+14
^BDWERRC("B" ABORT+1
^BDWTMP( DRIVER+14*, PROCESS+5*, PROCESS+29*
^BDWXLOG - [#90213] PROCESS+32*, PROCESS+33*, PROCESS+34*, PROCESS+35*, PROCESS+36*, PROCESS+37*, PROCESS+38*, PROCESS+39*, PROCESS+40*, PROCESS3+3
, SET*, SET+1*, SET+2*, RST4AF+1, CHKLOG+1, TR+3, TR+4, TR+35*, S+2*
^DPT - [#2] PROCESS+13, PROCESS+14, PROCESS+15, RST4AF+3, RST4AF+4
^TMP($J PROCESS+2!, TR+12, TR+18, TR+19, TR+20, TR+27, TR+28, TR+29, EOJ+1!
^XTMP("BDWDR" PROCESS+7*, PROCESS+31*, PROCESS3+5*, PURGE+3, PURGE+4!, PURGE2+1, RESET+2

Label References

Name Line Occurrences
$$C TR+19, TR+20, TR+29
ABORT START+9, DRIVER+4, DRIVER+7, DRIVER+10, DRIVER+12, DRIVER+18, QUEUE+5
CHKLOG DRIVER+19
DRIVER QUEUE+6
EOJ START+5, START+6, START+7, DRIVER+21, ABORT+2, ABORT+5
LOG DRIVER+11
PROCESS DRIVER+6
PROCESS2 PROCESS+45
PROCESS3 PROCESS2+1
PURGE DRIVER+15
PURGE2 PURGE+3
RESET PURGE2+1
RUNTIME DRIVER+16
S TR+2, TR+3, TR+4, TR+5, TR+6, TR+7, TR+9, TR+10, TR+11, TR+14
, TR+15, TR+16, TR+17, TR+21, TR+22, TR+23, TR+24, TR+25, TR+26, TR+29
, TR+32, TR+33
SET PROCESS3+9

Naked Globals

Name Field # of Occurrence
^(0 PROCESS+40*, SET+2*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DRIVER+2!, LOG+3
%H DRIVER+2!
%I DRIVER+2!
AUPNVSIT EOJ+2!
B RUNTIME+1*, RUNTIME+3, RUNTIME+10!
>> BDW("ADDS" LOG+11
>> BDW("ALPMR" LOG+1, LOG+6
>> BDW("BT" DRIVER+1*, RUNTIME+1
>> BDW("CONTROL DATE" , PROCESS+44*, PROCESS+45*, PROCESS2+1, PROCESS3+4, PROCESS3+5, PROCESS3+10
>> BDW("COUNT" LOG+1*, LOG+4
>> BDW("DEL" PROCESS3+10*, LOG+8
>> BDW("DELS" LOG+11
>> BDW("DEMO" LOG+8
>> BDW("I" CHKLOG+1*
>> BDW("MAIN TX DATE" , DRIVER+2*
>> BDW("MFI" LOG+8
>> BDW("MODS" LOG+11
>> BDW("NO CAT" LOG+8
>> BDW("NO LOC" LOG+8
>> BDW("NO PAT" LOG+8
>> BDW("NO TYPE" , LOG+8
>> BDW("QFLG" START+6, START+7, START+9, DRIVER+4, DRIVER+7, DRIVER+10, DRIVER+12, DRIVER+18, PROCESS+45, PROCESS2+1
, ABORT+1, ABORT+3, LOG+4*, LOG+6*, LOG+9*, LOG+12*, QUEUE+5
>> BDW("QFLG1" ABORT+1*
>> BDW("REG" PROCESS+30*, LOG+1, LOG+6
>> BDW("RUN BEGI N" , PROCESS+44
>> BDW("RUN END" , PROCESS+45
>> BDW("RUN LOG" , DRIVER+3, DRIVER+13, DRIVER+17, PROCESS+4, PROCESS+6, PROCESS+32, PROCESS+33, PROCESS+34, PROCESS+35
, PROCESS+36, PROCESS+37, PROCESS+38, PROCESS+39, PROCESS+40, PROCESS3+3, SET, SET+1, SET+2, CHKLOG+1
, ABORT+1, LOG+4, LOG+6, LOG+8, LOG+11, TR+2, TR+3, TR+4, TR+5, TR+6
, TR+7, TR+9, TR+35, TR+36, S+2
>> BDW("RUN STAR T" , DRIVER+2*, DRIVER+3
>> BDW("RUN STOP " , LOG+3*, LOG+4
>> BDW("SKIP" LOG+4
>> BDW("V DFN" PROCESS2+1*, PROCESS3+3, PROCESS3+4, PROCESS3+5, PROCESS3+8, PROCESS3+9, PROCESS3+10, PROCESS3+11, PROCESS3+12, SET+1
, SET+2, PURGE2+1*, RESET+1, RESET+2
>> BDW("VISITS" LOG+1, LOG+6
>> BDW("VPROC" PROCESS3+6*, LOG+4
>> BDW("X" PROCESS+42!, CHKLOG+1*, CHKLOG+2
>> BDW("ZERO" LOG+8
BDWC PROCESS+42!
>> BDWCNT DRIVER+5*, PROCESS+9, PROCESS3+7, RESET+3
>> BDWCNT1 DRIVER+5*
>> BDWCNT2 DRIVER+5*
>> BDWCNTR PROCESS+9*, PROCESS+44*, PURGE+2*
>> BDWDATE TR+1*, TR+28*, TR+29
BDWDDR START+1!, QUEUE+1!
BDWDELF PROCESS+10!, PROCESS+15*, PROCESS+16, PROCESS+24, PROCESS+27, PROCESS+34, PROCESS+41!
BDWDELT PROCESS+10!, PROCESS+15*, PROCESS+26, PROCESS+41!
BDWDFN PROCESS+9*, PROCESS+12, PROCESS+13, PROCESS+14, PROCESS+15, PROCESS+16, PROCESS+17, PROCESS+19, PROCESS+20, PROCESS+21
, PROCESS+22, PROCESS+23, PROCESS+25, PROCESS+28, PROCESS+31, PROCESS+33, PROCESS+34, PROCESS+35, PROCESS+36, PROCESS+37
, PROCESS+38, PROCESS+39, PROCESS+40, PROCESS+42!
BDWE PROCESS3+1!
BDWE("ERROR" PROCESS3+10*
>> BDWIEDST DRIVER+14, PROCESS+5, PROCESS+29
>> BDWLC TR+1*, TR+13*, TR+35, S+1*, S+2
>> BDWLOC TR+1*, TR+12*, TR+14, TR+18, TR+19, TR+20, TR+27, TR+28, TR+29
>> BDWLOCC TR+1*, TR+13*, TR+14
BDWLOG RST4AF~, RST4AF+1
>> BDWMODE TR+1*
>> BDWMSGH PROCESS+4*, PROCESS+5, PROCESS+6, LOG+6
>> BDWMSGT DRIVER+13*, DRIVER+14, DRIVER+17
>> BDWO("QUEUE" START+5
>> BDWO("RUN" START+3*, PROCESS3+9, QUEUE+3*
>> BDWO("SCHEDULED" START+2*, QUEUE+2*
BDWR PROCESS+17!
BDWR("ALIAS" PROCESS+17*
BDWR("BASE" PROCESS+17*
BDWR("CHART" PROCESS+17*
BDWR("DEMO" PROCESS+17*
BDWR("ELIG" PROCESS+17*
BDWRMSG PROCESS+26*, PROCESS+28*, PROCESS+29, PROCESS+33, PROCESS+42!
>> BDWRUN DRIVER+17, RUNTIME+9*
BDWT PROCESS3+1!
>> BDWTYPE TR+1*, TR+18*, TR+19, TR+20, TR+27*, TR+28, TR+29
BDWV PROCESS3+1!
BDWV("TX GENE RATED" , PROCESS3+5*, SET+1
BDWV("V DATE" , PROCESS3+13*, PURGE+2*, PURGE+3*, PURGE2+1, RESET+1
BDWV("V REC" PROCESS3+8*, PROCESS3+9, PROCESS3+13
BDWVMSG PROCESS3+14!, SET+1
>> BDWX RST4AF+1*, RST4AF+2, RST4AF+3, RST4AF+4, RST4AF+5, RST4AF+7
>> BDWZINFL PROCESS+23*, PROCESS+39
>> BDWZRBFL PROCESS+19*, PROCESS+35
>> BDWZRCFL PROCESS+21*, PROCESS+37
>> BDWZRDFL PROCESS+22*, PROCESS+38
>> BDWZRLFL PROCESS+20*, PROCESS+36
DA START+8!, DRIVER+3*!, DRIVER+17*, DRIVER+20!, PROCESS+6!*, PROCESS+12*!, PROCESS+13*!, PROCESS+14*!, PROCESS+16*!, PROCESS3+11*
, PROCESS3+12*, RESET+2*!, RST4AF+5*, RST4AF+6!, RST4AF+7*!, ABORT+1*, ABORT+4!, LOG+4*, LOG+5!, LOG+6*
, LOG+7!, LOG+8*, LOG+10!, LOG+11*, TR+36*!
DIADD EOJ+3!
DIC SET+3!
DIE DRIVER+3*!, DRIVER+17*, PROCESS+6!*, PROCESS3+11*, PROCESS3+12*, SET+3!, RESET+2*!, RST4AF+5*, RST4AF+6!, ABORT+1*
, LOG+4*, LOG+5!, LOG+6*, LOG+7!, LOG+8*, LOG+10!, LOG+11*
DIK PROCESS+12*!, PROCESS+13*!, PROCESS+14*!, PROCESS+16*!, RST4AF+7*!, TR+36*!
DIR START+8!, DRIVER+20!, ABORT+4!
DIR("A" START+8*, DRIVER+20*, ABORT+4*
DIR(0 START+8*, DRIVER+20*, ABORT+4*
DIU LOG+7!, LOG+10!
DIV LOG+7!, LOG+10!
DLAYGO EOJ+3!
DR DRIVER+3*!, DRIVER+17*, PROCESS+6!*, PROCESS3+11*, PROCESS3+12*, SET+3!, RESET+2*!, RST4AF+5*, RST4AF+6!, ABORT+1*
, LOG+4*, LOG+5!, LOG+6*, LOG+7!, LOG+8*, LOG+10!, LOG+11*
DT PROCESS+7, TR+35
E RUNTIME+2*, RUNTIME+3, RUNTIME+10!
H RUNTIME+3*, RUNTIME+4*, RUNTIME+5, RUNTIME+8, RUNTIME+9, RUNTIME+10!
>> INA PROCESS+11*, PROCESS+26, PROCESS+28
>> INA("DELETE" PROCESS+10!, PROCESS+25*, PROCESS+41!
M RUNTIME+5*, RUNTIME+6*, RUNTIME+7, RUNTIME+8, RUNTIME+9, RUNTIME+10!
S RUNTIME+7*, RUNTIME+8, RUNTIME+9, RUNTIME+10!
T RUNTIME+3*, RUNTIME+5*, RUNTIME+7*, RUNTIME+10!
U PROCESS+7, PROCESS+14, PROCESS+15, PROCESS+17, PROCESS+33, PROCESS+34, PROCESS+35, PROCESS+36, PROCESS+37, PROCESS+38
, PROCESS+39, PROCESS+40, PROCESS3+9, PROCESS3+11, PROCESS3+12, SET+1, SET+2, RST4AF+4, RST4AF+5, TR+3
, TR+4, TR+14
X PROCESS+33*, TR+2*, TR+3*, TR+4*, TR+5*, TR+6*, TR+7*, TR+9*, TR+10*, TR+11*
, TR+14*, TR+15*, TR+16*, TR+17*, TR+19*, TR+20*, TR+22*, TR+23*, TR+24*, TR+25*
, TR+26*, TR+29*, TR+32*, TR+33*, C~, C+1, C+3, S+2, S+3!
X2 C~
X3 C~
>> Y RST4AF+5*, LOG+4, LOG+6, LOG+9, LOG+12
>> ZTQUEUED START+2, START+7, DRIVER+5, DRIVER+19, DRIVER+20, PROCESS+3, PROCESS+9, PROCESS+43, PURGE+1, ABORT+2
, LOG+1, LOG+2, EOJ+7, RUNTIME+8, QUEUE+2
>> ZTREQ EOJ+7*
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 |  Naked Globals |  Local Variables |  All