PSO SC RX COPAY CANCEL (5)    IB ACTION TYPE (350.1)

Name Value
NAME PSO SC RX COPAY CANCEL
ABBREVIATION CAN SC
CHARGE CATEGORY RX CO-PAYMENT/SC VET
SEQUENCE NUMBER CANCEL
CANCELLATION ACTION TYPE PSO SC RX COPAY CANCEL
UPDATE ACTION TYPE PSO SC RX COPAY UPDATE
NEW ACTION TYPE PSO SC RX COPAY NEW
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