[Home] [Help]
812: v_customer_trx_id, SYSDATE, v_reg_code,
813: v_creation_date, v_created_by,v_last_update_date,
814: v_last_updated_by, v_last_update_login );
815: vsqlstmt := '22';
816: SELECT JAI_CMN_RG_23AC_I_TRXS_S.CURRVAL INTO v_part_i_register_id from dual;
817: END IF ;--Added by Xiao for Open Interface ER bug#11683927.
818: END IF;
819: END IF;
820: IF v_reg_code in ('DOMESTIC_EXCISE','EXPORT_EXCISE') THEN
949: WHERE register_id = v_pla_register_no)
950: WHERE register_id = v_rg23_part_i_no;
951: END IF;
952: ELSIF v_item_class IN ('RMIN','RMEX','CGIN','CGEX') THEN
953: SELECT JAI_CMN_RG_23AC_I_TRXS_S.CURRVAL INTO v_rg23_part_i_no from dual;
954: IF l_rec.payment_register IN( 'RG23A','RG23C') THEN
955: SELECT JAI_CMN_RG_23AC_II_TRXS_S.CURRVAL INTO v_rg23_part_ii_no from dual;
956: UPDATE JAI_CMN_RG_23AC_I_TRXS
957: SET REGISTER_ID_PART_II = v_rg23_part_ii_no,
952: ELSIF v_item_class IN ('RMIN','RMEX','CGIN','CGEX') THEN
953: SELECT JAI_CMN_RG_23AC_I_TRXS_S.CURRVAL INTO v_rg23_part_i_no from dual;
954: IF l_rec.payment_register IN( 'RG23A','RG23C') THEN
955: SELECT JAI_CMN_RG_23AC_II_TRXS_S.CURRVAL INTO v_rg23_part_ii_no from dual;
956: UPDATE JAI_CMN_RG_23AC_I_TRXS
957: SET REGISTER_ID_PART_II = v_rg23_part_ii_no,
958: CHARGE_ACCOUNT_ID = (SELECT CHARGE_ACCOUNT_ID FROM JAI_CMN_RG_23AC_II_TRXS
959: WHERE register_id = v_rg23_part_ii_no)
960: WHERE register_id = v_rg23_part_i_no;
959: WHERE register_id = v_rg23_part_ii_no)
960: WHERE register_id = v_rg23_part_i_no;
961: ELSIF l_rec.payment_register IN( 'PLA') THEN
962: SELECT JAI_CMN_RG_PLA_TRXS_S1.CURRVAL INTO v_pla_register_no from dual;
963: UPDATE JAI_CMN_RG_23AC_I_TRXS
964: SET REGISTER_ID_PART_II = v_pla_register_no,
965: CHARGE_ACCOUNT_ID = (SELECT CHARGE_ACCOUNT_ID FROM JAI_CMN_RG_PLA_TRXS
966: WHERE register_id = v_pla_register_no)
967: WHERE register_id = v_rg23_part_i_no;