IBCRHBT ;LL/ELZ - RATES: UPLOAD HOST FILES (TP) ; 19-MAR-1999
Source file <IBCRHBT.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
TP | ; OPTION: upload an IBAT file from a VMS file into ^XTMP
|
|
ENDF() | ||
PARSE | ; process a single line from an IBAT file: parse out into individual fields and store the line in XTMP
|
|
STORE | ;
|
|
DATE(X) | ; reformats dates
|
|
SET | ;
|
|
SETHDR | ;
|
|
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 |
|
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
|
|
CS(X) | ; find charge set ien from X (name)
|
|
CHECK(IBFILE) | ; returns if file name is not in correct format
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|