Public Function AddPaymentReasonCode( _
   ByVal pIPaymentReasonCode As PaymentReasonCode _
) As PaymentReasonCodeParams