PSOERPT2 ;BIRM/MFR - eRx Patient Medication Profile - Cont'd ; 12/10/22 9:50am
Source file <PSOERPT2.m>
Package | Total | Call Graph |
---|---|---|
Outpatient Pharmacy | 2 | $$PRESOLV^PSOERXA1 $$PROXYDUZ^PSOERXUT |
Kernel | 1 | $$FMADD^XLFDT |
VA FileMan | 1 | $$GET1^DIQ |
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 |
Package | Total | Caller Graph |
---|---|---|
Outpatient Pharmacy | 2 | PSOERPT0 PSOERPT1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
HOLDELIG(ERXLST) | ; Given a list of eRx IENs (array passed in by Reference) it checks if they can all be put on HOLD
|
|
UNHDELIG(ERXLST) | ; Given a list of eRx IENs (array passed in by Reference) it checks if they can all be put on HOLD
|
|
UNHDSTAT(ERXIEN) | ; Returns the Status the eRx should be set to after being Un-Held
|
|
MATCH(TYPE,ERXIEN) | ; Returns the eRx Match for Patient/Provider/Drug
; Input: TYPE - Type of Match (PAM:Patient Match|PRM:Provider Match|DRM:Drug Match) ; ERXIEN - eRx IEN (Pointer to #52.49) |
|
MATCHSRT(PAT,PRO,DRU) | ; Returns the Matching Score for Sorting purpose
|
|
HASACTRX(EPATIEN) | ; Checks whether the eRx Patient has any Actionable prescription (other than on Hold)
; Input: EPATIEN - Pointer to ERX PATIENT file (#52.46) |
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | HOLDELIG+4, HOLDELIG+6, HOLDELIG+7, HOLDELIG+8, UNHDELIG+4, UNHDELIG+6, UNHDELIG+7, UNHDSTAT+2, UNHDSTAT+3, UNHDSTAT+4 , UNHDSTAT+5, UNHDSTAT+6, UNHDSTAT+7, UNHDSTAT+8, UNHDSTAT+9, UNHDSTAT+10, MATCH+7, MATCH+8, MATCH+9, MATCH+10 , HASACTRX+4, HASACTRX+8, HASACTRX+10 |
$$PRESOLV^PSOERXA1 | UNHDSTAT+5, UNHDSTAT+6, UNHDSTAT+7, UNHDSTAT+8, UNHDSTAT+9, UNHDSTAT+10 |
$$PROXYDUZ^PSOERXUT | MATCH+10 |
$$FMADD^XLFDT | HASACTRX+5 |
FileNo | Call Tags |
---|---|
^PS(52.45 - [#52.45] | GET1^DIQ |
^PS(52.49 - [#52.49] | GET1^DIQ |
^PS(59 - [#59] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PS(52.49 - [#52.49] | HASACTRX+6, HASACTRX+7, HASACTRX+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AVAL | MATCH+6~, MATCH+10*, MATCH+11 |
DRU | MATCHSRT~, MATCHSRT+1, MATCHSRT+3, MATCHSRT+4, MATCHSRT+5, MATCHSRT+6, MATCHSRT+8, MATCHSRT+9, MATCHSRT+10, MATCHSRT+12 , MATCHSRT+13 |
DT | HASACTRX+5 |
EPATIEN | HASACTRX~, HASACTRX+6, HASACTRX+7 |
ERXIEN | HOLDELIG+1~, HOLDELIG+3*, HOLDELIG+4, HOLDELIG+6, HOLDELIG+7, HOLDELIG+8, UNHDELIG+1~, UNHDELIG+3*, UNHDELIG+4, UNHDELIG+6 , UNHDELIG+7, UNHDSTAT~, UNHDSTAT+2, UNHDSTAT+3, UNHDSTAT+4, MATCH~, MATCH+7, MATCH+8, MATCH+9, MATCH+10 , HASACTRX+3~, HASACTRX+5*, HASACTRX+7*, HASACTRX+8, HASACTRX+9 |
ERXLST | HOLDELIG~, UNHDELIG~ |
ERXLST( | HOLDELIG+2, HOLDELIG+3, HOLDELIG+5*, HOLDELIG+9*, HOLDELIG+11*, HOLDELIG+13*, HOLDELIG+15*, HOLDELIG+17*, UNHDELIG+2, UNHDELIG+3 , UNHDELIG+5*, UNHDELIG+9* |
ERXSTAT | HOLDELIG+6*, HOLDELIG+10, HOLDELIG+12, HOLDELIG+14, HOLDELIG+16, UNHDELIG+6*, UNHDELIG+8, UNHDSTAT+1~, UNHDSTAT+3*, UNHDSTAT+4 , UNHDSTAT+5*, UNHDSTAT+6*, UNHDSTAT+7*, UNHDSTAT+8*, UNHDSTAT+9*, UNHDSTAT+10*, UNHDSTAT+11 |
ERXSTATI | UNHDSTAT+1~, UNHDSTAT+5*, UNHDSTAT+6*, UNHDSTAT+7*, UNHDSTAT+8*, UNHDSTAT+9*, UNHDSTAT+10* |
HASACTRX | HASACTRX+3~, HASACTRX+5*, HASACTRX+7, HASACTRX+8*, HASACTRX+9, HASACTRX+10*, HASACTRX+11 |
HOLDELIG | HOLDELIG+1~, HOLDELIG+2*, HOLDELIG+4*, HOLDELIG+8*, HOLDELIG+10*, HOLDELIG+12*, HOLDELIG+14*, HOLDELIG+16*, HOLDELIG+18 |
LBDAYS | HASACTRX+3~, HASACTRX+4*, HASACTRX+5 |
MAT | MATCH+6~, MATCH+7*, MATCH+11 |
MORA | MATCH+6~, MATCH+8*, MATCH+11 |
MSGTYPE | HOLDELIG+7*, UNHDELIG+7*, UNHDSTAT+1~, UNHDSTAT+2*, UNHDSTAT+5, UNHDSTAT+6, UNHDSTAT+7, UNHDSTAT+8, UNHDSTAT+9, UNHDSTAT+10 |
PAT | MATCHSRT~, MATCHSRT+1, MATCHSRT+2, MATCHSRT+3, MATCHSRT+5, MATCHSRT+6, MATCHSRT+7, MATCHSRT+8, MATCHSRT+10, MATCHSRT+11 , MATCHSRT+12 |
PRO | MATCHSRT~, MATCHSRT+1, MATCHSRT+2, MATCHSRT+4, MATCHSRT+5, MATCHSRT+6, MATCHSRT+7, MATCHSRT+9, MATCHSRT+10, MATCHSRT+11 , MATCHSRT+13 |
>> PSOSITE | HASACTRX+4 |
RECDAT | HASACTRX+3~, HASACTRX+5*, HASACTRX+6*, HASACTRX+7 |
RELMSGID | HASACTRX+3~, HASACTRX+5*, HASACTRX+9*, HASACTRX+10 |
SEQ | HOLDELIG+1~, HOLDELIG+2*, HOLDELIG+3, HOLDELIG+5, HOLDELIG+9, HOLDELIG+11, HOLDELIG+13, HOLDELIG+15, HOLDELIG+17, UNHDELIG+1~ , UNHDELIG+2*, UNHDELIG+3, UNHDELIG+5, UNHDELIG+9 |
TYPE | MATCH~, MATCH+7, MATCH+8, MATCH+9, MATCH+10 |
UNHDELIG | UNHDELIG+1~, UNHDELIG+2*, UNHDELIG+4*, UNHDELIG+8*, UNHDELIG+10 |
VAL | MATCH+6~, MATCH+9*, MATCH+11 |