IBPFU ;ALB/CPM - FIND BILLING DATA TO ARCHIVE - UTILITIES ; 20-APR-92
Source file <IBPFU.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LAST(NUM) | ; Find last valid date for archiving a billing record.
; Input: NUM -- number of previous fiscal years to retain. ; Output: Date of last day of fiscal year which may be archived |
|
| LOGADD(IBFILE) | ; File a log entry in file #350.6
; Input: IBFILE -- File number of file to be archived ; Output: ien of new log entry, or 0 if error occurred. |
|
| LOGADDQ | ||
| TEMPL(IBFILE,LOGDA) | ; Add a new search template to file #.401 (SORT TEMPLATES)
; Input: IBFILE -- File number of file to be archived ; LOGDA -- IEN of log entry ; Output: ien of new template, or 0 if error occurred. |
|
| TEMPLQ |
| FileNo | Call Tags |
|---|---|
| ^DIBT - [#.401] | Classic Fileman Calls |
| ^IBE(350.6 - [#350.6] | Classic Fileman Calls |
