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

Package: Data Warehouse Export System

Routine: BDW10P4


Information

BDW10P4 ;ihs/cmi/maw - BDW Patch 4

Source Information

Source file <BDW10P4.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 3 (,IX)^DIC  (UPDATE,WP)^DIE  ^DIK  
Kernel 2 $$CJ^XLFSTR  MES^XPDUTL  
IHS Support HL7 Interfaces 1 (COMPILE,MPORT)^BHLU  

Entry Points

Name Comments DBIA/ICR reference
IMES ;
ADDZPR13 ;-- lets add the CPT Code Modifier field to GIS
GIS ;-- ADD PR1 CPT MODIFIER field here, and provider narrative
GISICD ;-- populate the ZV1-35 field of GIS, then recompile
ADDOIMC
RMIFC
SORRY(X) ;
MPORT ;-- import the INXPORT global
ENV ;-- environment check
INSTALLD(BDGSTAL) ;EP - Determine if patch BDGSTAL was installed, where
; BDGSTAL is the name of the INSTALL. E.g "AG*6.0*11".
POST ;post init
ADDIFC

External References

Name Field # of Occurrence
COMPILE^BHLU GIS+15, GISICD+12
MPORT^BHLU MPORT+1
^DIC INSTALLD+9, INSTALLD+13
IX^DIC INSTALLD+6
UPDATE^DIE ADDZPR13+8, ADDZPR13+19, ADDIFC+14
WP^DIE ADDOIMC+5
^DIK RMIFC+10
$$CJ^XLFSTR IMES+1, SORRY+4
MES^XPDUTL IMES+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM)
  • Line Location: SORRY+4
Function Call: WRITE
  • Prompt: !,"Error adding HL IHS DW1 ZPR-13 to the SCRIPT GENERATOR FIELD file"
  • Line Location: ADDZPR13+9
Function Call: WRITE
  • Prompt: !,"Error adding HL IHS DW1 ZPR-13 to the HL IHS DW1 ZPR segment"
  • Line Location: ADDZPR13+20
Routine Call
  • DIE
  • Line Location:
    • ADDZPR13+8
    • ADDZPR13+19
    • ADDIFC+14
Routine Call
  • DIC
  • Line Location:
    • INSTALLD+6
Routine Call
  • DIC
  • Line Location:
    • INSTALLD+9
    • INSTALLD+13
Routine Call
  • DIE
  • Line Location:
    • ADDOIMC+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^INTHL7M - [#4011] WP^DIE
^DIC(9.4 - [#9.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^INTHL7F - [#4012] GIS+4*, GIS+7*, GIS+10*, GISICD+4*, GISICD+7*
^INTHL7F("B" ADDZPR13+1, GIS+2, GIS+5, GIS+8, GISICD+2, GISICD+5
^INTHL7FT("B" ADDZPR13+5
^INTHL7M - [#4011] RMIFC+6, ADDIFC+6
^INTHL7M("B" RMIFC+2, ADDIFC+2, ADDOIMC+2, GIS+13, GISICD+10
^INTHL7S - [#4010] ADDZPR13+15
^INTHL7S("B" ADDZPR13+13, RMIFC+4, ADDIFC+4

Label References

Name Line Occurrences
$$INSTALLD ENV+1, ENV+2
ADDIFC POST+3
ADDOIMC POST+5
ADDZPR13 POST+2
GIS POST+7
GISICD POST+6
IMES INSTALLD+7, INSTALLD+10, INSTALLD+11, INSTALLD+15
MPORT POST+1
RMIFC POST+4
SORRY ENV+1, ENV+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARY ADDOIMC+1~
ARY(1 ADDOIMC+4*
BDGSTAL INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, INSTALLD+12, IMES+1
BDGY INSTALLD+3~, INSTALLD+14*, INSTALLD+16
BDWERR ADDZPR13+2~
BDWFDA ADDZPR13+2~
BDWFDA(4012 ADDZPR13+4*, ADDZPR13+5*, ADDZPR13+6*, ADDZPR13+7*
BDWFLD ADDZPR13+10*, ADDZPR13+11, ADDZPR13+15, ADDZPR13+17, ADDZPR13+21!
BDWIENS ADDZPR13+2~, ADDZPR13+3*, ADDZPR13+4, ADDZPR13+5, ADDZPR13+6, ADDZPR13+7
BDWIENS(1 ADDZPR13+10
BDWM GIS+11~, GIS+13*, GIS+14, GIS+15, GISICD+8~, GISICD+10*, GISICD+11, GISICD+12
BDWSEG ADDZPR13+12~, ADDZPR13+13*, ADDZPR13+14, ADDZPR13+15, ADDZPR13+16
BDWSERR ADDZPR13+12~
BDWSFDA ADDZPR13+12~
BDWSFDA( ADDZPR13+17*, ADDZPR13+18*
BDWSIENS ADDZPR13+12~, ADDZPR13+16*, ADDZPR13+17, ADDZPR13+18
BDWX GIS+1~, GIS+2*, GIS+3, GIS+4, GIS+5*, GIS+6, GIS+7, GIS+8*, GIS+9, GIS+10
, GISICD+1~, GISICD+2*, GISICD+3, GISICD+4, GISICD+5*, GISICD+6, GISICD+7
>> D INSTALLD+5*
DA RMIFC+8*, RMIFC+11!
DA(1 RMIFC+8*, RMIFC+9
DIC INSTALLD+3~, INSTALLD+5*, INSTALLD+8*, INSTALLD+12*
DIC(0 INSTALLD+5*
DIFQ SORRY+1!
DIK RMIFC+9*, RMIFC+11!
ERR ADDOIMC+1~
FDA ADDIFC+7~
FDA( ADDIFC+9*, ADDIFC+10*, ADDIFC+11*, ADDIFC+12*, ADDIFC+13*
FERR ADDIFC+7~
FIENS ADDIFC+7~, ADDIFC+8*, ADDIFC+9, ADDIFC+10, ADDIFC+11, ADDIFC+12, ADDIFC+13
I GIS+11~, GIS+12*, GIS+13, GISICD+8~, GISICD+9*, GISICD+10
IOM IMES+1, SORRY+4
MESS ADDIFC+1~, ADDIFC+2*, ADDIFC+3, ADDIFC+6, ADDIFC+8
MS RMIFC+1~, RMIFC+2*, RMIFC+3, RMIFC+6, RMIFC+8
MSG ADDOIMC+1~, ADDOIMC+2*, ADDOIMC+3, ADDOIMC+5
SEG ADDIFC+1~, ADDIFC+4*, ADDIFC+5, ADDIFC+6, ADDIFC+9
SG RMIFC+1~, RMIFC+4*, RMIFC+5, RMIFC+6
SGI RMIFC+1~, RMIFC+6*, RMIFC+7, RMIFC+8
X INSTALLD+3~, INSTALLD+4*, INSTALLD+8*, INSTALLD+12*, SORRY~, SORRY+2, SORRY+3
>> XPDQUIT SORRY+2*, SORRY+3*
Y INSTALLD+3~, INSTALLD+7, INSTALLD+8, INSTALLD+10, INSTALLD+12, INSTALLD+14, IMES+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All