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: BDW1VBLZ

Package: Data Warehouse Export System

Routine: BDW1VBLZ


Information

BDW1VBLZ ;IHS/CMI/LAB - rerun visit backload log;

Source Information

Source file <BDW1VBLZ.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Data Warehouse Export System 2 DRIVER^BDW1VBL  (BASICS,CHKSITE,QUEUE)^BDW1VBLI  
VA Fileman 2 ^DIC  ^DIR  
IHS VA Utilities 1 EN^XBVK  
Kernel 1 $$ADD^XPDMENU  

Entry Points

Name Comments DBIA/ICR reference
START ;
INIT ;EP
POST ;EP
RDD ;
EOJ ;

External References

Name Field # of Occurrence
DRIVER^BDW1VBL START+15
BASICS^BDW1VBLI START+3
CHKSITE^BDW1VBLI START+4
QUEUE^BDW1VBLI START+12
^DIC INIT+1
^DIR START+8, RDD+1
EN^XBVK START+1, EOJ+1
$$ADD^XPDMENU POST+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"^BDWTMP exists from previous run"
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !!,"^BDWDATA EXISTS FROM PREVIOUS RUN"
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !!,"Bye",!!
  • Line Location: START+9
Function Call: WRITE
  • Prompt: !!,"Bye",!!
  • Line Location: START+11
Function Call: WRITE
  • Prompt: !!,"Bye",!!
  • Line Location: START+13
Function Call: WRITE
  • Prompt: !!,"Okay your request is queued!",!!
  • Line Location: START+14
Function Call: WRITE
  • Prompt: !!,"Log entry ",BDW("RUN LOG")," was for date range ",BDW("PRINT BEGIN")," through",!,BDW("PRINT END")," and generated ",BDW("COUNT")," transactions from ",BDW("OLD VISITS")," visits."
  • Line Location: INIT+9
Function Call: WRITE
  • Prompt: !!,"This routine will re-generate the Data Warehouse Encounter Records."
  • Line Location: INIT+11
Function Call: WRITE
  • Prompt: "Attempt to add VISIT BACKLOAD RERUN option failed."
  • Line Location: POST+2
Routine Call
  • DIC
  • Line Location:
    • INIT+1
Routine Call
  • DIR
  • Line Location:
    • START+8
    • RDD+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BDWBLOG( INIT+5, INIT+8
^BDWDATA START+6
^DD("DD" INIT+6, INIT+7

Label References

Name Line Occurrences
EOJ START+6, START+7, START+9, START+11, START+13, START+14
INIT START+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BDW("COUNT" INIT+5*, INIT+9, RDD+3*
>> BDW("OLD VISI TS" , INIT+8*, INIT+9
>> BDW("ORIG TX DATE" , INIT+5*
>> BDW("PRINT BE GIN" , INIT+6*, INIT+9
>> BDW("PRINT EN D" , INIT+7*, INIT+9
>> BDW("QFLG" START+7, START+9, START+11, START+13, INIT+2*, RDD+2*
>> BDW("RUN BEGI N" , INIT+5*, INIT+6
>> BDW("RUN END" , INIT+5*, INIT+7
>> BDW("RUN LOG" , INIT+3*, INIT+5, INIT+8, INIT+9
>> BDWO("QUEUE" START+14
>> BDWO("RUN" START+2*
DA START+8!, RDD+1!
DIC INIT+1*!
DIC("S" INIT+1*
DIC(0 INIT+1*
DIR START+8!, RDD+1!
DIR("A" START+8*, RDD+1*
DIR("B" RDD+1*
DIR(0 START+8*, RDD+1*
>> DIRUT RDD+2
U INIT+5, INIT+8
X INIT+5*, POST+1~*, POST+2
>> Y INIT+2, INIT+3, INIT+6*, INIT+7*, RDD+2
>> ZTQUEUED START+7
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All