PSOERXU9 ;ALB/ART - eRx Holding Queue Utilities ;02/02/2021
Source file <PSOERXU9.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 |
|---|---|---|
| ERXIEN(RXIEN) | ;Pass through to $$ERXIEN^PSOERXUT
; Input: (r) RXIEN - Pointer to either the PENDING ORDERS file (#52.41) (e.g., "139839P") or PRESCRIPTION file (#52) (e.g., 12930984) |
|
| CHKERX(ORDERIEN) | ;Pass through to $$CHKERX^PSOERXU1
; Input: (r) ORDERIEN - Order (100) file IEN |
|
| ERXPATDFN(ERXIEN) | ;Get patient DFN from eRx Holding Queue (52.49)
; Input: (r) ERXIEN - eRx Holding Queue IEN |
|
| ERXPATDOB(ERXDFN) | ;Get patient DoB from ERX External Patient (52.46)
; Input: (r) ERXDFN - patient DFN from eRx Holding Queue (52.49) |
|
| ERXHUBID(ERXIEN) | ;Get ERX HUB ID (.01) from eRx Holding Queue (52.49)
; Input: (r) ERXIEN - eRx Holding Queue IEN |
|
| ERXDATA(ERXDATA,ERXIEN) | ;Get eRx Holding Queue Data
|
|
| ALRGDATA(ALRGDATA,ERXIEN,SORTED) | ; Get eRx Patient Allergy Data
|
|
| PDUEDATA(PDUEDATA,ERXIEN,SORTED) | ; Get eRx Prescriber Drug Use Evaluation Data
|
|
| CHVAELIG(DFN) | ; Returns whether the VistA Patient is ChampVA Eligible or not (Used by MbM sites only)
; Input: DFN - Pointer to the PATIENT file (#2) |
| FileNo | Call Tags |
|---|---|
| ^PS(52.46 - [#52.46] | GET1^DIQ, GETS^DIQ |
| ^PS(52.47 - [#52.47] | GETS^DIQ |
| ^PS(52.48 - [#52.48] | GETS^DIQ |
| ^PS(52.49 - [#52.49] | GET1^DIQ, GETS^DIQ |
| 52.49311 | GETS^DIQ |
| ^PS(59.7 - [#59.7] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(52.49 - [#52.49] | ERXDATA+11, ALRGDATA+9, PDUEDATA+9, PDUEDATA+13 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ALRARRAY | ALRGDATA+12~, ALRGDATA+13*, PDUEDATA+12~, PDUEDATA+14* |
| ALRARRAY( | ALRGDATA+17, ALRGDATA+18, ALRGDATA+19, ALRGDATA+20, ALRGDATA+21, ALRGDATA+22, ALRGDATA+23, ALRGDATA+24, ALRGDATA+25, ALRGDATA+26 , ALRGDATA+27, ALRGDATA+28, ALRGDATA+29, ALRGDATA+30, ALRGDATA+31, PDUEDATA+18, PDUEDATA+19, PDUEDATA+20, PDUEDATA+21, PDUEDATA+22 , PDUEDATA+23, PDUEDATA+24, PDUEDATA+25, PDUEDATA+26, PDUEDATA+27, PDUEDATA+28 |
| ALRGDATA | ALRGDATA~, ALRGDATA+10! |
| ALRGDATA( | ALRGDATA+34* |
| COUNT | ALRGDATA+15~, ALRGDATA+32*, ALRGDATA+34*, PDUEDATA+16~, PDUEDATA+29*, PDUEDATA+31* |
| DATA | ALRGDATA+12~, PDUEDATA+12~ |
| DATA( | ALRGDATA+13, PDUEDATA+14 |
| DFN | CHVAELIG~, CHVAELIG+6 |
| DRUGIEN | ERXDATA+25~*, ERXDATA+64 |
| DRUGNAME | ERXDATA+24~*, ERXDATA+64 |
| ELIG | CHVAELIG+4~, CHVAELIG+7 |
| ERR | ERXDATA+14~, ERXDATA+31~, ERXDATA+41~, ERXDATA+52~ |
| ERXDATA | ERXDATA~, ERXDATA+12! |
| ERXDATA(1 | ERXDATA+64* |
| ERXDATA(2 | ERXDATA+65* |
| ERXDATA(3 | ERXDATA+66* |
| ERXDATA(4 | ERXDATA+67* |
| ERXDATA(5 | ERXDATA+68* |
| ERXDFN | ERXPATDOB~, ERXPATDOB+5, ERXPATDOB+6 |
| ERXHQ | ERXDATA+14~ |
| ERXHQ( | ERXDATA+17, ERXDATA+18, ERXDATA+19, ERXDATA+20, ERXDATA+21, ERXDATA+22, ERXDATA+23, ERXDATA+24, ERXDATA+25, ERXDATA+26 , ERXDATA+28, ERXDATA+29 |
| ERXIEN | ERXPATDFN~, ERXPATDFN+5, ERXPATDFN+6, ERXHUBID~, ERXHUBID+5, ERXHUBID+6, ERXDATA~, ERXDATA+10, ERXDATA+11, ERXDATA+15 , ALRGDATA~, ALRGDATA+9, ALRGDATA+13, PDUEDATA~, PDUEDATA+9, PDUEDATA+13, PDUEDATA+14 |
| ERXIENS | ERXDATA+15~*, ERXDATA+16, ERXDATA+17, ERXDATA+18, ERXDATA+19, ERXDATA+20, ERXDATA+21, ERXDATA+22, ERXDATA+23, ERXDATA+24 , ERXDATA+25, ERXDATA+26, ERXDATA+28, ERXDATA+29 |
| ERXPAT | ERXDATA+52~ |
| ERXPAT( | ERXDATA+55, ERXDATA+56, ERXDATA+57, ERXDATA+58, ERXDATA+59, ERXDATA+60, ERXDATA+61, ERXDATA+62 |
| ERXPHARM | ERXDATA+31~ |
| ERXPHARM( | ERXDATA+34, ERXDATA+35, ERXDATA+36, ERXDATA+37, ERXDATA+38, ERXDATA+39 |
| ERXPROV | ERXDATA+41~ |
| ERXPROV( | ERXDATA+44, ERXDATA+45, ERXDATA+46, ERXDATA+47, ERXDATA+48, ERXDATA+49, ERXDATA+50 |
| ERXQUANT | ERXDATA+28~*, ERXDATA+64 |
| ERXREFIL | ERXDATA+29~*, ERXDATA+64 |
| EXDEA | ERXDATA+26~*, ERXDATA+27*, ERXDATA+64 |
| EXEC | CHVAELIG+4~, CHVAELIG+6* |
| EXPATDFN | ERXDATA+20~*, ERXDATA+67 |
| EXPATIEN | ERXDATA+19~*, ERXDATA+53 |
| EXPATIENS | ERXDATA+53~*, ERXDATA+54, ERXDATA+55, ERXDATA+56, ERXDATA+57, ERXDATA+58, ERXDATA+59, ERXDATA+60, ERXDATA+61, ERXDATA+62 |
| EXPHID | ERXDATA+23~*, ERXDATA+32 |
| EXPHIDS | ERXDATA+32~*, ERXDATA+33, ERXDATA+34, ERXDATA+35, ERXDATA+36, ERXDATA+37, ERXDATA+38, ERXDATA+39 |
| EXPRVDUZ | ERXDATA+22~*, ERXDATA+65 |
| EXPRVIEN | ERXDATA+21~*, ERXDATA+42 |
| EXPRVIENS | ERXDATA+42~*, ERXDATA+43, ERXDATA+44, ERXDATA+45, ERXDATA+46, ERXDATA+47, ERXDATA+48, ERXDATA+49, ERXDATA+50 |
| EXSEQ | ALRGDATA+15~, ALRGDATA+16*, ALRGDATA+17*, ALRGDATA+18, ALRGDATA+19, ALRGDATA+20, ALRGDATA+21, ALRGDATA+22, ALRGDATA+23, ALRGDATA+24 , ALRGDATA+25, ALRGDATA+26, ALRGDATA+27, ALRGDATA+28, ALRGDATA+29, ALRGDATA+30, ALRGDATA+31, ALRGDATA+32*, ALRGDATA+33*, ALRGDATA+34 , PDUEDATA+16~, PDUEDATA+17*, PDUEDATA+18*, PDUEDATA+19, PDUEDATA+20, PDUEDATA+21, PDUEDATA+22, PDUEDATA+23, PDUEDATA+24, PDUEDATA+25 , PDUEDATA+26, PDUEDATA+27, PDUEDATA+28, PDUEDATA+29*, PDUEDATA+30*, PDUEDATA+31 |
| HUBID | ERXDATA+17~*, ERXDATA+64 |
| INDEX | ALRGDATA+15~, ALRGDATA+18*, ALRGDATA+19, ALRGDATA+20, ALRGDATA+21, ALRGDATA+22, ALRGDATA+23, ALRGDATA+24, ALRGDATA+25, ALRGDATA+26 , ALRGDATA+27, ALRGDATA+28, ALRGDATA+29, ALRGDATA+30, ALRGDATA+31, PDUEDATA+16~, PDUEDATA+19*, PDUEDATA+20, PDUEDATA+21, PDUEDATA+22 , PDUEDATA+23, PDUEDATA+24, PDUEDATA+25, PDUEDATA+26, PDUEDATA+27, PDUEDATA+28 |
| MBMELAPI | CHVAELIG+4~*, CHVAELIG+6 |
| MEDIEN | PDUEDATA+12~, PDUEDATA+13*, PDUEDATA+14 |
| ORDERIEN | CHKERX~, CHKERX+4, CHKERX+5 |
| PATCITY | ERXDATA+60~*, ERXDATA+68 |
| PATDFN | ERXDATA+57~* |
| PATDOB | ERXDATA+56~*, ERXDATA+68 |
| PATNAME | ERXDATA+55~*, ERXDATA+67 |
| PATSTATE | ERXDATA+61~*, ERXDATA+68 |
| PATSTR1 | ERXDATA+58~*, ERXDATA+68 |
| PATSTR2 | ERXDATA+59~*, ERXDATA+68 |
| PATZIP | ERXDATA+62~*, ERXDATA+68 |
| PDUEDATA | PDUEDATA~, PDUEDATA+10! |
| PDUEDATA( | PDUEDATA+31* |
| PHCITY | ERXDATA+37~* |
| PHDEA | ERXDATA+35~* |
| PHNAME | ERXDATA+34~* |
| PHSTATE | ERXDATA+38~* |
| PHSTREET | ERXDATA+36~* |
| PHZIP | ERXDATA+39~* |
| PROVNAME | ERXDATA+44~*, ERXDATA+65 |
| PRVCITY | ERXDATA+48~*, ERXDATA+66 |
| PRVDEANBR | ERXDATA+45~*, ERXDATA+65 |
| PRVSTATE | ERXDATA+49~*, ERXDATA+66 |
| PRVSTR1 | ERXDATA+46~*, ERXDATA+66 |
| PRVSTR2 | ERXDATA+47~* |
| PRVZIP | ERXDATA+50~*, ERXDATA+66 |
| RCVDDATE | ERXDATA+18~*, ERXDATA+64 |
| RXIEN | ERXIEN~, ERXIEN+4, ERXIEN+5 |
| SORTED | ALRGDATA~, ALRGDATA+18, PDUEDATA~, PDUEDATA+19 |
| TMPDATA | ALRGDATA+15~, PDUEDATA+16~ |
| TMPDATA( | ALRGDATA+19*, ALRGDATA+20*, ALRGDATA+21*, ALRGDATA+22*, ALRGDATA+23*, ALRGDATA+24*, ALRGDATA+25*, ALRGDATA+26*, ALRGDATA+27*, ALRGDATA+28* , ALRGDATA+29*, ALRGDATA+30*, ALRGDATA+31*, ALRGDATA+33, ALRGDATA+34, PDUEDATA+20*, PDUEDATA+21*, PDUEDATA+22*, PDUEDATA+23*, PDUEDATA+24* , PDUEDATA+25*, PDUEDATA+26*, PDUEDATA+27*, PDUEDATA+28*, PDUEDATA+30, PDUEDATA+31 |
| U | ERXDATA+64, ERXDATA+65, ERXDATA+66, ERXDATA+67, ERXDATA+68, ALRGDATA+19, ALRGDATA+20, ALRGDATA+21, ALRGDATA+22, ALRGDATA+23 , ALRGDATA+24, ALRGDATA+25, ALRGDATA+26, ALRGDATA+27, ALRGDATA+28, ALRGDATA+29, ALRGDATA+30, ALRGDATA+31, PDUEDATA+20, PDUEDATA+21 , PDUEDATA+22, PDUEDATA+23, PDUEDATA+24, PDUEDATA+25, PDUEDATA+26, PDUEDATA+27, PDUEDATA+28 |
| Name | Field # of Occurrence |
|---|---|
| $T(@MBMELAPI | CHVAELIG+5 |