[Home] [Help]
848:
849: TYPE tab_doc_head_id IS TABLE OF gms_bc_packets.document_header_id%TYPE;
850: TYPE tab_doc_type IS TABLE OF gms_bc_packets.document_type%TYPE;
851: TYPE tab_res_code IS TABLE OF gms_bc_packets.result_code%TYPE;
852: TYPE tab_sta_code IS TABLE OF gms_bc_packets.status_code%TYPE;
853: TYPE tab_dr_code IS TABLE OF gms_bc_packets.entered_dr%TYPE;
854: TYPE tab_cr_code IS TABLE OF gms_bc_packets.entered_cr%TYPE;
855: TYPE tab_bud_task_id IS TABLE OF gms_bc_packets.bud_task_id%TYPE;
856: TYPE tab_proj_id IS TABLE OF gms_bc_packets.project_id%TYPE;
863: TYPE tab_packet_id IS TABLE OF gms_bc_packets.packet_id%TYPE;
864: TYPE tab_bc_packet_id IS TABLE OF gms_bc_packets.bc_packet_id%TYPE;
865: TYPE tab_exp_type IS TABLE OF gms_bc_packets.expenditure_type%TYPE;
866: TYPE tab_ind_comp_setid IS TABLE OF gms_bc_packets.ind_compiled_set_id%TYPE;
867: TYPE tab_set_of_books_id IS TABLE OF gms_bc_packets.set_of_books_id%TYPE; --Bug 5845974
868:
869: tdocument_header_id tab_doc_head_id;
870: tdocument_type tab_doc_type;
871: tresult_code tab_res_code;
1876: ,p_doc_header_id_tab(i)
1877: ,p_doc_dist_id_tab(i)
1878: ,'N' -- For GMSIP 'N' should not cause an issue
1879: ,NULL
1880: ,gms_bc_packets_s.NEXTVAL
1881: ,p_vendor_id_tab(i)
1882: ,p_exp_category_tab(i)
1883: ,p_revenue_category_tab(i)
1884: ,l_request_id
2674: -- Initializing OUT variables
2675: x_return_code := 'P';
2676: l_award_dist_option := 'N';
2677:
2678: SELECT gms_bc_packets_s.nextval
2679: INTO l_packet_id
2680: FROM dual;
2681:
2682: IF g_debug = 'Y' THEN
3407: gbc.time_phased_type_code,
3408: gbc.categorization_code,
3409: gbc.request_id,
3410: gbc.gl_bc_packets_rowid,
3411: gms_bc_packets_s.NEXTVAL,
3412: decode(gbc.burden_adjustment_flag,'Y',gbc.parent_bc_packet_id,gbc.bc_packet_id),
3413: -- In case of burden adjustment flag, use parent_bc_packet_id on raw adjsutment line
3414: gbc.person_id,
3415: gbc.job_id,
4096: x_time_phased_type_code IN pa_budget_entry_methods.time_phased_type_code%TYPE,
4097: x_expenditure_item_date IN DATE,
4098: x_amount_type IN gms_awards.amount_type%TYPE,
4099: x_boundary_code IN gms_awards.boundary_code%TYPE,
4100: x_set_of_books_id IN gms_bc_packets.set_of_books_id%TYPE,
4101:
4102: -- x_budgeted_task_id IN gms_bc_packets.bud_task_id%TYPE,
4103: -- x_bud_res_list_member_id IN NUMBER,
4104: x_start_date OUT NOCOPY DATE,
4643: TYPE t_tptypecd IS TABLE OF gms_bc_packets.time_phased_type_code%TYPE;
4644: TYPE t_expdate IS TABLE OF gms_bc_packets.expenditure_item_date%TYPE;
4645: TYPE t_amttype IS TABLE OF gms_bc_packets.amount_type%TYPE;
4646: TYPE t_boudrcd IS TABLE OF gms_bc_packets.boundary_code%TYPE;
4647: TYPE t_sobid IS TABLE OF gms_bc_packets.set_of_books_id%TYPE;
4648: TYPE t_startdt IS TABLE OF DATE;
4649: TYPE t_enddt IS TABLE OF DATE;
4650: TYPE t_errcode IS TABLE OF NUMBER;
4651: TYPE t_errcbuff IS TABLE OF VARCHAR2(500);
5442: -- Bug 2176230
5443: -- ********************************************************************************
5444: -- NOTE :- Don't Put Any Commit after this point till gms_fc_process is complete,
5445: -- Reason being for funds checking in C Mode (check funds mode)
5446: -- transactions in gms_bc_packets should not be accounted by any other
5447: -- subsequent packet.
5448: -- ********************************************************************************
5449:
5450: insert_arrival_order_seq (x_packetid, x_mode);
6046: -- ==============================================================================
6047: -- ********************* RESOURCE LEVEL SUMMARY UPDATE ************************
6048: -- ==============================================================================
6049: -- Bug 2092791
6050: -- Following Insert statement inserts records in gms_bc_packets_summary.
6051: -- Records in this table will later be used to summarize amount at
6052: -- resource,task and Award Level for previous and currne packet.
6053: IF g_debug = 'Y' THEN
6054: gms_error_pkg.gms_debug ('RESOURCE LEVEL - SUMMARY INSERT ', 'C');
6075: LOCK_BUDGET_VERSIONS(x_packetid);
6076: End If;
6077:
6078: -- Bug 2605070, Replaced bud_resource_list_member_id with resource_list_member_id
6079: INSERT INTO gms_bc_packets_summary
6080: (packet_id,
6081: creation_date,
6082: budget_version_id,
6083: top_task_id,
6194: SUM(actual_approved), --Bug 2490381 : Added SUM
6195: SUM(actual_pending), --Bug 2490381 : Added SUM
6196: SUM(enc_approved), --Bug 2490381 : Added SUM
6197: SUM(enc_pending) --Bug 2490381 : Added SUM
6198: FROM gms_bc_packets_summary gmsbcs
6199: WHERE gmsbcs.packet_id = x_packetid
6200: AND gmsbcs.bud_task_id = bp.bud_task_id
6201: AND gmsbcs.budget_version_id = bp.budget_version_id
6202: AND gmsbcs.resource_list_member_id =
6387: --===============================================================================
6388: -- RESOURCE LEVEL : INSERT NEGATIVE IN SUMMARY FOR FAILED TRANSACTIONS
6389: --===============================================================================
6390: g_error_stage := 'FC PR : RES INSERT NEG';
6391: INSERT INTO gms_bc_packets_summary
6392: (packet_id,
6393: creation_date,
6394: budget_version_id,
6395: top_task_id,
6491: SUM(actual_approved),
6492: SUM(actual_pending),
6493: SUM(enc_approved),
6494: SUM(enc_pending)
6495: FROM gms_bc_packets_summary gmsbcs
6496: WHERE gmsbcs.packet_id = x_packetid
6497: AND gmsbcs.bud_task_id = bp.bud_task_id
6498: AND gmsbcs.budget_version_id = bp.budget_version_id
6499: AND gmsbcs.parent_resource_id = bp.parent_resource_id
6681: --===============================================================================
6682: -- RESOURCE GROUP LEVEL : INSERT NEGATIVE IN SUMMARY FOR FAILED TRANSACTIONS
6683: --===============================================================================
6684: g_error_stage := 'FC PR : RESG IN NEG';
6685: INSERT INTO gms_bc_packets_summary
6686: (packet_id,
6687: creation_date,
6688: budget_version_id,
6689: top_task_id,
6768: SUM (actual_approved),
6769: SUM (actual_pending),
6770: SUM (enc_approved),
6771: SUM (enc_pending)
6772: FROM gms_bc_packets_summary gmsbcs
6773: WHERE gmsbcs.packet_id = x_packetid
6774: AND gmsbcs.budget_version_id = bp.budget_version_id
6775: AND gmsbcs.bud_task_id = bp.bud_task_id
6776: --Bug 2490381 : Changed "=" to "<=" to consider all the
6950: --==========================================================================
6951: -- TASK LEVEL : INSERT NEGATIVE IN SUMMARY FOR FAILED TRANSACTIONS
6952: --==========================================================================
6953: g_error_stage := 'FC PR : TASK IN NEG';
6954: INSERT INTO gms_bc_packets_summary
6955: (packet_id,
6956: creation_date,
6957: budget_version_id,
6958: top_task_id,
7037: SUM (actual_approved),
7038: SUM (actual_pending),
7039: SUM (enc_approved),
7040: SUM (enc_pending)
7041: FROM gms_bc_packets_summary gmsbcs
7042: WHERE gmsbcs.packet_id = x_packetid
7043: AND gmsbcs.budget_version_id = bp.budget_version_id
7044: AND gmsbcs.top_task_id = bp.top_task_id
7045: --Bug 2490381 : Changed "=" to "<=" to consider all the
7218: End if;
7219: End If;
7220:
7221: g_error_stage := 'FC PR : TTASK IN NEG';
7222: INSERT INTO gms_bc_packets_summary
7223: (packet_id,
7224: creation_date,
7225: budget_version_id,
7226: budget_period_start_date,
7298: SUM (actual_approved),
7299: SUM (actual_pending),
7300: SUM (enc_approved),
7301: SUM (enc_pending)
7302: FROM gms_bc_packets_summary gmsbcs
7303: WHERE gmsbcs.packet_id = x_packetid
7304: AND gmsbcs.budget_version_id = bp.budget_version_id
7305: --Bug 2490381 : Changed "=" to "<=" to consider all the
7306: -- records from summary table which fall
7494: --================================================================================--
7495: -- Data clean up code from summary tables after Amount calculation
7496: --================================================================================--
7497: g_error_stage := 'FC PR : DELETE';
7498: DELETE gms_bc_packets_summary
7499: WHERE packet_id = x_packetid;
7500: DELETE gms_bc_packets_bvid
7501: WHERE packet_id = x_packetid;
7502:
7528: -- This function calls all the procedures and functions for funds checker
7529: --------------------------------------------------------------------------------------------------------------------------------------------------
7530: -- Funds Check Processor
7531: FUNCTION gms_fcp (
7532: x_sobid IN gms_bc_packets.set_of_books_id%TYPE,
7533: x_packetid IN gms_bc_packets.packet_id%TYPE,
7534: x_mode IN VARCHAR2,
7535: x_partial IN VARCHAR2,
7536: x_arrival_seq IN gl_bc_packet_arrival_order.arrival_seq%TYPE,
7572: -- Bug 2176230
7573: -- ********************************************************************************
7574: -- NOTE :- Don't Put Any Commit after this point till gms_fc_process is complete,
7575: -- Reason being for funds checking in C Mode (check funds mode)
7576: -- transactions in gms_bc_packets should not be accounted by any other
7577: -- subsequent packet. (Applicable for x_mode = R,U,C,E)
7578: -- ********************************************************************************
7579:
7580: