PRCA INTEREST (149) FUNCTION (.5)
Name
Value
NAME
PRCA INTEREST
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=+$$INT^RCMSFN01(X)*100
EXPLANATION
Returns the rate of interest for a bill
DATE-VALUED
NO
