Quantity in Base Units of Measure
CLEAR: OUT,
RESULT.
IF COMM_STRUCTURE-BILL_RULE CA '45'.
RETURNCODE = 4.
EXIT.
ENDIF.
RESULT = COMM_STRUCTURE-BILL_QTY.
IF COMM_STRUCTURE-DOC_CATEG CA DEB_CRED.
RESULT = RESULT * ( -1 ).
ENDIF.
RETURNCODE = 0.
