Name | Value |
---|---|
NAME | CC MTF (RX) UPDATE |
ABBREVIATION | UPD CCDR |
CHARGE CATEGORY | CC MTF RX CO-PAYMENT |
SERVICE | File: 49, IEN: 0 |
SEQUENCE NUMBER | UPDATE |
CANCELLATION ACTION TYPE | CC MTF (RX) CANCEL |
UPDATE ACTION TYPE | CC MTF (RX) UPDATE |
NEW ACTION TYPE | CC MTF (RX) NEW |
PLACE ON HOLD | YES |
BILLING GROUP | RX COPAY |
INACTIVE | 1 |
PARENT TRACE LOGIC | D PTL^IBAUTL |
SET LOGIC | S:'$D(^(10)) X="" I $D(^(10)) X ^(10) S X=$S($D(Y(0)):$P(Y(0),U),1:"UNK") I $D(Y(0)) S X=X_"-"_$S($$DRUG^IBRXUTL1(+$P(Y(0),U,6))'="":$$DRUG^IBRXUTL1(+$P(Y(0),U,6)),1:"UNK DRUG"),X=$E(X,1,18)_"-"_$S($D(IBUNIT):IBUNIT,$D(IBX):$P(IBX,U,2),1:"") |
FULL PROFILE LOGIC | I $D(X) D EN^PSOCPVW |