IBCEFG7 ;ALB/TMP - OUTPUT FORMATTER GENERIC FORM PROCESSING ;06-MAR-96
Source file <IBCEFG7.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FORM(IBFORM,IBQUE,IBNOASK,IBQDT,ZTSK,IBABORT,IBRSBTST) | ;For ien IBFORM, extract data using
; output generater ; IBQUE = the output queue for transmitted forms or the printer queue ; for printed output ; IBNOASK = flag that says user interaction for queuing is not needed ; 0 or null = ask, 1 = don't ask ; IBQDT = the date/time to queue the job (optional) |
|
| FORMQ | ||
| FORMOUT | ; Queued job entrypoint - IBFORM needs to be defined
; IBQUE needs to be defined if using default transmission output |
|
| FOUTQ | ||
| Q1 | ||
| PRINT(IBFORM) | ; Print data from extract global for form IBFORM
; Extract records - this should include call(s) to $$EXTRACT^IBCEFG() |
|
| TRANSMIT(IBFORM,IBQUE) | ; Send data from extract global to queue IBQUE
|
|
| MSG(IBREC,LINE,MSG,SIZE,CT) | ; Set up global for transmission line
; IBREC = record number being processed ; LINE = actual text to be output in mail message line ; MSG = the message seq # to output this record in (pass by reference) ; SIZE = current size of the message (pass by reference) ; CT = the last line # in message for the text (pass by reference) |
|
| DEV(IBFORM,NOQ,IBABORT) | ;WCJ;US3380 added IBABORT
|
|
| DEVQ | ||
| QUEUE(IBFORM) | ; Ask to queue transmission
|
|
| QUEQ | ||
| FPRE(IBFORM,IBPAR,IBXERR) | ; Executes pre-processor
|
|
| FPOST(IBFORM,IBPAR,IBXERR) | ; Executes post-processor
|
|
| FMFLD(IBDA) | ;Return the file#field for fileman field referenced as a data
; element in file 364.7's IBDA entry. |
|
| FLDQ |
| 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 |
|
