[Home] [Help]
3135: IF ( l_line_num_tab(i) = 1 )
3136: THEN
3137: /*====================================================================+
3138: | Select summary information from either pa_bc_packets or |
3139: | pa_bc_commitments_all. Populate the summary information into |
3140: | host plsql tables. |
3141: | If the summary information of the current txn already exist in the |
3142: | plsql table, proceed with further processing. Otherwise get the |
3143: | summary record from db and populate the plsql table. |
3164: | the plsql table, hit the db. |
3165: +============================================*/
3166: IF (NOT l_found)
3167: THEN
3168: pa_debug.g_err_stage := 'Hitting PA_BC_COMMITMENTS for Summary record R12';
3169: pa_debug.write_file(l_stage || pa_debug.g_err_stage);
3170: BEGIN
3171: SELECT pabcc.Comm_Tot_Raw_Amt
3172: ,pabcc.Comm_Tot_Bd_Amt
3174: ,pabcc.Comm_Bd_Amt_Relieved
3175: ,pabcc.compiled_multiplier
3176: ,pabcc.parent_bc_packet_id
3177: ,pabcc.expenditure_type
3178: ,'PA_BC_COMMITMENTS'
3179: BULK COLLECT
3180: INTO l_temp_Tot_Raw_Amt_tab
3181: ,l_temp_Tot_Bd_Amt_tab
3182: ,l_temp_Raw_Amt_Relieved_tab
3184: ,l_temp_compiled_multiplier_tab
3185: ,l_temp_parent_bc_packet_id_tab
3186: ,l_temp_expenditure_type_tab
3187: ,l_temp_comm_source_tab
3188: FROM pa_bc_commitments pabcc
3189: WHERE pabcc.document_header_id = l_document_header_id_tab(i)
3190: AND pabcc.document_line_id = l_document_line_id_tab(i)
3191: AND pabcc.project_id = l_project_id_tab(i)
3192: AND pabcc.task_id = l_task_id_tab(i)
3198: THEN
3199: RAISE;
3200: END; -- anonymous block
3201: /*=================================================+
3202: | If a record is not found in pa_bc_commitments, |
3203: | try pa_bc_packets. |
3204: +=================================================*/
3205: /*=========================================+
3206: | Bug 4230083 : Added 'C' to status_code. |
3241: WHEN OTHERS
3242: THEN
3243: RAISE;
3244: END; -- anonymous block
3245: END IF; -- record not found in pa_bc_commitments
3246:
3247: IF ( l_temp_Tot_Raw_Amt_tab.COUNT = 0 )
3248: THEN
3249: pa_debug.g_err_stage := 'Summary record NOT found. Rejecting Transaction.';