©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
ASUV0NT ; IHS/ASDST/WAR -INVTR INITIALIZE INVENTORY ;
Source file <ASUV0NT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ASUV0NT1 | ;
|
|
| EXIT | ;
|
|
| STA | ;EP ;
|
| Name | Field # of Occurrence |
|---|---|
| SETAREA^ASULARST | STA+3 |
| STAT^ASULARST | STA+12 |
| ACC^ASULDIRF | ASUV0NT+23 |
| ^ASUMSTRD | ASUV0NT1+11 |
| READ^ASUMXDIO | ASUV0NT1+5 |
| DATE^ASUUDATE | ASUV0NT+13, STA+2 |
| CLS^ASUUHDG | ASUV0NT+15 |
| ACCOUNT^ASUV9IMR | ASUV0NT+29 |
| ACCOUNT^ASUV9IMW | ASUV0NT+61 |
| DELACCT^ASUV9IMW | ASUV0NT+57 |
| NEWACCT^ASUV9IMW | ASUV0NT+50 |
| NEWIDX^ASUV9IMW | ASUV0NT1+23 |
| NEWSLC^ASUV9IMW | ASUV0NT1+15 |
| REPACCT^ASUV9IMW | ASUV0NT+31, ASUV0NT+48 |
| XREF^ASUV9IMW | ASUV0NT1+26 |
| ^DIC | ASUV0NT+19, STA+8 |
| ^DIR | ASUV0NT+39, ASUV0NT+45, ASUV0NT+56, ASUV0NT1+31 |
| ^XBKVAR | ASUV0NT+12, STA+1 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ASUL(10 - [#9002039.1] | ASUV0NT1+14 |
| ^ASUMS - [#9002031] | ASUV0NT1+4 |
| ^ASUMS("B" | ASUV0NT+26, ASUV0NT1+1 |
| ^ASUMV - [#9002030] | ASUV0NT+28, ASUV0NT1+26 |
| Name | Line Occurrences |
|---|---|
| EXIT | ASUV0NT+16, ASUV0NT+20, ASUV0NT+24, ASUV0NT+25, ASUV0NT+51, ASUV0NT+57 |
| STA | ASUV0NT+16 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> ASUC("ITEMS" | ASUV0NT1+3*, ASUV0NT1+10*, ASUV0NT1+24, ASUV0NT1+27 |
| >> ASUC("TR" | EXIT+1! |
| >> ASUK("DT" | ASUV0NT+13, ASUV0NT+14, STA+2, STA+4 |
| >> ASUL(1 | STA+3, STA+12, STA+13 |
| >> ASUL(10 | EXIT+3! |
| >> ASUL(2 | ASUV0NT+16, ASUV0NT+22, ASUV0NT+26, ASUV0NT1+1, STA+11*, STA+13*, STA+14 |
| >> ASUL(3 | EXIT+3! |
| >> ASUL(5 | EXIT+3! |
| >> ASUL(6 | EXIT+3! |
| >> ASUL(8 | EXIT+3! |
| >> ASUL(9 | ASUV0NT+34, ASUV0NT1+27, ASUV0NT1+30, EXIT+3! |
| ASUMS | EXIT+1! |
| ASUMS("DEL" | ASUV0NT1+12 |
| ASUMS("E#" | ASUV0NT+26*, ASUV0NT+27, ASUV0NT1+1*, ASUV0NT1+2, ASUV0NT1+3*, ASUV0NT1+4*, ASUV0NT1+5, ASUV0NT1+16 |
| ASUMS("LPP" | ASUV0NT1+20 |
| ASUMS("QTY" | ASUV0NT1+17, ASUV0NT1+18, ASUV0NT1+21 |
| ASUMS("SLC" | ASUV0NT1+13*, ASUV0NT1+14 |
| ASUMS("VAL" | ASUV0NT1+17, ASUV0NT1+18 |
| ASUMV | EXIT+1! |
| ASUMV("ACC" | ASUV0NT+22*, ASUV0NT+23, ASUV0NT+34, ASUV0NT1+9, ASUV0NT1+27, ASUV0NT1+30 |
| ASUMV("E#" | ASUV0NT+22*, ASUV0NT+25, ASUV0NT+28, ASUV0NT1+11*, ASUV0NT1+14*, ASUV0NT1+25*, ASUV0NT1+26* |
| ASUMV("IDX" | ASUV0NT1+5* |
| ASUMV("MODE" | ASUV0NT+30, ASUV0NT+35, ASUV0NT+60* |
| ASUMV("QTY" | ASUV0NT1+21*, ASUV0NT1+22* |
| ASUMV("STA" | ASUV0NT1+16* |
| ASUMV("U/C" | ASUV0NT1+18*, ASUV0NT1+20* |
| ASUMV("VOU" | ASUV0NT+59* |
| ASUMX | EXIT+1! |
| ASUMX("ACC" | ASUV0NT1+8, ASUV0NT1+9 |
| ASUMX("E#" | ASUV0NT1+5* |
| ASUMX("IDX" | ASUV0NT1+7, ASUV0NT1+11 |
| ASUR | EXIT+1! |
| ASUR("VOU" | ASUV0NT+58*, ASUV0NT+59 |
| ASUV | EXIT+1! |
| ASUV("DT" | ASUV0NT+14*, STA+4* |
| DA | ASUV0NT1+33! |
| DIC | ASUV0NT+18*, ASUV0NT+19!, EXIT+2!, STA+7*, STA+8! |
| DIC("A" | ASUV0NT+17*, STA+6* |
| DIC(0 | ASUV0NT+18*, STA+7* |
| DIK | ASUV0NT1+33! |
| DIR | ASUV0NT+39!, ASUV0NT+45!, ASUV0NT+56!, ASUV0NT1+31! |
| DIR("?" | ASUV0NT+38*, ASUV0NT+55* |
| DIR("A" | ASUV0NT+36*, ASUV0NT+43*, ASUV0NT+53* |
| DIR("B" | ASUV0NT+37*, ASUV0NT+44* |
| DIR(0 | ASUV0NT+37*, ASUV0NT+44*, ASUV0NT+54*, ASUV0NT1+31* |
| DT | ASUV0NT+12, STA+1 |
| DTOUT | ASUV0NT+16, ASUV0NT+20, ASUV0NT+40, ASUV0NT+46, ASUV0NT+51, ASUV0NT+57, EXIT+2!, STA+9 |
| DUOUT | ASUV0NT+16, ASUV0NT+20, ASUV0NT+40, ASUV0NT+41*, ASUV0NT+46, ASUV0NT+47*, ASUV0NT+51, ASUV0NT+57, EXIT+2!, STA+9 , STA+15* |
| U | ASUV0NT+22, STA+12 |
| X | ASUV0NT+58, EXIT+2!, STA+12* |
| >> X1 | STA+12* |
| X2 | EXIT+2! |
| Y | ASUV0NT+21, ASUV0NT+22, ASUV0NT+41, ASUV0NT+47, EXIT+2!, STA+10, STA+11, STA+12 |