IBCERPT ;ALB/TMP - 277 EDI ENVOY REPORT MESSAGE PROCESSING ;15-JUL-98
Source file <IBCERPT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RPTHDR(IBD,IBDATE) | ; Report message header
; ^TMP("IBMSG",$J,"REPORT",0,0)=MESSAGE HEADER DATA STRING ; ,"D",0,1)=header record raw data ; ,line #)=report message lines |
|
| REPORT(IBHD,IBDATE,IBD,IBTXN) | ; Assemble, store report message
; Returns IBD array if passed by reference, IBHOLDCT, IBLAST |
|
| RPTLINE(IBD,IBHD,IBSUB,IBMCT) | ;Process report lines
; INPUT: ; IBD must be passed by reference = entire message line ; IBHD = the header data from the message ; IBSUB = 1 to signify the subject line should be output ; IBMCT = 1 if message from the MCT (test) queue |
