CC MTF (RX) UPDATE (164)    IB ACTION TYPE (350.1)

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