Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: IBCRHBS1

Package: Integrated Billing

Routine: IBCRHBS1


Information

IBCRHBS1 ;ALB/ARH - RATES: UPLOAD HOST FILES (RC 2+) SETUP ; 10-OCT-03

Source Information

Source file <IBCRHBS1.m>

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

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+15
Function Call: WRITE
  • Prompt: !,"--------------------------------------------------------------------------------"
  • Line Location: HOSTLOAD+16
Function Call: WRITE
  • Prompt: !!," Error while processing host file, can not continue!",!!
  • Line Location: HOSTLOAD+21
Function Call: WRITE
  • Prompt: !!,"Upload of Reasonable Charges v"_VERS_" Host Files Complete.",!
  • Line Location: HOSTLOAD+23
Function Call: WRITE
  • Prompt: !!,"The following files were created in XTMP, they will be purged in 2 days:"
  • Line Location: HOSTLOAD+25
Function Call: WRITE
  • Prompt: !,"------------------------------------------------------------------------"
  • Line Location: HOSTLOAD+26
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
Info |  Source |  Entry Points |  Interaction Calls