OOPSDOL ;WIOFO/CAH-ASISTS TRANSMISSION OF CA1/CA2 TO DOL ;3/15/00
Source file <OOPSDOL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;Routine Entry
|
|
GETREC | ; Loop thru ^OOP(2260 "AW" or "AWC" XRef to get records to transmit
; AW=Schedule Transmission ; AWC=Manual Transmission |
|
NOCASES | ; No Cases to Send - Send Mail Message with only DOL segment
|
|
PROCESS | ;
|
|
EXIT | ; Quit the program
|
|
CREATE | ; Create Mailman Message
|
|
SEND | ; Send Mailman Message
|
|
BADREC | ; If any records with missing data, send mail message
|
|
SENTMSG | ; Send message to OOPS WCP mail group with claims sent to AAC
|
|
ERROR | ; Create appropriate Error message and Send message
|
|
ERROR2 | ; Create appropriate Error message and Send message
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^OOPS(2260 - [#2260] | Classic Fileman Calls, GET1^DIQ |
^XMB(3.8 - [#3.8] | FIND1^DIC |
3.81 | LIST^DIC |
^DIC(4 - [#4] | GET1^DIQ |
^DIC(4.2 - [#4.2] | FIND^DIC |