PRCA PENALTY (150) FUNCTION (.5)
Name
Value
NAME
PRCA PENALTY
MUMPS CODE
S X=$S($G(PRCABN):PRCABN,$G(D0):D0,1:"") S:X X=$P($G(^PRCA(430,+X,0)),"^",10) S:X X=+$$PEN^RCMSFN01(X)*100
EXPLANATION
Returns the rate of penalty for a bill.
DATE-VALUED
NO
