PRCA ADMIN (148) FUNCTION (.5)
Name
Value
NAME
PRCA ADMIN
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=$J(+$$ADM^RCMSFN01(X),0,2)
EXPLANATION
Returns the admin charge for a bill
DATE-VALUED
NO
