BPCRXNXT ; IHS/OIT/MJL - FINDS NEXT PERSCRIPTION NUMBER FOR BPC GUI ;
Source file <BPCRXNXT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;S DEAVALUE=0
|
|
| GETDEA(BGUARRAY,DEAVALUE) | ;EP CALL FROM REMOTE PROC: BPC GET RX NEXT NUMBER
|
| Name | Field # of Occurrence |
|---|---|
| AUTO^PSONRXN | EN+7 |
| RPC Name | Call Tags |
|---|---|
| BPC GET RX NEXT NUMBER | GETDEA |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(59 - [#59] | EN+4, EN+5 |
| ^TMP($J | EN+1!, EN+3*, EN+4*, EN+8*, EN+9* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BGUARRAY | GETDEA~, EN+2* |
| >> BPCVAL | EN+4* |
| DEAVALUE | GETDEA~, EN+6, EN+10! |
| DUZ(2 | EN+3, EN+4 |
| PSODRUG | EN+10! |
| PSODRUG("DEA" | EN+6* |
| >> PSONEW("RX #" | , EN+8, EN+9 |
| PSOSITE | EN+5*, EN+10! |
| >> X | EN+1* |
| >> XWBWRAP | EN+2* |