CC (RX) UPDATE (140)    IB ACTION TYPE (350.1)

Name Value
NAME CC (RX) UPDATE
ABBREVIATION UPD CCRX
CHARGE CATEGORY CC RX CO-PAYMENT
SERVICE File: 49, IEN: 0
SEQUENCE NUMBER UPDATE
CANCELLATION ACTION TYPE CC (RX) CANCEL
UPDATE ACTION TYPE CC (RX) UPDATE
NEW ACTION TYPE CC (RX) NEW
PLACE ON HOLD YES
BILLING GROUP RX COPAY
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