IBCNBOA ;ALB/ARH - Ins Buffer: Activity Report ; 1 Jun 97
Source file <IBCNBOA.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;get parameters then run the report
|
|
10 | ; ask Previous Completed month
|
|
109 | ; come here for dates if going back
|
|
30 | ; report or excel
|
|
DEV | ;get the device
|
|
11 | ; starting month ; IB*702
|
|
12 | ; ending month ; IB*702
|
|
21 | ; starting date ; IB*702
|
|
22 | ; ending date ; IB*702
|
|
IBSM(IBLABEL,IBSTDT) | ; START/END MONTH ; IB*702
; IBLABEL - starting or ending month ; IBSTDT - starting month year in FM form |
|
IBSMA | ; skip back tag
|
|
IBSMX | ; Exit subroutine
|
|
EXMON(IBCHGDT) | ; change FM year month to external 'month year'
|
|
RPT | ; run report
|
|
EXIT | ; exit report
|
|
SEARCH(IBBEG,IBEND,IBMONTH) | ; search/sort statistics for activity report
|
|
SET(STAT,S1,S3,TIME,IBB0) | ;
|
|
TMP(XREF,S1,S2,S3,TIME,NAME) | ;
|
|
TMPCHK(XREF,S1,S2,S3,TIME,NAME) | ; check if not there set stub for all if one is set
; use S1 (date), and S2 1 or 2 |
|
TMP1(XREF,S1,IC,GC,PC) | ;
|
|
PRINT(IBBEG,IBEND,IBOUT) | ;
|
|
GETLABL | ; pick up common values for Excel and Report
|
|
GETOAC | ; pick up items for IBCNBOAC
|
|
EOR(IBLE) | ; write end of report
|
|
EXN(IBBN) | ; round number by .05 return with 1st decimal
|
|
PRTLN | ; IB*702/DTG Rewrote tag to print zeros for statuses with no counts
|
|
STD(SEC) | ; convert seconds to days
|
|
STDQ | ||
HDR | ;print the report header
|
|
PHDL | ; - Print the header line for the Excel spreadsheet
|
|
PAUSE() | ;pause at end of screen if being displayed on a terminal
|
|
STOP() | ;determine if user has requested the queued report to stop
|
|
IBAR(IBBEG,IBEND) | ;Entry point for Vista IB AR data to ARC
|
|
IBARQ |
Name | Line Occurrences |
---|---|
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 |
|
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 |
|
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 |
|