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

Package: Data Warehouse Export System

Routine: BDWSRP


Information

BDWSRP ; IHS/CMI/LAB - DW REPORT PRINT ;

Source Information

Source file <BDWSRP.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 3 DD^%DT  EN^DIQ1  ^DIR  
Data Warehouse Export System 1 ^BDWSRP5  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Data Warehouse Export System 2 BDWSR  BDWSRP5  

Entry Points

Name Comments DBIA/ICR reference
HEAD ;EP
HEAD1 ;
STATDB ;
OVERVIEW ;
START ;
TAPE ;
EOJ ;
PRINT ;
GEN ;

External References

Name Field # of Occurrence
DD^%DT START+3
^BDWSRP5 STATDB+1
EN^DIQ1 TAPE+3
^DIR START+8, HEAD+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: START+8
Function Call: WRITE
  • Prompt: !!
  • Line Location: OVERVIEW+2
Function Call: WRITE
  • Prompt: !!,"This Data Warehouse Export was processed on ",BDWSR("RUN DATE")," for Posting ",!,"Dates ",BDWSR("PRINT BEGIN")," to ",BDWSR("PRINT END"),". The following transactions were exported:"
  • Line Location: OVERVIEW+3
Function Call: WRITE
  • Prompt: !!?5,"Patient Registration updates: ",$P(^BDWXLOG(BDWSR("LOG"),0),U,11)
  • Line Location: OVERVIEW+4
Function Call: WRITE
  • Prompt: !?5," PCC Encounters: ",$P(^BDWXLOG(BDWSR("LOG"),0),U,18)
  • Line Location: OVERVIEW+5
Function Call: WRITE
  • Prompt: !?5," Total transactions exported: ",$P(^BDWXLOG(BDWSR("LOG"),0),U,6)
  • Line Location: OVERVIEW+6
Function Call: WRITE
  • Prompt: !!,"The Transmission Status for this Export is: "
  • Line Location: TAPE+1
Function Call: WRITE
  • Prompt: ^UTILITY("DIQ1",$J,90213,BDWSR("LOG"),.15,"E"),!
  • Line Location: TAPE+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $D(IOF)
  • Line Location: HEAD+4
Function Call: WRITE
  • Prompt: !?31,"Data Warehouse Transmission Summary Page ",BDWSR("PG")
  • Line Location: HEAD+4
Function Call: WRITE
  • Prompt: !,"Report Run Date: ",BDWSR("DTP"),?72,"Page ",BDWSR("PG")
  • Line Location: HEAD1+3
Function Call: WRITE
  • Prompt: !!?((80-BDWSR("LENG"))/2),"DATA WAREHOUSE TRANSMISSION SUMMARY FOR ",BDWSR("FAC PRINT")
  • Line Location: HEAD1+4
Function Call: WRITE
  • Prompt: !?20,"Date Export Run: ",BDWSR("RUN DATE")
  • Line Location: HEAD1+5
Routine Call
  • DIR
  • Line Location:
    • START+8
    • HEAD+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BDWXLOG - [#90213] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BDWXLOG - [#90213] START+3, OVERVIEW+4, OVERVIEW+5, OVERVIEW+6
^DIC(4 - [#4] START+2
^UTILITY("DIQ1" TAPE+4

Label References

Name Line Occurrences
HEAD START+5, OVERVIEW+1
HEAD1 HEAD+1
PRINT START+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BDW1 EOJ+1!
BDW2 EOJ+1!
BDW3 EOJ+1!, EOJ+2!
BDWLC EOJ+1!
BDWPTR EOJ+2!
>> BDWSR("DTP" HEAD1+3
>> BDWSR("FAC PR INT" , START+2*, HEAD1+2, HEAD1+4
>> BDWSR("LENG" HEAD1+2*, HEAD1+4
>> BDWSR("LOG" START+3, OVERVIEW+4, OVERVIEW+5, OVERVIEW+6, TAPE+3, TAPE+4
>> BDWSR("PG" START+4*, HEAD+1, HEAD+3*, HEAD+4, HEAD1+1*, HEAD1+3
>> BDWSR("PRINT BEGIN" , OVERVIEW+3, END" , OVERVIEW+3
>> BDWSR("QUIT" START+6!, OVERVIEW+1, STATDB+2, HEAD+2*
>> BDWSR("RUN DA TE" , START+3*, OVERVIEW+3, HEAD1+5
BDWT EOJ+1!, EOJ+2!
BDWTOTC EOJ+1!, EOJ+2!
BDWTOTO EOJ+1!, EOJ+2!
BDWWC EOJ+2!
BDWX EOJ+1!
DA TAPE+2!, TAPE+3*!
DIC TAPE+2!, TAPE+3*!
DIQ TAPE+2!, TAPE+3!
DIQ(0 TAPE+3*
DIR START+8!, HEAD+2!
DIR("A" START+8*
DIR(0 START+8*, HEAD+2*
DR TAPE+2!, TAPE+3*!
>> DTOUT HEAD+2
DUZ(2 START+2
G EOJ+3!
IO START+8, HEAD+2
IO(0 START+8, HEAD+2
IOF HEAD+4, HEAD1+1
IOSL OVERVIEW+1
IOST START+8, HEAD+2
U START+2, START+3, OVERVIEW+4, OVERVIEW+5, OVERVIEW+6
X EOJ+3!
Y START+3*, EOJ+3!, HEAD+2
Z EOJ+3!
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