IBAUTL6 ;AAS/ALB-RX EXEMPTION UTILITY ROUTINE (CONT.);2-NOV-92
Source file <IBAUTL6.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 |
|---|---|---|
| ADDP | ; -- Add patient to file 354
; -- Input : dfn = entry in patient file ; returns : ibadd = 0 if not added, 1 if added |
|
| ADDPQ | ||
| ADDEX(IBEXREA,IBDT,IBHOW,IBTYPE,IBOLDAUT) | ; -- add entry to 354.1 and update
; -- this will become the active entry for this effective date ; other entries for this effective date should be cancelled ; prior to making this call |
|
| A1 | ||
| ADDEXQ | ;
|
|
| DUPL() | ; -- see if entry is a duplicate
|
| Name | Field # of Occurrence |
|---|---|
| FILE^DICN | ADDP+10, A1+37 |
| DT^DICRW | ADDP+5 |
| ^DIE | A1+45 |
| ^IBAERR | ADDEXQ+2 |
| ^IBARXEB | A1+65 |
| $$RXST^IBARXEU | A1+62 |
| $$STDATE^IBARXEU | A1+34, A1+62 |
| $$VFAOK^IBARXEU | A1+50 |
| $$LST^IBARXEU0 | DUPL+3 |
| $$MINUS^IBARXEU0 | A1+56 |
| CANCEL^IBARXEU3 | A1+64 |
| ^IBARXEVT | A1+63 |
| AFTER^IBARXEVT | A1+61 |
| BEFORE^IBARXEVT | A1+13 |
| CURREX^IBAUTL7 | A1+56 |
| INACT^IBAUTL7 | A1+22, A1+25, A1+31 |
| $$DAT1^IBOUTL | A1+58 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^IBA(354 - [#354] | Classic Fileman Calls |
| ^IBA(354.1 - [#354.1] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IBA(354 - [#354] | ADDP+8, ADDP+10, ADDP+12, ADDEX+15, A1, ADDEXQ+1 |
| ^IBA(354.1 - [#354.1] | A1+50 |
| ^IBE(354.2 - [#354.2] | A1+16, A1+34, A1+58 |
| ^VA(200 - [#200] | A1+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | ADDP+9!, ADDPQ!, A1+38*, A1+50, A1+53!, ADDEXQ+3! |
| DD | ADDP+9!, ADDPQ!, A1+37!, ADDEXQ+3! |
| >> DFN | ADDP+8, ADDP+10, ADDP+12, ADDEX+15, A1, A1+62, ADDEXQ+1, DUPL+3 |
| DGMTA | A1+3, A1+4~, A1+5* |
| DGMTINF | A1+3, A1+4~, A1+5* |
| DGMTP | A1+3, A1+4~, A1+5* |
| DIC | ADDP+9!*, ADDPQ!, A1+37*, A1+53!, ADDEXQ+3! |
| DIC(0 | ADDP+9*, A1+37* |
| DIE | ADDP+9!, ADDPQ!, A1+41*, A1+53!, ADDEXQ+3! |
| DINUM | ADDP+4~, ADDP+10* |
| DLAYGO | ADDP+4~, ADDP+9* |
| DO | ADDP+9!, ADDPQ!, A1+37!, ADDEXQ+3! |
| DR | ADDP+9!, ADDPQ!, A1+41*, A1+53!, ADDEXQ+3! |
| DT | ADDP+5, A1+56 |
| DUZ | A1+10 |
| >> IBADD | ADDP+7*, ADDP+10*, ADDP+11 |
| >> IBADDE | A1+6*, A1+47*, A1+58 |
| IBARCAN | ADDEXQ+3! |
| IBASIG | ADDEXQ+3! |
| IBCNT | A1+4~ |
| >> IBCONVER | A1+34, A1+60 |
| IBDGMTA | A1+2~, A1+3*, A1+5 |
| IBDGMTF | A1+2~, A1+3*, A1+5 |
| IBDGMTP | A1+2~, A1+3*, A1+5 |
| IBDT | ADDEX~, A1+9, A1+31, A1+34*, A1+37, A1+47, A1+56, A1+62, DUPL+3, DUPL+4 |
| IBEVT | A1+62*, ADDEXQ+3! |
| IBEVTA | ADDEXQ+3! |
| IBEVTP | ADDEXQ+3! |
| IBEXDA | A1+15~, A1+38* |
| >> IBEXERR | ADDP+6*, ADDP+11*, ADDEX+15*, A1, A1+6*, A1+9*, A1+10*, A1+31, A1+38*, A1+46* , A1+56, ADDEXQ+2 |
| IBEXREA | ADDEX~, A1+16, A1+34, A1+47, DUPL+4 |
| >> IBFORCE | A1+25, A1+28 |
| IBHOW | ADDEX~, A1+17* |
| IBOLDAUT | ADDEX~, A1+22, A1+28 |
| IBSTAT | A1+15~, A1+16*, A1+56, A1+64 |
| >> IBTALK | ADDEX+15, A1+28, A1+38, A1+58 |
| IBTYPE | ADDEX~, A1+18*, DUPL+4 |
| IBVFAOK | A1+2~, A1+50*, A1+56 |
| >> IBWHER | ADDP+6*, A1+6* |
| X | ADDP+4~, ADDP+10*, A1+4~, A1+37*, DUPL+1~, DUPL+2*, DUPL+4*, DUPL+5 |
| X1 | A1+4~ |
| X2 | A1+4~ |
| Y | ADDP+10, A1+4~, A1+38, A1+46, DUPL+1~, DUPL+3*, DUPL+4 |
| >> ZTQUEUED | ADDEX+15, A1+28, A1+38, A1+58 |