IBJTLB1 ;ALB/ARH - TPI INACTIVE LIST BUILD ;2/14/95
Source file <IBJTLB1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BLDA | ; build active list for third party joint inquiry active list, DFN must be defined
; first search starts at dt and works backwards for 6 months of bills or IBMAXCNT bills, whichever is greater ; all bills for a single day are included in the same search so even IBMAXCNT may be exceeded ; if IBEND is defined on entry it is used as the end dt of the search, otherwise DT is used ; IBBEG is left defined on exit, if it has a value then it is used by the Change Dates action to define the next ; end date of the search, this results in each CD action default working backwards through the date range until ; no bills are found and IBBEG is null then search restarts at DT, IBEND is defined so can tell if range changed |
|
| SCRN | ; add bill to screen list (IBIFN,DFN must be defined)
|
|
| DATE(X) | ; date in external format
|
|
| TYPE(X) | ; return abbreviated form of Bill Classification (399,.05)
; modified for 516 - baa |
|
| TF(X) | ; return abbreviated form of Timeframe of Bill (399,.06)
|
|
| SET(X,CNT) | ; set up list manager screen array
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
