IBARXEPS ;ALB/RM/PHH,EG - RX COPAY EXEMPTION UPDATE STATUS ; 12/13/2005
Source file <IBARXEPS.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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| POST | ; Entry point from TaskMan
|
|
| START | ;Entry Point from post-install
|
|
| NAMESPC() | ; API returns the name space for this patch
|
|
| RUNCHK(NAMESPC) | ; Check to see if clean up is already running
|
|
| QTIME(WHEN) | ; Get the run time for queuing
|
|
| QUEUE(ZTDTH) | ; Queue the process
|
|
| UPDT(IBBDT,IBEDT,IBUP) | ;
; IBBDT - Beginning Date for the process ; IBEDT - Ending Date for the process ; IBUP - Update mode (1 - Update, 0 - Report only) |
|
| CHK | ; Check if current status = computed status
|
|
| CHKQ | ||
| UP | ; -- update current exemption status
|
|
| UP1 | ||
| UPQ | ||
| SET | ; Set ^tmp node if not okay
|
|
| REPORT | ; Send MailMan recap report of updated records
|
|
| REPORTQ | ||
| MSGLN(IBNAM,IBER) | ; Create the body of the report
|
|
| EXRSN | ; Exempt Reason Array for MailMan Message
|
| Name | Field # of Occurrence |
|---|---|
| NOW^%DTC | POST+3, QTIME+2, UPDT+10, REPORT+9 |
| ^%ZTLOAD | QUEUE+7 |
| $$LST^DGMTU | CHK+6 |
| XMY^DGMTUTL | REPORT+6 |
| ^DIE | UP+4 |
| $$GET1^DIQ | REPORT+2 |
| D^DIQ | UPDT+10, REPORT+9 |
| $$STATUS^IBARXEU1 | CHK+21 |
| MOSTR^IBARXEU5 | UP1+5 |
| OLDAUT^IBARXEX1 | UP1+3 |
| ADDEX^IBAUTL6 | UP1+6 |
| $$PT^IBEFUNC | SET+2 |
| $$LJ^XLFSTR | MSGLN+7 |
| ^XMD | REPORT+24 |
| MES^XPDUTL | QUEUE+12, QUEUE+13 |
| FileNo | Call Tags |
|---|---|
| ^IBE(350.9 - [#350.9] | GET1^DIQ |
| ^IBA(354 - [#354] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGMT(408.31 - [#408.31] | CHK+10, CHK+11, CHK+12 |
| ^IBA(354 - [#354] | CHK+4 |
| ^IBA(354.1 - [#354.1] | UPDT+16, UPDT+17, CHK+2 |
| ^IBE(354.2 - [#354.2] | CHK+17, UP1+3, EXRSN+2 |
| ^TMP($J | UPDT+12!, UPDT+21!, SET+4, SET+5*, REPORT+16, REPORT+17, REPORT+20, REPORT+23 |
| ^XMB(3.8 - [#3.8] | REPORT+4 |
| ^XTMP( | POST+8!, START+4!, START+6*, START+7*, RUNCHK+2, QUEUE+8!, QUEUE+9*, QUEUE+11* |
| Name | Field # of Occurrence |
|---|---|
| ^( | REPORT+18 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | POST+2~, QTIME+1~, QTIME+3, UPDT+9~, UPDT+10, REPORT+9 |
| %H | POST+2~, QTIME+1~ |
| %I | POST+2~, QTIME+1~ |
| CLN | CHK+6~*, CHK+11*, CHK+12 |
| CONV | CHK+6~*, CHK+7, CHK+11, CHK+12* |
| DA | UPDT+22!, UP+4*, UP+5! |
| DFN | UPDT+22!, CHK+3*, CHK+4, CHK+6, CHK+21, UP+4, SET+2, SET+3, SET+4 |
| DGMT | CHK+6~*, CHK+7, CHK+10, CHK+11, CHK+12 |
| DIC | UPDT+22!, UP+5! |
| DIE | UPDT+22!, UP+4*, UP+5! |
| DIR | UPDT+22! |
| DIRUT | UPDT+22! |
| DR | UPDT+22!, UP+4*, UP+5! |
| DT | POST+1, POST+2~, POST+4*, POST+7, CHK+21 |
| DUZ | START+6, REPORT+8 |
| EXRSN | REPORT+1~ |
| EXRSN( | MSGLN+5, MSGLN+6, EXRSN+2* |
| IBBDT | UPDT~, UPDT+6, UPDT+15, UPDT+23! |
| IBCALX | MSGLN+1~, MSGLN+6*, MSGLN+7 |
| IBCURX | MSGLN+1~, MSGLN+5*, MSGLN+7 |
| IBDA | UPDT+17*, UPDT+23!, CHK+2 |
| IBDATA | UPDT+23! |
| IBDCNT | REPORT+1~, REPORT+7*, REPORT+22, MSGLN+2* |
| IBDEPEN | UPDT+23! |
| IBDFN | UPDT+23!, SET+3*, SET+4*, SET+5, REPORT+17*, REPORT+18 |
| IBDT | UPDT+15*, UPDT+16*, UPDT+17, UPDT+23! |
| IBEDT | UPDT~, UPDT+6, UPDT+16, UPDT+23! |
| IBER | UPDT+23!, REPORT+18*, MSGLN~, MSGLN+3, MSGLN+4, MSGLN+5, MSGLN+6 |
| IBERR | UPDT+23!, CHK+1*, CHK+15*, CHK+18*, CHK+19*, CHK+20*, CHK+22*, UP+3, SET+5 |
| IBEXREA | UPDT+23! |
| IBEXREAN | UPDT+23!, CHK+21*, CHK+22, UP1+3, UP1+4, UP1+5, UP1+6, SET+5 |
| IBEXREAO | UPDT+23!, CHK+16*, CHK+17, CHK+22, SET+5 |
| IBFORCE | UP1+4*, UPQ! |
| IBIEN | EXRSN+1~*, EXRSN+2* |
| IBJ | UPDT+23! |
| IBJOB | UPDT+9~, UP+2* |
| IBMESS | UPDT+23!, CHK+1*, UP+6*, UP1+7*, SET+5 |
| IBMGRP | REPORT+1~, REPORT+2*, REPORT+3, REPORT+4*, REPORT+5, REPORT+6 |
| IBNAM | UPDT+23!, REPORT+16*, REPORT+17, REPORT+18, MSGLN~, MSGLN+2*, MSGLN+7 |
| IBOK | UPDT+10*, UPDT+18, UPDT+23!, CHK+1*, CHK+15*, CHK+18*, CHK+19*, CHK+20*, CHK+22*, UP+1 , SET+1 |
| IBOLDAUT | UP1~*, UP1+6 |
| IBP | UPDT+23!, SET+2*, SET+4, SET+5 |
| IBPAG | UPDT+10*, UPDT+23! |
| IBPCNT | UPDT+10*, UPDT+23!, CHK+14*, SET+4, REPORT+22, REPORT+23 |
| IBPDAT | UPDT+11*, UPDT+23!, REPORT+1~, REPORT+9*, REPORT+10 |
| IBQUIT | UPDT+23! |
| IBSSN | MSGLN+1~, MSGLN+3*, MSGLN+7 |
| IBUP | UPDT~, UPDT+18, UPDT+23! |
| IBWHER | UPDT+9~, UP+2* |
| LNCNT | REPORT+1~, REPORT+7*, REPORT+10, REPORT+11*, REPORT+13*, REPORT+14*, REPORT+21*, REPORT+22*, REPORT+23*, MSGLN+8* |
| MSG | REPORT+1~ |
| MSG( | REPORT+10*, REPORT+11*, REPORT+13*, REPORT+14*, REPORT+21*, REPORT+22*, REPORT+23*, MSGLN+8* |
| NAMESPC | POST+5~, POST+6*, POST+8, START+1~, START+2*, START+3, START+4, START+6, START+7, RUNCHK~ , RUNCHK+1, RUNCHK+2, QUEUE+1~, QUEUE+2*, QUEUE+5, QUEUE+8, QUEUE+9, QUEUE+11 |
| QTIME | START+1~, START+5, START+7 |
| QUEERR | QUEUE+1~, QUEUE+3*, QUEUE+9*, QUEUE+15 |
| RECORD | MSGLN+1~, MSGLN+7*, MSGLN+8 |
| TXT | REPORT+1~, REPORT+12*, REPORT+13 |
| U | CHK+7, MSGLN+3, MSGLN+4, MSGLN+5, MSGLN+6, EXRSN+2 |
| WHEN | QTIME~, QTIME+3* |
| X | POST+2~, POST+4, START+1~, START+5*, QTIME+1~, UPDT+22!, CHK+2*, CHK+3, CHK+4, CHK+6 , CHK+16, CHK+18, CHK+19, CHK+20, MSGLN+4*, MSGLN+7 |
| XMDUZ | REPORT+1~, REPORT+7* |
| XMSUB | REPORT+1~, REPORT+8* |
| XMTEXT | REPORT+1~, REPORT+7* |
| XMY | REPORT+1~ |
| XMY( | REPORT+8* |
| Y | UPDT+10*, UPDT+11, UPDT+22!, CHK+4*, CHK+15, CHK+18, CHK+19, CHK+20, REPORT+9* |
| ZTDESC | QUEUE+1~, QUEUE+5* |
| ZTDTH | QUEUE~ |
| >> ZTIO | QUEUE+6* |
| ZTRTN | QUEUE+1~, QUEUE+4* |
| ZTSK | QUEUE+1~, QUEUE+9, QUEUE+10, QUEUE+11, QUEUE+12 |