OOPSDOL ;WIOFO/CAH-ASISTS TRANSMISSION OF CA1/CA2 TO DOL ;3/15/00
Source file <OOPSDOL.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Package | Total | Caller Graph |
|---|---|---|
| Asists | 3 | OOPS DOL MANUAL XMIT DATA OOPS DOL SCHEDULED XMIT DATA OOPSDOLX |
| 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 | Field # of Occurrence |
|---|---|
| NOW^%DTC | GETREC+7 |
| ^%ZTLOAD | OOPSDOL+30 |
| MSG^DIALOG | OOPSDOL+35, ERROR+10, ERROR2+12 |
| $$FIND1^DIC | EN+15, BADREC+13, SENTMSG+11 |
| FIND^DIC | OOPSDOL+13, EN+8 |
| LIST^DIC | EN+23 |
| ^DIE | PROCESS+9 |
| $$GET1^DIQ | GETREC+14, GETREC+19, PROCESS+7, PROCESS+10, CREATE+8, BADREC+4 |
| ^DIR | OOPSDOL+10, OOPSDOL+18, OOPSDOL+23, OOPSDOL+27, OOPSDOL+33, NOCASES+4 |
| ^OOPSDOLX | PROCESS+5 |
| GRP^OOPSMBUL | ERROR2+3 |
| WCP^OOPSMBUL | PROCESS+10 |
| $$DC^OOPSUTL3 | GETREC+8 |
| $$VAL^OOPSUTL5 | GETREC+17 |
| $$VERIFY^OOPSUTL6 | GETREC+16 |
| XMZ^XMA2 | CREATE+7 |
| ^XMD | NOCASES+16, BADREC+16, SENTMSG+14, ERROR+6, ERROR2+8 |
| ENT1^XMD | SEND+10 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| 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 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD("DD" | GETREC+7 |
| ^OOPS(2260 - [#2260] | GETREC+15!, GETREC+19, PROCESS+13, SENTMSG+7 |
| ^TMP($J | GETREC+5!, GETREC+21*, GETREC+23*, GETREC+24*, PROCESS+4, EXIT+8!, BADREC+2, BADREC+3, BADREC+7, BADREC+8 |
| ^XMB(1 - [#4.3] | CREATE+8 |
| ^XMB(3.9 - [#3.9] | CREATE+12*, SEND+2*, SEND+5*, SEND+7* |
| ^XUSEC("OOPS DOL XMIT DATA" | OOPSDOL+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | GETREC+4~, GETREC+7, GETREC+8 |
| %DT | EXIT+8! |
| %H | GETREC+4~ |
| %I | GETREC+4~ |
| ARR | OOPSDOL+3~ |
| ARR("DILIST" | OOPSDOL+14, EN+9 |
| CATY | EXIT+8! |
| CNT | EN+2~, GETREC+6*, GETREC+21*, GETREC+24, NOCASES+1, NOCASES+5, SENTMSG+1~, SENTMSG+3*, SENTMSG+4, SENTMSG+5* , SENTMSG+8* |
| CONV | EXIT+10! |
| COPDT | EXIT+11! |
| CTR | EN+4*, EXIT+7!, BADREC+2*, BADREC+4*, BADREC+5*, BADREC+6*, BADREC+8*, BADREC+9* |
| D | EXIT+8! |
| DA | PROCESS+8*, PROCESS+9! |
| DAS | EXIT+8! |
| DATA | EXIT+8! |
| DATE | GETREC+7*, GETREC+8*, EXIT+7!, CREATE+10 |
| DI | EXIT+8! |
| DIC | EXIT+8! |
| DIE | PROCESS+8*, PROCESS+9! |
| DIR | OOPSDOL+10!, OOPSDOL+18!, OOPSDOL+23!, OOPSDOL+27!, OOPSDOL+33!, NOCASES+4! |
| DIR("?" | OOPSDOL+21*, OOPSDOL+22*, OOPSDOL+25*, OOPSDOL+26* |
| DIR("A" | OOPSDOL+8*, OOPSDOL+9*, OOPSDOL+16*, OOPSDOL+17*, OOPSDOL+20*, OOPSDOL+24*, OOPSDOL+32*, NOCASES+3* |
| DIR("B" | OOPSDOL+24* |
| DIR(0 | OOPSDOL+7*, OOPSDOL+15*, OOPSDOL+19*, OOPSDOL+24*, OOPSDOL+31*, NOCASES+2* |
| >> DIRUT | OOPSDOL+23, OOPSDOL+27 |
| DISYS | EXIT+8! |
| DIW | EXIT+8! |
| DIWI | EXIT+8! |
| DIWT | EXIT+8! |
| DIWTC | EXIT+11! |
| DIWX | EXIT+11! |
| DN | EXIT+8! |
| DO | EXIT+8! |
| DQ | EXIT+8! |
| DR | PROCESS+8!*, PROCESS+9! |
| DT | SEND+2 |
| DUZ | OOPSDOL+6, NOCASES+10, CREATE+6, SEND+8, ERROR+3, ERROR2+5 |
| END | EN+5*, PROCESS+3*, PROCESS+13*, EXIT+9!, SEND+4 |
| ERR | EN+2~, EXIT+7! |
| ERROR | EN+2~, EXIT+7!, ERROR+11!, ERROR2+13! |
| ERROR(1 | EN+10*, EN+17*, EN+25*, EN+26*, EXIT+4* |
| ERROR(2 | EN+11*, EN+18*, EN+27*, EXIT+5* |
| ERROR(3 | EN+12*, EN+19*, EN+28* |
| ERROR(4 | EN+20*, EN+29* |
| ERROR(5 | EN+30* |
| FAIL | EN+2~, EN+5*, PROCESS+1, PROCESS+12, EXIT+3, CREATE+7* |
| FIELD | OOPSDOL+3~, OOPSDOL+12*, OOPSDOL+13, EN+7*, EN+8 |
| FL | OOPSDOL+3~, OOPSDOL+12*, OOPSDOL+13, EN+7*, EN+8 |
| FL174 | EXIT+9! |
| FLD | EXIT+9! |
| GRP | NOCASES+7*, NOCASES+8, EXIT+7!, BADREC+12*, BADREC+13*, BADREC+14, SENTMSG+10*, SENTMSG+11*, SENTMSG+12, ERROR2+2* |
| HOUR | EXIT+9! |
| I | EXIT+9! |
| IEN | PROCESS+8*, EXIT+10! |
| INDEX | GETREC+9*, GETREC+10*, GETREC+11, EXIT+9! |
| INDEX2 | GETREC+9*, GETREC+10*, GETREC+12, EXIT+9! |
| INV | EN+3!, EXIT+7! |
| MAN | OOPSDOL+4*, GETREC+9, GETREC+13, GETREC+14, NOCASES+1, EXIT+7! |
| MAX | EXIT+9! |
| MDATA | GETREC+3~ |
| MIN | EXIT+9! |
| MSG | OOPSDOL+3~, NOCASES+17!, EXIT+7!, BADREC+2!, BADREC+10, SENTMSG+1~, SENTMSG+3! |
| MSG( | BADREC+4*, BADREC+5*, BADREC+6*, BADREC+8*, BADREC+9*, SENTMSG+4*, SENTMSG+8* |
| MSG("DIHELP" | OOPSDOL+34*, ERROR+8*, ERROR+9*, ERROR2+10*, ERROR2+11* |
| MSG(1 | NOCASES+13* |
| MSG(2 | NOCASES+14* |
| MSG(3 | NOCASES+15* |
| MSIZE | EXIT+7!, CREATE+2* |
| MTIME | GETREC+8*, EXIT+7! |
| >> NULL( | GETREC+23 |
| NUMCASE | SEND+1~, SEND+4*, SEND+5 |
| OOPDA | GETREC+3~, GETREC+6*, GETREC+12*, GETREC+14, GETREC+15, GETREC+16, GETREC+17, GETREC+19, GETREC+21, GETREC+23 , PROCESS+3*, PROCESS+4*, PROCESS+7, PROCESS+8, PROCESS+10, BADREC+1*, BADREC+3*, BADREC+4, BADREC+7, BADREC+8 , SENTMSG+1~, SENTMSG+2*, SENTMSG+6*, SENTMSG+7 |
| OOPSAR | EXIT+9! |
| OPAST | PROCESS+3*, PROCESS+4*, PROCESS+13, EXIT+9! |
| OPDATA | CREATE+1~, CREATE+10*, CREATE+11*, CREATE+12 |
| OPHM | EXIT+10! |
| OPI | GETREC+11*, GETREC+13, GETREC+15, EXIT+9!, BADREC+1*, BADREC+7*, BADREC+8 |
| OPL | EXIT+7!, CREATE+4*, CREATE+12*, SEND+2, SEND+7* |
| OPMG | EN+2~, EN+15*, EN+16, EN+23 |
| OPQ | EN+2~ |
| OPQ("DILIST" | EN+24 |
| OSHA | EXIT+9! |
| OSHASC | EXIT+10! |
| OTIME | EXIT+11! |
| P | EXIT+10! |
| RDATE | OOPSDOL+23*, GETREC+13, EXIT+10! |
| REL | EXIT+11! |
| RPOL | EXIT+10! |
| SIEN | EXIT+11! |
| SMSG | GETREC+3~ |
| SMSG( | GETREC+21*, SENTMSG+3, SENTMSG+6 |
| SN | CREATE+1~, CREATE+8*, CREATE+9*, CREATE+10 |
| STA | GETREC+3~, GETREC+19*, GETREC+21, GETREC+23, BADREC+1*, BADREC+2*, BADREC+3, BADREC+7, BADREC+8, BADREC+11 , BADREC+13, SENTMSG+1~, SENTMSG+2*, SENTMSG+3*, SENTMSG+6, SENTMSG+9, SENTMSG+11 |
| START | EN+5*, PROCESS+3*, EXIT+10!, SEND+4 |
| STR | SENTMSG+1~, SENTMSG+7*, SENTMSG+8 |
| T | GETREC+23*, EXIT+10! |
| U | EN+24, GETREC+19, PROCESS+13, CREATE+8, CREATE+10, CREATE+11, SEND+2, SEND+5, SENTMSG+8 |
| VAL | OOPSDOL+3~, OOPSDOL+12*, OOPSDOL+13, EN+7*, EN+8 |
| VALID | GETREC+3~, GETREC+17*, GETREC+21 |
| VMSG | EN+3! |
| WOK | EN+1*, EXIT+10! |
| X | EXIT+10! |
| XMCHAN | SEND+10*! |
| XMDUN | EXIT+10! |
| XMDUZ | GETREC+3~, NOCASES+6*, CREATE+6*, ERROR+1*, ERROR2+1* |
| XMSUB | GETREC+3~, NOCASES+11*, EXIT+7!, CREATE+5*, BADREC+11*, SENTMSG+9*, ERROR+4*, ERROR2+6* |
| XMTEXT | GETREC+3~, NOCASES+12*, EXIT+7!, BADREC+15*, SENTMSG+13*, ERROR+5*, ERROR2+7* |
| XMY | GETREC+3~, NOCASES+10, EXIT+7!, EXIT+10!, ERROR+3, ERROR2+5 |
| XMY( | NOCASES+10*, SEND+8*, ERROR+3*, ERROR2+5* |
| XMY("G." | NOCASES+8*, BADREC+14*, SENTMSG+12* |
| XMY("XXX@Q-AST.DOMAIN.EXT" | SEND+9* |
| XMZ | OOPSDOL+3~, PROCESS+12, EXIT+10!, CREATE+3, CREATE+7, CREATE+12, SEND+2, SEND+5, SEND+7, SEND+11! |
| Y | OOPSDOL+23, OOPSDOL+27, OOPSDOL+33, GETREC+4~, GETREC+7*, GETREC+8, EXIT+10! |
| Z | EXIT+10! |
| >> ZTDESC | OOPSDOL+29* |
| >> ZTIO | OOPSDOL+28* |
| >> ZTQUEUED | ERROR+7, ERROR2+9 |
| >> ZTRTN | OOPSDOL+28* |