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

Package: Integrated Billing

Routine: IBCRHBR1


Information

IBCRHBR1 ;ALB/ARH - RATES: UPLOAD HOST FILES (RC) SETUP ; 10-OCT-1998

Source Information

Source file <IBCRHBR1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Integrated Billing 3 $$PROD^IBCORC  $$LOAD^IBCRHBR2  FILES^IBCRHBRV  
Kernel 1 ($$LIST,$$PWD)^%ZISH  
VA FileMan 1 ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Integrated Billing 1 IBCRHBR  

Entry Points

Name Comments DBIA/ICR reference
HOSTLOAD(VERS) ; upload national REASONABLE CHARGES files from Host files into ^XTMP
HLEND
CONT(FILES) ; check for existing files stored in XTMP with same subscript
; returns true if user wants to continue, any existing files are deleted
CONT1() ; get final OK to start upload, return true if want to continue with upload
PATH() ; return directory or -1
FNDXTMP(FILES) ; find if any existing files in XTMP, return true if any found
DSPXTMP(FILES,ARR) ; display any existing files in XTMP, ARR passed by ref can be used to get list of existing file subscripts
FNDHOST(FILES,IBPATH) ; find and display any Host files available for upload, return true if all required files found
RELOAD() ; check for existing files stored in XTMP with same subscript (these may be reloaded or re-used)
; returns 0 if host files already loaded/defined, 1 if not defined and need to be loaded, -1 if ^
TMESS ; display message for test accounts (IB*2*138: loading test version of files not needed after release of v1)
PROD() ; return true if production version of the files should be loaded

External References

Name Field # of Occurrence
$$LIST^%ZISH FNDHOST+7
$$PWD^%ZISH PATH+3, PATH+4
^DIR CONT+10, CONT1+3, PATH+4, RELOAD+12
$$PROD^IBCORC PROD+1
$$LOAD^IBCRHBR2 HOSTLOAD+19
FILES^IBCRHBRV HOSTLOAD+8, RELOAD+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,"Upload National Reasonable Charges v"_VERS_" Host Files to Temporary Vista files"
  • Line Location: HOSTLOAD+3
Function Call: WRITE
  • Prompt: !,"--------------------------------------------------------------------------------",!
  • Line Location: HOSTLOAD+4
Function Call: WRITE
  • Prompt: @IOF,!,"Loading National Reasonable Charges v"_VERS_" Host Files into temporary local file"
  • Line Location: HOSTLOAD+14
Function Call: WRITE
  • Prompt: !,"--------------------------------------------------------------------------------"
  • Line Location: HOSTLOAD+15
Function Call: WRITE
  • Prompt: !!," Error while processing host file, can not continue!",!!
  • Line Location: HOSTLOAD+20
Function Call: WRITE
  • Prompt: !!,"Upload of Reasonable Charges v"_VERS_" Host Files Complete.",!
  • Line Location: HOSTLOAD+22
Function Call: WRITE
  • Prompt: !!,"The following files were created in XTMP, they will be purged in 2 days:"
  • Line Location: HOSTLOAD+24
Function Call: WRITE
  • Prompt: !,"------------------------------------------------------------------------"
  • Line Location: HOSTLOAD+25
Function Call: WRITE
  • Prompt: !!,"These files already exist in XTMP:",!,"----------------------------------"
  • Line Location: CONT+6
Function Call: WRITE
  • Prompt: !
  • Line Location: CONT+8
Function Call: WRITE
  • Prompt: "."
  • Line Location: CONT+12
Function Call: WRITE
  • Prompt: !!
  • Line Location: CONT1+1
Function Call: WRITE
  • Prompt: !,?4,$E(IBY,1,67),?74,$P(IBNODE,U,5)
  • Line Location: DSPXTMP+6
Function Call: WRITE
  • Prompt: !!,"Reasonable Charges Host Files found: ",?44,IBPATH,!,"------------------------------------"
  • Line Location: FNDHOST+2
Function Call: WRITE
  • Prompt: ?57,"*** not found ***"
  • Line Location: FNDHOST+8
Function Call: WRITE
  • Prompt: !!,"Can not find all required host files, can not continue!",!!
  • Line Location: FNDHOST+10
Function Call: WRITE
  • Prompt: !!,"All required host files found.",!
  • Line Location: FNDHOST+11
Function Call: WRITE
  • Prompt: !!,"These files already exist in XTMP:",!,"----------------------------------"
  • Line Location: RELOAD+8
Function Call: WRITE
  • Prompt: !
  • Line Location: RELOAD+10
Function Call: WRITE
  • Prompt: "."
  • Line Location: RELOAD+14
Function Call: WRITE
  • Prompt: *7,*7,*7
  • Line Location: TMESS+1
Function Call: WRITE
  • Prompt: !,?10,"**** Will Load Test Version of Reasonable Charge Files ****"
  • Line Location: TMESS+2
Function Call: WRITE
  • Prompt: !!,"This appears to be a test account, the test version of the files will be loaded."
  • Line Location: TMESS+3
Function Call: WRITE
  • Prompt: !,"The test version of the charges should only be loaded into test accounts."
  • Line Location: TMESS+4
Function Call: WRITE
  • Prompt: !,"If this is not a test account but a live production account then do not load",!,"the charges! Contact support."
  • Line Location: TMESS+5
Function Call: WRITE
  • Prompt: !!,?3,"**** If this is a production account do not continue, Contact Support ****",!!
  • Line Location: TMESS+6
Routine Call
  • DIR
  • Line Location:
    • CONT+10
    • CONT1+3
    • PATH+4
    • RELOAD+12

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^XTMP( CONT+12!, FNDXTMP+4, DSPXTMP+4, DSPXTMP+5, RELOAD+14!
^XTMP("IBCR RC SITE" CONT+12!, RELOAD+14!

Label References

Name Line Occurrences
$$CONT HOSTLOAD+11
$$CONT1 HOSTLOAD+12
$$FNDHOST HOSTLOAD+9
$$FNDXTMP HOSTLOAD+23, CONT+5, RELOAD+7
$$PATH HOSTLOAD+6
DSPXTMP HOSTLOAD+25, CONT+8, RELOAD+10
HLEND HOSTLOAD+6, HOSTLOAD+9, HOSTLOAD+11, HOSTLOAD+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARR CONT+3~, CONT+8, DSPXTMP~, DSPXTMP+1!, RELOAD+3~, RELOAD+10
ARR( CONT+12, DSPXTMP+5*, RELOAD+14
DIR CONT+3~, CONT+10!, CONT1+1~, CONT1+3!, PATH+1~, PATH+4!, RELOAD+3~
DIR("?" CONT+9*, CONT1+2*, PATH+2*, PATH+3*, RELOAD+11*
DIR("A" CONT+10*, CONT1+3*, PATH+4*, RELOAD+12*
DIR("B" PATH+4*
DIR(0 CONT+10*, CONT1+3*, PATH+4*, RELOAD+12*
DIRUT CONT+3~, CONT1+1~, PATH+1~, RELOAD+3~, RELOAD+12
>> DTOUT PATH+5
DUOUT CONT+3~, CONT1+1~, PATH+1~, PATH+5, RELOAD+3~
FILES CONT~, CONT+5, CONT+8, FNDXTMP~, DSPXTMP~, FNDHOST~
FILES( FNDXTMP+3, FNDXTMP+4, DSPXTMP+3, DSPXTMP+4, FNDHOST+6, FNDHOST+8
FILES("" FNDHOST+4
IBF FNDHOST+1~*, FNDHOST+4*, FNDHOST+8*, FNDHOST+10, FNDHOST+11, FNDHOST+12
IBFILE HOSTLOAD+2~, HOSTLOAD+17*, HOSTLOAD+18, HOSTLOAD+19, FNDXTMP+1~, FNDXTMP+3*, FNDXTMP+4, DSPXTMP+1~, DSPXTMP+3*, DSPXTMP+4
, FNDHOST+1~, FNDHOST+6*, FNDHOST+7, FNDHOST+8
IBFILES HOSTLOAD+2~, HOSTLOAD+8, HOSTLOAD+9, HOSTLOAD+11, HOSTLOAD+23, HOSTLOAD+25, RELOAD+3~, RELOAD+5, RELOAD+7, RELOAD+10
IBFILES( HOSTLOAD+17, HOSTLOAD+18
IBNODE HOSTLOAD+2~, HOSTLOAD+18*, HOSTLOAD+19, FNDXTMP+1~, DSPXTMP+1~, DSPXTMP+5*, DSPXTMP+6
IBOK HOSTLOAD+2~*, HOSTLOAD+17*, HOSTLOAD+20*, HOSTLOAD+22, HLEND
IBPATH HOSTLOAD+2~, HOSTLOAD+6*, HOSTLOAD+9, HOSTLOAD+19, PATH+1~*, PATH+5*, PATH+6, FNDHOST~, FNDHOST+2, FNDHOST+7
IBX CONT+3~, CONT+12*, FNDHOST+1~, FNDHOST+7!, RELOAD+3~, RELOAD+14*, PROD+1~*, PROD+2
IBX( FNDHOST+7*
IBXRF FNDXTMP+1~, FNDXTMP+4*, DSPXTMP+1~, DSPXTMP+4*, DSPXTMP+5
IBY DSPXTMP+1~, DSPXTMP+5*, DSPXTMP+6, FNDHOST+1~, FNDHOST+7!
IBZ CONT+3~*, CONT+6*, CONT+12*, CONT+14, CONT1+1~*, CONT1+3*, CONT1+4, FNDXTMP+1~*, FNDXTMP+3, FNDXTMP+4*
, FNDXTMP+5, FNDHOST+1~, FNDHOST+7*, FNDHOST+8, RELOAD+3~*, RELOAD+8*, RELOAD+12*, RELOAD+14*, RELOAD+16
IOF HOSTLOAD+3, HOSTLOAD+14
U HOSTLOAD+19, FNDXTMP+4, DSPXTMP+4, DSPXTMP+5, DSPXTMP+6, FNDHOST+8
VERS HOSTLOAD~, HOSTLOAD+2*, HOSTLOAD+3, HOSTLOAD+8, HOSTLOAD+14, HOSTLOAD+19, HOSTLOAD+22
X HOSTLOAD+2~, CONT+3~, CONT1+1~, PATH+1~, FNDHOST+1~, RELOAD+3~
Y HOSTLOAD+2~, CONT+3~, CONT+12, CONT1+1~, CONT1+3, PATH+1~, PATH+5, FNDHOST+1~, RELOAD+3~, RELOAD+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All