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 |
