PSOORED7 ;ISC-BHAM/MFR - edit orders from backdoor con't ;03/06/95 10:24
Source file <PSOORED7.m>
Package | Total | Call Graph |
---|---|---|
Outpatient Pharmacy | 11 | ($$LSTRFL,ECMESND,REVERSE)^PSOBPSU1 ($$RXSITE,$$STATUS,$$SUBMIT)^PSOBPSUT EDTDAW^PSODAWUT (DAYS,QTY,REFILL)^PSODIR1 SET^PSODRG ($$GETNDC,NDCEDT)^PSONDCUT (CHK1,REF)^PSOORED2 DOLST^PSOORED3 $$PSOET^PSOREJP3 $$HDLG^PSOREJU1 $$FIND^PSOREJUT |
VA FileMan | 3 | ^DIC GETS^DIQ EN^DIQ1 |
E Claims Management Engine | 2 | $$DIVNCPDP^BPSBUTL $$ECMEON^BPSUTIL |
List Manager | 1 | PAUSE^VALM1 |
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 | 3 | PSOORED3 PSOORED6 PSOOREDT |
Name | Comments | DBIA/ICR reference |
---|---|---|
NOCHG | ||
VER | ;checks for changes to dosing instructions
|
|
RESUB | ; Resubmits 3rd party claim in case of an edit (Original)
|
|
CHANGED(RX,PRIOR) | ; - Check if fields have changed and should for 3rd Party Claim resubmission
|
|
NDCDAWDE(ST,FLN,RXN) | ; allow edit of NDC & DAW for DC'd/expired ECME RXs
|
Name | Field # of Occurrence |
---|---|
$$DIVNCPDP^BPSBUTL | CHANGED+8 |
$$ECMEON^BPSUTIL | RESUB+4 |
^DIC | NOCHG+19, NOCHG+23 |
GETS^DIQ | CHANGED+5 |
EN^DIQ1 | NOCHG+3 |
$$LSTRFL^PSOBPSU1 | NDCDAWDE+9, NDCDAWDE+21 |
ECMESND^PSOBPSU1 | RESUB+8 |
REVERSE^PSOBPSU1 | RESUB+5 |
$$RXSITE^PSOBPSUT | RESUB+4 |
$$STATUS^PSOBPSUT | RESUB+7, NDCDAWDE+9 |
$$SUBMIT^PSOBPSUT | RESUB+6 |
EDTDAW^PSODAWUT | NDCDAWDE+27 |
DAYS^PSODIR1 | NOCHG+7 |
QTY^PSODIR1 | NOCHG+15 |
REFILL^PSODIR1 | NOCHG+12, NOCHG+26 |
SET^PSODRG | NOCHG+23 |
$$GETNDC^PSONDCUT | RESUB+8, NDCDAWDE+14 |
NDCEDT^PSONDCUT | NDCDAWDE+15 |
CHK1^PSOORED2 | NOCHG |
REF^PSOORED2 | NDCDAWDE+22 |
DOLST^PSOORED3 | NOCHG+5 |
$$PSOET^PSOREJP3 | RESUB+10 |
$$HDLG^PSOREJU1 | RESUB+12 |
$$FIND^PSOREJUT | RESUB+12 |
PAUSE^VALM1 | NOCHG, NOCHG+1 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^PSRX - [#52] | GETS^DIQ |
Name | Line Occurrences |
---|---|
$$CHANGED | RESUB+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CHANGED | RESUB+1~*, RESUB+2, RESUB+4, RESUB+7, RESUB+8, CHANGED+4~, CHANGED+5*, CHANGED+6, CHANGED+7*, CHANGED+8* , CHANGED+9 |
>> CHGNDC | RESUB+8 |
CMRL | NOCHG*!, NOCHG+1!, NOCHG+2! |
>> DA | NOCHG+3*, NOCHG+4 |
DAW | NDCDAWDE+26~, NDCDAWDE+27, NDCDAWDE+28, NDCDAWDE+29 |
DIC | NOCHG+2!, NOCHG+3*!, NOCHG+19*!, NOCHG+23* |
DIC(0 | NOCHG+19*, NOCHG+23* |
DIQ | NOCHG+2!, NOCHG+3*! |
>> DR | NOCHG+4 |
>> DRG | NDCDAWDE+15 |
>> DRGIEN | NOCHG+11 |
DURATION | VER+9*, VER+10, VER+15! |
>> ENTS | VER+1*, VER+2*, VER+3 |
>> FLDS | RESUB+1 |
FLN | NOCHG, NOCHG+1, NOCHG+4, NOCHG+6, NOCHG+14, NOCHG+17, NDCDAWDE~, NDCDAWDE+6, NDCDAWDE+8, NDCDAWDE+12 , NDCDAWDE+20, NDCDAWDE+25 |
>> I | NOCHG+25*, VER+2*, VER+4*, VER+5, VER+6, VER+7, VER+8, VER+9, VER+10, VER+11 , VER+12, VER+13, VER+14, CHANGED+6*, CHANGED+7 |
NDC | NDCDAWDE+13~, NDCDAWDE+14*, NDCDAWDE+15, NDCDAWDE+16, NDCDAWDE+17 |
>> OLENT | VER+3, VER+4 |
PRIOR | CHANGED~ |
PRIOR(52 | CHANGED+7, CHANGED+8 |
PSODRUG | NOCHG+23! |
PSODRUG("DAW" | NDCDAWDE+29* |
PSODRUG("IEN" | NOCHG+23 |
PSODRUG("NDC" | NDCDAWDE+17* |
>> PSORXED | NOCHG+7, NOCHG+12, NOCHG+15, NOCHG+26 |
>> PSORXED( | NOCHG+4* |
>> PSORXED("# OF | REFILLS" , NOCHG+13, NOCHG+28, NOCHG+29 |
>> PSORXED("CONJUNCTION" | VER+11 |
>> PSORXED("DAYS | SUPPLY" , NOCHG+8, NOCHG+24* |
>> PSORXED("DFLG" | NOCHG+7, NOCHG+12, NOCHG+15, NOCHG+27 |
>> PSORXED("DOSE | ORDERED" , VER+7 |
>> PSORXED("DOSE" | NOCHG+5, VER+2, VER+5, VER+6 |
>> PSORXED("DURATION" | VER+8, VER+10 |
>> PSORXED("FLD" | NOCHG+7!, NOCHG+8*, NOCHG+12!, NOCHG+13*, NOCHG+15!, NOCHG+16*, NOCHG+27!, NOCHG+29*, NDCDAWDE+17*, NDCDAWDE+29* |
>> PSORXED("IRXN" | NOCHG+1, NOCHG+3, NOCHG+25, VER+4, VER+5, VER+6, VER+7, VER+9, VER+11, VER+12 , VER+13, VER+14, RESUB+1, RESUB+3 |
>> PSORXED("ODOSE" | VER+14 |
>> PSORXED("PATI | ENT STATUS" , NOCHG+18, NOCHG+21* |
>> PSORXED("PTST | NODE" , NOCHG+20* |
>> PSORXED("QTY" | NOCHG+16 |
>> PSORXED("ROUTE" | VER+12 |
>> PSORXED("SCHEDULE" | VER+13 |
>> PSORXED(52 | NOCHG+4 |
>> PSOSIGFL | VER+3*, VER+5*, VER+7*, VER+10*, VER+11*, VER+12*, VER+13*, VER+14* |
>> PSOSITE | NDCDAWDE+15 |
PSOY | NOCHG+23!* |
PSOY(0 | NOCHG+23* |
RFTT | NOCHG+25*, NOCHG+26! |
RX | RESUB+3~*, RESUB+4, RESUB+5, RESUB+6, RESUB+7, RESUB+8, RESUB+10, RESUB+12, CHANGED~, CHANGED+5 , CHANGED+7, CHANGED+8 |
>> RX0 | NOCHG+18, NOCHG+23, NOCHG+24, NOCHG+28 |
RXN | NDCDAWDE~, NDCDAWDE+6, NDCDAWDE+9, NDCDAWDE+14, NDCDAWDE+15, NDCDAWDE+21, NDCDAWDE+27 |
SAVED | CHANGED+4~ |
SAVED(52 | CHANGED+7, CHANGED+8 |
ST | NDCDAWDE~, NDCDAWDE+6, NDCDAWDE+7 |
U | NOCHG+1 |
>> VALMSG | NDCDAWDE+7*, NDCDAWDE+8*, NDCDAWDE+9*, NDCDAWDE+21* |
X | NOCHG+18*, NOCHG+22!, NOCHG+23*, RESUB+10*, RESUB+12* |
Y | NOCHG+20, NOCHG+21, NOCHG+22!, NOCHG+23 |
Y(0 | NOCHG+20, NOCHG+23 |