R032_AUTH

if SMH_CLIENT_TRAN_TYPE = 'R' and TBT_TRAN_STATUS = 'P'
and XQO_LIMIT_AMT ne . and XQO_LIMIT_AMT ne 0
then do;
    if RQO_TRAN_DATE = _2_R032_PREV_DT
    and DHMS(RQO_TRAN_DATE, 0, 0, RQO_TRAN_TIME) - _2_R032_CHANGE_DT
    < DHMS(7, 0, 0, 0)
    and _2_R032_CUM_AMT + TBT_MOD_AMT > 0.8 * XQO_LIMIT_AMT
    and TBT_MOD_AMT >= 275250
    then do;
        %Action_Hold();
    end;
    else if RQO_TRAN_DATE ne _2_R032_PREV_DT
    and DHMS(RQO_TRAN_DATE, 0, 0, RQO_TRAN_TIME) -
    DHMS(_2_R032_PREV_DT, 0, 0, _2_R032_PREV_TIME) < DHMS(0, 24, 0, 0)
    and DHMS(RQO_TRAN_DATE, 0, 0, RQO_TRAN_TIME) - _2_R032_CHANGE_DT
    < DHMS(7, 0, 0, 0)
    and TBT_MOD_AMT > 0.8 * XQO_LIMIT_AMT
    and TBT_MOD_AMT >= 275250
    then do;
        %Action_Hold();
    end;
end;