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

Package: Integrated Billing

Routine: IBCRHBC


Information

IBCRHBC ;ALB/ARH - RATES: UPLOAD HOST FILES (CMAC DRIVER) ; 22-MAY-1996

Source Information

Source file <IBCRHBC.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Integrated Billing 4 ($$CMAC,$$LNDT,$$LNFORM)^IBCRHBC1  ($$CMAC,$$LNDT,$$LNFORM)^IBCRHBC2  ($$CMAC,$$LNDT,$$LNFORM)^IBCRHBC3  DISP1^IBCRHU1  
Kernel 2 ($$LIST,$$PWD,CLOSE,OPEN)^%ZISH  $$FMTE^XLFDT  
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 IBCRHD  

Entry Points

Name Comments DBIA/ICR reference
CMAC ; OPTION: upload a CMAC file from a VMS file into ^XTMP
CHKF(LINE,FILE) ; check that first line of file fits one of the three formats, if it does return the format type, otherwise 0
CHKFQ
CONT(XREF) ; check for existing files stored in XREF with same host file name
; returns true if user wants to continue and these files are deleted
MOD(DEFAULT,NAME) ; get the modifiers to use with the professional and technical component charges
CONT1() ; get final OK to start upload
PATH() ; return directory or -1
FNDHOST(IBPATH) ; find and display any host files available for upload: 1 if some, 0 none found
FILE() ; get name of file to be loaded, returns null or file name in 'CMACxxx.TXT' or 'yyyyCMACxxx.TXT' format
DATE(FORM,LINE) ; return file formated date in FM format, returns null or file date in FM format

External References

Name Field # of Occurrence
$$LIST^%ZISH FNDHOST+6
$$PWD^%ZISH PATH+3, PATH+4
CLOSE^%ZISH CMAC+19
OPEN^%ZISH CMAC+15
^DIR CONT+9, MOD+9, CONT1+2, PATH+4, FILE+3
$$CMAC^IBCRHBC1 CMAC+26
$$LNDT^IBCRHBC1 DATE+2
$$LNFORM^IBCRHBC1 CHKF+7
$$CMAC^IBCRHBC2 CMAC+27
$$LNDT^IBCRHBC2 DATE+3
$$LNFORM^IBCRHBC2 CHKF+8
$$CMAC^IBCRHBC3 CMAC+28
$$LNDT^IBCRHBC3 DATE+4
$$LNFORM^IBCRHBC3 CHKF+9
DISP1^IBCRHU1 CMAC+31, CONT+5
$$FMTE^XLFDT DATE+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Upload CMAC Host File: 'CMACxxx.TXT' or 'yyyyCMACxxx.TXT' w/xxx = locality",!
  • Line Location: CMAC+5
Function Call: WRITE
  • Prompt: !!,"**** Unable to open ",IBPATH,IBFILE,!
  • Line Location: CMAC+15
Function Call: WRITE
  • Prompt: !!,?14,"File: ",IBFILE,?40,"Effective: ",$$DATE(IBFORM,IBFLINE)
  • Line Location: CMAC+23
Function Call: WRITE
  • Prompt: !!,"Done. ",$P(IBDONE,U,1)," lines processed."
  • Line Location: CMAC+30
Function Call: WRITE
  • Prompt: !,"The following files were created, they will be purged in 2 days:"
  • Line Location: CMAC+31
Function Call: WRITE
  • Prompt: !!,IBY,!!,"Bad file name, can not continue!"
  • Line Location: CHKF+4
Function Call: WRITE
  • Prompt: !!,IBY,!!,"First line of file is null, can not continue!"
  • Line Location: CHKF+5
Function Call: WRITE
  • Prompt: !!,IBY,!,"Line Length=",$L(LINE)," characters",!!,"LINE='",LINE,"'",!!,"Can not Continue!"
  • Line Location: CHKF+11
Function Call: WRITE
  • Prompt: !
  • Line Location: CONT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: CONT+7
Function Call: WRITE
  • Prompt: !!,"The above files already exist in XTMP."
  • Line Location: CONT+8
Function Call: WRITE
  • Prompt: "."
  • Line Location: CONT+11
Function Call: WRITE
  • Prompt: !!,?7,NAME," Component charges will not be uploaded.",!
  • Line Location: MOD+11
Function Call: WRITE
  • Prompt: !
  • Line Location: CONT1+1
Function Call: WRITE
  • Prompt: !,"CMAC Host files available for upload in: ",IBPATH,!!
  • Line Location: FNDHOST+5
Function Call: WRITE
  • Prompt: "**** No CMAC files found ",IBPATH,"CMACxxx.TXT or yyyyCMACxxx.TXT, can not continue.",!
  • Line Location: FNDHOST+7
Function Call: WRITE
  • Prompt: ?30,$P(IBX,";",1),!
  • Line Location: FNDHOST+8
Function Call: WRITE
  • Prompt: !!,"**** File not a CMAC file: must be 'CMACxxx.TXT' or 'yyyyCMACxxx.TXT'.",!
  • Line Location: FILE+8
Routine Call
  • DIR
  • Line Location:
    • CONT+9
    • MOD+9
    • CONT1+2
    • PATH+4
    • FILE+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^XTMP( CONT+11!

Label References

Name Line Occurrences
$$CHKF CMAC+21
$$CONT CMAC+3
$$CONT1 CMAC+24
$$DATE CMAC+23
$$FILE CMAC+10
$$FNDHOST CMAC+8
$$MOD CMAC+12, CMAC+13
$$PATH CMAC+7
CHKFQ CHKF+4, CHKF+5, CHKF+7, CHKF+8, CHKF+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARR CONT+3~*, CONT+5, CONT+7
ARR( CONT+11
DEFAULT MOD~, MOD+8
DIR CONT+3~, CONT+9!, MOD+2~, MOD+9!, CONT1+1~, CONT1+2!, PATH+1~, PATH+4!, FILE+1~, FILE+3!
DIR("?" CONT+8*, MOD+3*, MOD+4*, MOD+5*, MOD+6*, PATH+2*, PATH+3*, FILE+2*
DIR("A" CONT+9*, MOD+8*, CONT1+2*, PATH+4*, FILE+3*
DIR("B" MOD+8*, PATH+4*
DIR(0 CONT+9*, MOD+9*, CONT1+2*, PATH+4*, FILE+3*
DIRUT CONT+3~, MOD+2~, CONT1+1~, PATH+1~, FILE+1~, FILE+3
DT FNDHOST+3
DTOUT MOD+2~, MOD+10, PATH+5, FILE+1~
DUOUT CONT+3~, MOD+2~, MOD+10, CONT1+1~, PATH+1~, PATH+5, FILE+1~
FILE CHKF~, CHKF+1*, CHKF+4
FORM DATE~, DATE+1*, DATE+2, DATE+3, DATE+4
IBCYR FNDHOST+1~, FNDHOST+3*
IBDONE CMAC+1~*, CMAC+26*, CMAC+27*, CMAC+28*, CMAC+30, CMAC+31
IBFILE CMAC+1~, CMAC+10*, CMAC+15, CMAC+21, CMAC+23, CMAC+26, CMAC+27, CMAC+28
IBFLINE CMAC+1~, CMAC+17*, CMAC+21, CMAC+23
IBFORM CMAC+1~, CMAC+21*, CMAC+23, CMAC+26, CMAC+27, CMAC+28
IBGLBEFF CMAC+1~, DATE+1*, DATE+5*
IBI FNDHOST+1~, FNDHOST+3*
IBMODP CMAC+1~, CMAC+12*, CMAC+26, CMAC+27, CMAC+28
IBMODT CMAC+1~, CMAC+13*, CMAC+26, CMAC+27, CMAC+28
IBNAME CMAC+1~, CMAC+3*, CMAC+26, CMAC+27, CMAC+28
IBPATH CMAC+1~, CMAC+7*, CMAC+8, CMAC+15, CMAC+26, CMAC+27, CMAC+28, PATH+1~*, PATH+5*, PATH+6
, FNDHOST~, FNDHOST+1*, FNDHOST+5, FNDHOST+6, FNDHOST+7
IBX CHKF+1~*, CHKF+7*, CHKF+8*, CHKF+9*, CHKFQ, CONT+3~, CONT+11*, MOD+2~*, MOD+9*, MOD+10*
, MOD+11, MOD+13, FNDHOST+1~, FNDHOST+8*, FILE+1~*, FILE+5*, FILE+6*, FILE+8, FILE+10, DATE+1~*
, DATE+2*, DATE+3*, DATE+4*, DATE+5*, DATE+6
IBX( FNDHOST+3*
IBX("CMAC*" FNDHOST+3*
IBY CHKF+1~, CHKF+2*, CHKF+4, CHKF+5, CHKF+11, CONT+3~, FNDHOST+1~, FILE+1~*, FILE+3*, FILE+5
, FILE+6, FILE+8
IBY( FNDHOST+8
IBZ CONT+3~*, CONT+7*, CONT+11*, CONT+13, CONT1+1~*, CONT1+2*, CONT1+3, FNDHOST+1~*, FNDHOST+6*, FNDHOST+7
, FNDHOST+8, FNDHOST+9
IO CMAC+17
LINE CHKF~, CHKF+1*, CHKF+5, CHKF+7, CHKF+8, CHKF+9, CHKF+11, DATE~, DATE+1*, DATE+2
, DATE+3, DATE+4
NAME MOD~, MOD+5, MOD+6, MOD+8, MOD+11
>> POP CMAC+15
U CMAC+30, CMAC+31
X CONT+3~, MOD+2~, CONT1+1~, PATH+1~, FNDHOST+1~, FILE+1~
XREF CONT~, CONT+3*, CONT+5
Y CONT+3~, CONT+11, MOD+2~, MOD+9, CONT1+1~, CONT1+2, PATH+1~, PATH+5, FNDHOST+1~, FILE+1~
, FILE+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All