©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
IBAUTL6 ;AAS/ALB - RX EXEMPTION UTILITY ROUTINE (CONT.) ; 2-NOV-92
Source file <IBAUTL6.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ADDEX(IBEXREA,IBDT,IBHOW,IBTYPE,IBOLDAUT) | ; -- add entry to 354.1 and update
|
|
| ADDP | ; -- Add patient to file 354
|
|
| A1 | ||
| DUPL() | ; -- see if entry is a duplicate
|
|
| ADDEXQ | ;
|
|
| ADDPQ |
| Name | Field # of Occurrence |
|---|---|
| FILE^DICN | ADDP+9, A1+36 |
| DT^DICRW | ADDP+4 |
| ^DIE | A1+44 |
| ^IBAERR | ADDEXQ+2 |
| ^IBARXEB | A1+58 |
| $$RXST^IBARXEU | A1+55 |
| $$STDATE^IBARXEU | A1+33, A1+55 |
| $$LST^IBARXEU0 | DUPL+3 |
| $$MINUS^IBARXEU0 | A1+49 |
| CANCEL^IBARXEU3 | A1+57 |
| ^IBARXEVT | A1+56 |
| AFTER^IBARXEVT | A1+54 |
| BEFORE^IBARXEVT | A1+12 |
| CURREX^IBAUTL7 | A1+49 |
| INACT^IBAUTL7 | A1+21, A1+24, A1+30 |
| $$DAT1^IBOUTL | A1+51 |
| 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+7, ADDP+9, ADDP+11, ADDEX+15, A1, ADDEXQ+1 |
| ^IBE(354.2 - [#354.2] | A1+15, A1+33, A1+51 |
| ^VA(200 - [#200] | A1+10 |
| Name | Line Occurrences |
|---|---|
| $$DUPL | A1+27 |
| ADDEXQ | ADDEX+15, A1, A1+9, A1+10, A1+27, A1+30, A1+37, A1+45, A1+49 |
| ADDP | A1 |
| ADDPQ | ADDP+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | ADDP+8!, ADDPQ!, A1+37*, A1+44!, ADDEXQ+3! |
| DD | ADDP+8!, ADDPQ!, A1+36!, ADDEXQ+3! |
| >> DFN | ADDP+7, ADDP+9, ADDP+11, ADDEX+15, A1, A1+55, 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+8!*, ADDPQ!, A1+36*, A1+44!, ADDEXQ+3! |
| DIC(0 | ADDP+8*, A1+36* |
| DIE | ADDP+8!, ADDPQ!, A1+40*, A1+44!, ADDEXQ+3! |
| >> DINUM | ADDP+9* |
| >> DLAYGO | ADDP+8* |
| DO | ADDP+8!, ADDPQ!, A1+36!, ADDEXQ+3! |
| DR | ADDP+8!, ADDPQ!, A1+40*, A1+44!, ADDEXQ+3! |
| DT | ADDP+4, A1+49 |
| DUZ | A1+10 |
| >> IBADD | ADDP+6*, ADDP+9*, ADDP+10 |
| >> IBADDE | A1+6*, A1+46*, A1+51 |
| IBASIG | ADDEXQ+3! |
| IBCNT | A1+4~ |
| >> IBCONVER | A1+33, A1+53 |
| 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+30, A1+33*, A1+36, A1+46, A1+49, A1+55, DUPL+3, DUPL+4 |
| IBEVT | A1+55*, ADDEXQ+3! |
| IBEVTA | ADDEXQ+3! |
| IBEVTP | ADDEXQ+3! |
| IBEXDA | A1+14~, A1+37* |
| >> IBEXERR | ADDP+5*, ADDP+10*, ADDEX+15*, A1, A1+6*, A1+9*, A1+10*, A1+30, A1+37*, A1+45* , A1+49, ADDEXQ+2 |
| IBEXREA | ADDEX~, A1+15, A1+33, A1+46, DUPL+4 |
| >> IBFORCE | A1+24, A1+27 |
| IBHOW | ADDEX~, A1+16* |
| IBOLDAUT | ADDEX~, A1+21, A1+27 |
| IBSTAT | A1+14~, A1+15*, A1+49, A1+57 |
| >> IBTALK | ADDEX+15, A1+27, A1+37, A1+51 |
| IBTYPE | ADDEX~, A1+17*, DUPL+4 |
| >> IBWHER | ADDP+5*, A1+6* |
| IBX | ADDPQ! |
| X | ADDP+9*, A1+4~, A1+36*, DUPL+1~, DUPL+2*, DUPL+4*, DUPL+5 |
| X1 | A1+4~ |
| X2 | A1+4~ |
| Y | ADDP+9, A1+4~, A1+37, A1+45, DUPL+1~, DUPL+3*, DUPL+4 |
| >> ZTQUEUED | ADDEX+15, A1+27, A1+37, A1+51 |