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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BDW1VBLR

Package: Data Warehouse Export System

Routine: BDW1VBLR


Information

BDW1VBLR ;IHS/CMI/LAB - RESET visit backload log;

Source Information

Source file <BDW1VBLR.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 5 ^DIC  ^DIE  ^DIK  EN^DIQ  ^DIR  
IHS Support HL7 Interfaces 1 $$DW1TRLR^BHLEVENT  
IHS VA Utilities 1 EN^XBVK  
Kernel 1 $$FMADD^XLFDT  

Entry Points

Name Comments DBIA/ICR reference
DISP ;
EOJ ;
RUNTIME ;
DIQ ; CALL TO DIQ
DIK ;

External References

Name Field # of Occurrence
$$DW1TRLR^BHLEVENT BDW1VBLR+11
^DIC BDW1VBLR+6
^DIE BDW1VBLR+15
^DIK DIK+1
EN^DIQ DIQ+2
^DIR BDW1VBLR+9
EN^XBVK EOJ+1
$$FMADD^XLFDT BDW1VBLR+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This routine will reset the Data Warehouse Export Log. You must be",!,"absolutely sure that you have corrected the underlying problem that caused ","the Export process to fail in the first place!",!!
  • Line Location: BDW1VBLR+3
Function Call: WRITE
  • Prompt: "The Data Warehouse Export log entry you choose will be REMOVED from the log",!,"log file and all Utility and Data globals associated with that run will ",!,"be killed!!",!!
  • Line Location: BDW1VBLR+4
Function Call: WRITE
  • Prompt: "You must now select the Log Entry to be RESET. <<< SELECT CAREFULLY >>>",!
  • Line Location: BDW1VBLR+5
Function Call: WRITE
  • Prompt: !!,"Goodbye"
  • Line Location: BDW1VBLR+6
Function Call: WRITE
  • Prompt: !!,"Log has been reset",!
  • Line Location: BDW1VBLR+16
Function Call: WRITE
  • Prompt: !!,"Information for Log Entry ",BDW("RUN LOG"),!
  • Line Location: DIQ+1
Routine Call
  • DIE
  • Line Location:
    • BDW1VBLR+15
Routine Call
  • DIC
  • Line Location:
    • BDW1VBLR+6
Routine Call
  • DIR
  • Line Location:
    • BDW1VBLR+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT - [#9000010] BDW1VBLR+13
^BDWBLOG( BDW1VBLR+12, BDW1VBLR+13
^BDWDATA DIK+4!
^BDWTMP( DIK+3!
^XTMP("BDWBLOG" DIK+2!

Label References

Name Line Occurrences
DISP BDW1VBLR+8
EOJ BDW1VBLR+6, BDW1VBLR+10, BDW1VBLR+17, DIK+5
RUNTIME BDW1VBLR+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
B RUNTIME+1*, RUNTIME+3, RUNTIME+10!
>> BDW("RUN LOG" , BDW1VBLR+7*, BDW1VBLR+11, BDW1VBLR+12, BDW1VBLR+13, BDW1VBLR+15, DIK+1, DIQ+1, DIQ+2, EOJ+2!
>> BDW("RUN STAR T" , BDW1VBLR+12*, RUNTIME+1
>> BDW("RUN STOP " , BDW1VBLR+12*, RUNTIME+2
>> BDW1L BDW1VBLR+13*
>> BDWED BDW1VBLR+13*, BDW1VBLR+15
>> BDWRT BDW1VBLR+15, RUNTIME+9*
>> BDWTM BDW1VBLR+11*, BDW1VBLR+15
DA BDW1VBLR+15*, DIK+1*, DIQ+2*, DIQ+3!, EOJ+2!
DIC BDW1VBLR+6*!, DIQ+2*, DIQ+3!
DIC("S" BDW1VBLR+6*
DIC(0 BDW1VBLR+6*
>> DIE BDW1VBLR+15*
DIK DIK+1*, EOJ+2!
DIQ DIQ+3!
DIQ(0 DIQ+2*
DIR BDW1VBLR+9!, EOJ+2!
DIR("A" BDW1VBLR+9*
DIR("B" BDW1VBLR+9*
DIR(0 BDW1VBLR+9*
DIRUT BDW1VBLR+9*, EOJ+2!
DR BDW1VBLR+15*, DIQ+2*, DIQ+3!
>> DUOUT BDW1VBLR+9
E RUNTIME+2*, RUNTIME+3, RUNTIME+10!
H RUNTIME+3*, RUNTIME+4*, RUNTIME+5, RUNTIME+9, RUNTIME+10!
M RUNTIME+5*, RUNTIME+6*, RUNTIME+7, RUNTIME+9, RUNTIME+10!
S RUNTIME+7*, RUNTIME+9, RUNTIME+10!
T RUNTIME+3*, RUNTIME+5*, RUNTIME+7*, RUNTIME+10!
U BDW1VBLR+12, BDW1VBLR+13
X EOJ+2!
Y BDW1VBLR+6, BDW1VBLR+7, BDW1VBLR+10, EOJ+2!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All