eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PA_FAXFACE dependencies on PA_DEBUG

Line 155: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

151: RETURN NUMBER
152: IS
153: asset_category_id NUMBER;
154: -- Fix for bug : 4878878
155: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
156: BEGIN
157:
158: --Bug 3250512: With receipt accruals the cdl.system_reference2 and cdl.system_reference3 corresponds to
159: --po_header_id and po_distribution_id. Hence need to add another SQL to fetch asset category for

Line 162: pa_debug.debug('Inside get_asset_category_id, x_doc_header_id = ' || x_doc_header_id ||

158: --Bug 3250512: With receipt accruals the cdl.system_reference2 and cdl.system_reference3 corresponds to
159: --po_header_id and po_distribution_id. Hence need to add another SQL to fetch asset category for
160: --receipt accrual items.
161: IF G_debug_mode = 'Y' THEN
162: pa_debug.debug('Inside get_asset_category_id, x_doc_header_id = ' || x_doc_header_id ||
163: ' x_doc_line_num = '|| x_doc_line_num ||
164: ' x_doc_dist_id = '|| x_doc_dist_id ||
165: ' x_transaction_source = ' || x_transaction_source);
166: END IF;

Line 237: pa_debug.debug('asset_category_id = ' || asset_category_id);

233:
234: End If;
235:
236: IF G_debug_mode = 'Y' THEN
237: pa_debug.debug('asset_category_id = ' || asset_category_id);
238: END IF;
239:
240: RETURN asset_category_id;
241:

Line 911: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

907: cdl_fully_reversible BOOLEAN; -- This flag will indicate if the
908: -- project asset line is fully reversed
909: x_translated_reversal VARCHAR2(80);
910: -- Fix for bug : 4878878
911: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
912: BEGIN
913:
914: x_err_code := 0;
915: x_err_stage := 'Reversing the Asset Lines';

Line 926: pa_debug.debug('reverse_asset_lines: ' || '. No assets to be reversed');

922: x_err_code);
923:
924: IF ( NOT asset_found ) THEN
925: IF G_debug_mode = 'Y' THEN
926: pa_debug.debug('reverse_asset_lines: ' || '. No assets to be reversed');
927: END IF;
928: RETURN;
929: END IF;
930:

Line 951: pa_debug.debug('reverse_asset_lines: ' || '. Detail Line Id=' ||

947:
948: cdl_fully_reversible := TRUE;
949:
950: IF G_debug_mode = 'Y' THEN
951: pa_debug.debug('reverse_asset_lines: ' || '. Detail Line Id=' ||
952: to_char(detailidrec.project_asset_line_detail_id));
953: END IF;
954: -- Check if the project_asset_id on the line is same as one
955: -- of the asset being reversed in this batch

Line 968: pa_debug.debug('reverse_asset_lines: ' || '. This line is not fully reversible');

964: -- one of the project asset line has been assigned to an
965: -- asset not being reversed in the current process
966:
967: IF G_debug_mode = 'Y' THEN
968: pa_debug.debug('reverse_asset_lines: ' || '. This line is not fully reversible');
969: END IF;
970: cdl_fully_reversible := FALSE;
971:
972: END IF;

Line 978: pa_debug.debug('reverse_asset_lines: ' || '. Line ID=' ||

974: FOR assetlinerec IN
975: selprojassetlines(detailidrec.project_asset_line_detail_id) LOOP
976:
977: IF G_debug_mode = 'Y' THEN
978: pa_debug.debug('reverse_asset_lines: ' || '. Line ID=' ||
979: to_char(assetlinerec.project_asset_line_id));
980: END IF;
981:
982:

Line 1314: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

1310: assetlinerec selassetlines%ROWTYPE;
1311: curr_asset_line_detail_id NUMBER;
1312: update_detail_lines BOOLEAN;
1313: -- Fix for bug : 4878878
1314: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
1315:
1316: BEGIN
1317:
1318: x_err_code := 0;

Line 1350: pa_debug.debug('delete_asset_lines: ' || '. Deleting detail for detail line id = ' ||

1346: x_err_code);
1347: ELSE
1348:
1349: IF G_debug_mode = 'Y' THEN
1350: pa_debug.debug('delete_asset_lines: ' || '. Deleting detail for detail line id = ' ||
1351: to_char(assetlinerec.project_asset_line_detail_id));
1352: END IF;
1353:
1354: -- delete all the details

Line 2189: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

2185: l_call_vi_info VARCHAR2(1):='Y'; /* Added for bug 7428263 */
2186: curr_doc_distribution_type pa_expenditure_items.document_distribution_type%TYPE; --Bug 13602288: self assessed tax enhancement
2187:
2188: -- Fix for bug : 4878878
2189: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
2190:
2191: cdlrec t_rec;
2192:
2193: BEGIN

Line 2222: pa_debug.debug('generate_proj_asset_lines: ' || '. Processing Expenditure Item Id= '||

2218: x_ledger_id,
2219: l_amount_type ) LOOP
2220:
2221: IF G_debug_mode = 'Y' THEN
2222: pa_debug.debug('generate_proj_asset_lines: ' || '. Processing Expenditure Item Id= '||
2223: to_char(cdlrec.expenditure_item_id)||
2224: ' CDL num = '||to_char(cdlrec.line_num));
2225: END IF;
2226: orig_asset_id := l_asset_id;

Line 3031: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

3027: fai.asset_id;
3028:
3029: faassetrec selfaassets%ROWTYPE;
3030: -- Fix for bug : 4878878
3031: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
3032:
3033: v_fa_asset_id PA_PROJECT_ASSETS_ALL.fa_asset_id%TYPE;
3034:
3035:

Line 3105: pa_debug.debug('check_asset_id_in_FA: ' || 'Current Deprn. Period not found for book : '||x_book_type_code);

3101:
3102: EXCEPTION
3103: WHEN NO_DATA_FOUND THEN
3104: IF G_debug_mode = 'Y' THEN
3105: pa_debug.debug('check_asset_id_in_FA: ' || 'Current Deprn. Period not found for book : '||x_book_type_code);
3106: END IF;
3107: -- Initialised x_date_placed_in_service as NULL when deprn.
3108: -- period is not found for book
3109: x_date_placed_in_service:=NULL;

Line 3268: --PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

3264: IS
3265: x_inventorial_flag VARCHAR2(3);
3266: l_amortization_start_date DATE;
3267: -- Fix for bug : 4878878
3268: --PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
3269: x_period_of_addition VARCHAR2(1);
3270: x_amort_flag VARCHAR2(3);
3271: -- Start: Added as part of the Bug 13256490
3272: l_ap_distribution_line_number NUMBER;

Line 3364: pa_debug.debug('create_fa_mass_additions: ' || 'Current Deprn. Period not found for book = '||x_book_type_code);

3360: and fdp.period_close_date is null;
3361: EXCEPTION
3362: WHEN NO_DATA_FOUND THEN
3363: IF G_debug_mode = 'Y' THEN
3364: pa_debug.debug('create_fa_mass_additions: ' || 'Current Deprn. Period not found for book = '||x_book_type_code);
3365: END IF;
3366: l_amortization_start_date:= NULL;
3367: END;
3368: END IF;

Line 3789: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

3785: l_po_vendor_id pa_project_asset_lines.po_vendor_id%TYPE;
3786:
3787:
3788: -- Fix for bug : 4878878
3789: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
3790:
3791: BEGIN
3792:
3793: begin

Line 3919: pa_debug.debug('interface assets: ' || 'In CCID = '||assetlinerec.depreciation_expense_ccid ||

3915: x_err_stage => x_err_stage,
3916: x_err_code => x_err_code);
3917:
3918: IF G_debug_mode = 'Y' THEN
3919: pa_debug.debug('interface assets: ' || 'In CCID = '||assetlinerec.depreciation_expense_ccid ||
3920: ' Out CCID = ' || l_depreciation_expense_ccid);
3921: END IF;
3922:
3923: --Downstream processing will now be based on l_depreciation_expense_ccid instead of

Line 4214: pa_debug.debug('Asset in FA cannot be expensed '||curr_add_to_asset_id);

4210: PA does not have 'amortize adjustments' checked. Else pass the value what
4211: ever is set at the asset level in PA */
4212: IF NOT FA_ASSET_VAL_PVT.validate_exp_after_amort(curr_add_to_asset_id,
4213: assetlinerec.book_type_code) THEN
4214: pa_debug.debug('Asset in FA cannot be expensed '||curr_add_to_asset_id);
4215: assetlinerec.amortize_flag := 'YES';
4216: l_amortize_flag := 'YES'; -- bug 4508689
4217: END IF;
4218: /* Added code for Bug#3552809 -- End */

Line 4525: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); Fix for bug : 4878878

4521: x_err_stage VARCHAR2(120);
4522: x_err_code NUMBER;
4523: x_capital_cost_type_code varchar2(1) ;
4524: x_projects_cnt number;
4525: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); Fix for bug : 4878878
4526:
4527: l_ledger_id number;
4528:
4529: BEGIN

Line 4536: pa_debug.enable_debug;

4532: x_err_stage := 'Generate Project Asset Lines';
4533: -- Fix for bug : 4878878
4534: G_debug_mode := nvl(x_debug_mode,'N');
4535: IF G_debug_mode = 'Y' THEN
4536: pa_debug.enable_debug;
4537: End if;
4538: -- End of fix for bug : 4878878
4539:
4540: IF (x_project_num_from IS NULL OR x_project_num_to IS NULL) THEN

Line 4581: pa_debug.debug('summarize_proj: ' || 'Calling CREATE_PROJECT_ASSETS Client Extension for project...'||projrec.project_id);

4577: FOR projrec IN selprjs LOOP
4578:
4579: /* Automatic asset capitalization changes JPULTORAK 04-FEB-03 */
4580: IF G_debug_mode = 'Y' THEN
4581: pa_debug.debug('summarize_proj: ' || 'Calling CREATE_PROJECT_ASSETS Client Extension for project...'||projrec.project_id);
4582: END IF;
4583:
4584: PA_CLIENT_EXTN_ASSET_CREATION.create_project_assets
4585: (p_project_id => projrec.project_id,

Line 4597: pa_debug.debug('summarize_proj: ' || 'Error in CREATE_PROJECT_ASSETS Client Extension...'||v_return_status||' - '||v_msg_data);

4593: IF v_return_status = 'E' THEN
4594:
4595: BEGIN
4596: IF G_debug_mode = 'Y' THEN
4597: pa_debug.debug('summarize_proj: ' || 'Error in CREATE_PROJECT_ASSETS Client Extension...'||v_return_status||' - '||v_msg_data);
4598: END IF;
4599:
4600: INSERT INTO pa_capital_exceptions
4601: (request_id,

Line 4628: pa_debug.debug('summarize_proj: ' || 'Unexpected Error in CREATE_PROJECT_ASSETS Client Extension...'||v_return_status||' - '||v_msg_data);

4624:
4625: ELSIF v_return_status = 'U' THEN
4626:
4627: IF G_debug_mode = 'Y' THEN
4628: pa_debug.debug('summarize_proj: ' || 'Unexpected Error in CREATE_PROJECT_ASSETS Client Extension...'||v_return_status||' - '||v_msg_data);
4629: END IF;
4630:
4631: errbuf := v_msg_data;
4632: retcode := SQLCODE;

Line 4661: pa_debug.debug('summarize_proj: ' || 'Processing project id...'||projrec.project_id);

4657:
4658: BEGIN
4659:
4660: IF G_debug_mode = 'Y' THEN
4661: pa_debug.debug('summarize_proj: ' || 'Processing project id...'||projrec.project_id);
4662: END IF;
4663:
4664: -- Acquire a lock before modifying project data
4665: IF G_debug_mode = 'Y' THEN

Line 4666: pa_debug.debug('summarize_proj: ' || 'Lock the project: '||to_char(projrec.project_id));

4662: END IF;
4663:
4664: -- Acquire a lock before modifying project data
4665: IF G_debug_mode = 'Y' THEN
4666: pa_debug.debug('summarize_proj: ' || 'Lock the project: '||to_char(projrec.project_id));
4667: END IF;
4668: If pa_debug.Acquire_user_lock( 'PA_CAP_'||to_char(projrec.project_id))<>0 then
4669: IF G_debug_mode = 'Y' THEN
4670: pa_debug.debug('summarize_proj: ' || 'Could not lock the project: '||projrec.segment1);

Line 4668: If pa_debug.Acquire_user_lock( 'PA_CAP_'||to_char(projrec.project_id))<>0 then

4664: -- Acquire a lock before modifying project data
4665: IF G_debug_mode = 'Y' THEN
4666: pa_debug.debug('summarize_proj: ' || 'Lock the project: '||to_char(projrec.project_id));
4667: END IF;
4668: If pa_debug.Acquire_user_lock( 'PA_CAP_'||to_char(projrec.project_id))<>0 then
4669: IF G_debug_mode = 'Y' THEN
4670: pa_debug.debug('summarize_proj: ' || 'Could not lock the project: '||projrec.segment1);
4671: END IF;
4672: else

Line 4670: pa_debug.debug('summarize_proj: ' || 'Could not lock the project: '||projrec.segment1);

4666: pa_debug.debug('summarize_proj: ' || 'Lock the project: '||to_char(projrec.project_id));
4667: END IF;
4668: If pa_debug.Acquire_user_lock( 'PA_CAP_'||to_char(projrec.project_id))<>0 then
4669: IF G_debug_mode = 'Y' THEN
4670: pa_debug.debug('summarize_proj: ' || 'Could not lock the project: '||projrec.segment1);
4671: END IF;
4672: else
4673:
4674: -- First reverse all the assets for this project

Line 4676: pa_debug.debug('summarize_proj: ' || '. Generating reversing lines');

4672: else
4673:
4674: -- First reverse all the assets for this project
4675: IF G_debug_mode = 'Y' THEN
4676: pa_debug.debug('summarize_proj: ' || '. Generating reversing lines');
4677: END IF;
4678: reverse_asset_lines
4679: (projrec.project_id,
4680: x_capital_event_id,

Line 4685: pa_debug.debug('summarize_proj: ' || '. Deleting untransferred lines');

4681: x_err_stage,
4682: x_err_code);
4683:
4684: IF G_debug_mode = 'Y' THEN
4685: pa_debug.debug('summarize_proj: ' || '. Deleting untransferred lines');
4686: END IF;
4687: -- now delete all the asset lines which could be deleted
4688: /* bug 10257577 */
4689: delete_asset_lines

Line 4698: pa_debug.debug('summarize_proj: ' || '. Generating new asset lines');

4694: x_err_code);
4695: commit ; -- Introducing commit for perf. reasons. -sesivara 868857
4696: -- Now summarize the cdls and create asset lines
4697: IF G_debug_mode = 'Y' THEN
4698: pa_debug.debug('summarize_proj: ' || '. Generating new asset lines');
4699: END IF;
4700: if (projrec.capital_cost_type_code = 'B' and
4701: NVL(projrec.total_burden_flag,'N') = 'Y') THEN
4702: x_capital_cost_type_code := 'D' ;

Line 4725: pa_debug.debug('summarize_proj: ' || 'Marking reversing lines');

4721:
4722:
4723: -- Now mark reversed lines to interface cost adjustments
4724: IF G_debug_mode = 'Y' THEN
4725: pa_debug.debug('summarize_proj: ' || 'Marking reversing lines');
4726: END IF;
4727: mark_reversing_lines(projrec.project_id,
4728: x_capital_event_id,
4729: 'C', --x_line_type

Line 4735: pa_debug.debug('summarize_proj: ' || '. Interfacing reversing lines');

4731: x_err_code);
4732:
4733: -- Now interface the cost adjustments for the reversed lines
4734: IF G_debug_mode = 'Y' THEN
4735: pa_debug.debug('summarize_proj: ' || '. Interfacing reversing lines');
4736: END IF;
4737: interface_asset_lines
4738: ( projrec.project_id,
4739: 'R', -- Reversing lines

Line 4752: pa_debug.debug('summarize_proj: ' || '. Determine if Retirement Cost Tasks exist');

4748: --at least one Retirement Cost task.
4749:
4750: -- Now summarize the cdls and create asset lines for Retirement Cost Adjustments
4751: IF G_debug_mode = 'Y' THEN
4752: pa_debug.debug('summarize_proj: ' || '. Determine if Retirement Cost Tasks exist');
4753: END IF;
4754:
4755: v_ret_cost_tasks_exist := 'N';
4756:

Line 4777: pa_debug.debug('summarize_proj: ' || '. Generating new Retirement Cost Adjustment asset lines');

4773: IF v_ret_cost_tasks_exist = 'Y' THEN
4774:
4775: -- Now summarize the cdls and create asset lines for Retirement Cost Adjustments
4776: IF G_debug_mode = 'Y' THEN
4777: pa_debug.debug('summarize_proj: ' || '. Generating new Retirement Cost Adjustment asset lines');
4778: END IF;
4779:
4780: GENERATE_PROJ_ASSET_LINES
4781: (projrec.project_id,

Line 4798: pa_debug.debug('summarize_proj: ' || 'Marking reversing retirement cost lines');

4794:
4795:
4796: -- Now mark reversed lines to interface cost adjustments
4797: IF G_debug_mode = 'Y' THEN
4798: pa_debug.debug('summarize_proj: ' || 'Marking reversing retirement cost lines');
4799: END IF;
4800:
4801: MARK_REVERSING_LINES
4802: (projrec.project_id,

Line 4810: pa_debug.debug('summarize_proj: ' || '. Interfacing reversing retirement cost lines');

4806: x_err_code);
4807:
4808: -- Now interface the cost adjustments for the reversed lines
4809: IF G_debug_mode = 'Y' THEN
4810: pa_debug.debug('summarize_proj: ' || '. Interfacing reversing retirement cost lines');
4811: END IF;
4812:
4813: INTERFACE_RET_ASSET_LINES
4814: (projrec.project_id,

Line 4828: pa_debug.debug('summarize_proj: ' || '. Allocate Unassigned Asset Lines');

4824: /* Automatic asset capitalization changes JPULTORAK 04-FEB-03 */
4825:
4826: x_err_stage := 'Allocate Unassigned Project Asset Lines';
4827: IF G_debug_mode = 'Y' THEN
4828: pa_debug.debug('summarize_proj: ' || '. Allocate Unassigned Asset Lines');
4829: END IF;
4830:
4831: --Add logic to allocate any unassigned asset lines for the project being processed
4832: FOR unassigned_lines_rec IN unassigned_lines_cur(projrec.project_id) LOOP

Line 4910: pa_debug.debug('summarize_proj: ' || 'Unexpected Error in ALLOCATE_UNASSIGNED procedure...'||v_return_status||' - '||v_msg_data);

4906: ELSIF v_return_status = 'U' THEN
4907:
4908:
4909: IF G_debug_mode = 'Y' THEN
4910: pa_debug.debug('summarize_proj: ' || 'Unexpected Error in ALLOCATE_UNASSIGNED procedure...'||v_return_status||' - '||v_msg_data);
4911: END IF;
4912:
4913: errbuf := v_msg_data;
4914: retcode := SQLCODE;

Line 4932: pa_debug.debug('summarize_proj: ' || 'Unlock the project: '||to_char(projrec.project_id));

4928: COMMIT; -- we are done with this project now
4929:
4930: -- Release the project lock
4931: IF G_debug_mode = 'Y' THEN
4932: pa_debug.debug('summarize_proj: ' || 'Unlock the project: '||to_char(projrec.project_id));
4933: END IF;
4934: If pa_debug.Release_user_lock('PA_CAP_'||to_char(projrec.project_id)) < 0 then
4935: errbuf := NVL(fnd_message.get_string('PA', 'PA_CAP_CANNOT_RELS_LOCK'),
4936: 'PA_CAP_CANNOT_RELS_LOCK');

Line 4934: If pa_debug.Release_user_lock('PA_CAP_'||to_char(projrec.project_id)) < 0 then

4930: -- Release the project lock
4931: IF G_debug_mode = 'Y' THEN
4932: pa_debug.debug('summarize_proj: ' || 'Unlock the project: '||to_char(projrec.project_id));
4933: END IF;
4934: If pa_debug.Release_user_lock('PA_CAP_'||to_char(projrec.project_id)) < 0 then
4935: errbuf := NVL(fnd_message.get_string('PA', 'PA_CAP_CANNOT_RELS_LOCK'),
4936: 'PA_CAP_CANNOT_RELS_LOCK');
4937: retcode:=1;
4938: return;

Line 4943: pa_debug.debug('summarize_proj: ' || 'Successfully processed project '||

4939: End if;
4940:
4941: x_projects_cnt := x_projects_cnt +1 ; -- number of projects processed
4942: IF G_debug_mode = 'Y' THEN
4943: pa_debug.debug('summarize_proj: ' || 'Successfully processed project '||
4944: to_char(projrec.project_id));
4945: END IF;
4946: END if; -- End if for locking project
4947:

Line 4954: pa_debug.debug('summarize_proj: ' || 'Exception Generated By Oracle Error:' || errbuf );

4950: x_err_code := SQLCODE;
4951: retcode := x_err_code;
4952: errbuf := SQLERRM(SQLCODE);
4953: IF G_debug_mode = 'Y' THEN
4954: pa_debug.debug('summarize_proj: ' || 'Exception Generated By Oracle Error:' || errbuf );
4955: pa_debug.debug('summarize_proj: ' || 'Skipping This project......');
4956: END IF;
4957: ROLLBACK WORK;
4958: END;

Line 4955: pa_debug.debug('summarize_proj: ' || 'Skipping This project......');

4951: retcode := x_err_code;
4952: errbuf := SQLERRM(SQLCODE);
4953: IF G_debug_mode = 'Y' THEN
4954: pa_debug.debug('summarize_proj: ' || 'Exception Generated By Oracle Error:' || errbuf );
4955: pa_debug.debug('summarize_proj: ' || 'Skipping This project......');
4956: END IF;
4957: ROLLBACK WORK;
4958: END;
4959: END IF;

Line 5048: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

5044: /* Automatic asset capitalization changes JPULTORAK 04-FEB-03 */
5045: x_ret_rowcount NUMBER;
5046: /* End of Automatic asset capitalization changes */
5047: -- Fix for bug : 4878878
5048: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5049:
5050:
5051: BEGIN
5052:

Line 5075: pa_debug.debug('interface_assets: ' || 'Lock the project: '||to_char(projrec.project_id));

5071: -- Now interface the asset lines to FA
5072:
5073: -- Acquire a lock before modifying project data
5074: IF G_debug_mode = 'Y' THEN
5075: pa_debug.debug('interface_assets: ' || 'Lock the project: '||to_char(projrec.project_id));
5076: END IF;
5077: If pa_debug.Acquire_user_lock('PA_CAP_'||to_char(projrec.project_id))<>0 then
5078: IF G_debug_mode = 'Y' THEN
5079: pa_debug.debug('interface_assets: ' || 'Could not lock the project: '||projrec.segment1);

Line 5077: If pa_debug.Acquire_user_lock('PA_CAP_'||to_char(projrec.project_id))<>0 then

5073: -- Acquire a lock before modifying project data
5074: IF G_debug_mode = 'Y' THEN
5075: pa_debug.debug('interface_assets: ' || 'Lock the project: '||to_char(projrec.project_id));
5076: END IF;
5077: If pa_debug.Acquire_user_lock('PA_CAP_'||to_char(projrec.project_id))<>0 then
5078: IF G_debug_mode = 'Y' THEN
5079: pa_debug.debug('interface_assets: ' || 'Could not lock the project: '||projrec.segment1);
5080: END IF;
5081: ELSE

Line 5079: pa_debug.debug('interface_assets: ' || 'Could not lock the project: '||projrec.segment1);

5075: pa_debug.debug('interface_assets: ' || 'Lock the project: '||to_char(projrec.project_id));
5076: END IF;
5077: If pa_debug.Acquire_user_lock('PA_CAP_'||to_char(projrec.project_id))<>0 then
5078: IF G_debug_mode = 'Y' THEN
5079: pa_debug.debug('interface_assets: ' || 'Could not lock the project: '||projrec.segment1);
5080: END IF;
5081: ELSE
5082:
5083: mark_asset_lines_for_xfer

Line 5103: pa_debug.debug('interface_assets: ' || 'Lines Found = ' || to_char(x_rowcount));

5099: /* End of Automatic asset capitalization changes */
5100: END IF;
5101:
5102: IF G_debug_mode = 'Y' THEN
5103: pa_debug.debug('interface_assets: ' || 'Lines Found = ' || to_char(x_rowcount));
5104: pa_debug.debug('interface_assets: ' || 'Processing Project '||to_char(projrec.project_id));
5105: pa_debug.debug('interface_assets: ' || 'Interfacing Lines');
5106: END IF;
5107:

Line 5104: pa_debug.debug('interface_assets: ' || 'Processing Project '||to_char(projrec.project_id));

5100: END IF;
5101:
5102: IF G_debug_mode = 'Y' THEN
5103: pa_debug.debug('interface_assets: ' || 'Lines Found = ' || to_char(x_rowcount));
5104: pa_debug.debug('interface_assets: ' || 'Processing Project '||to_char(projrec.project_id));
5105: pa_debug.debug('interface_assets: ' || 'Interfacing Lines');
5106: END IF;
5107:
5108: interface_asset_lines

Line 5105: pa_debug.debug('interface_assets: ' || 'Interfacing Lines');

5101:
5102: IF G_debug_mode = 'Y' THEN
5103: pa_debug.debug('interface_assets: ' || 'Lines Found = ' || to_char(x_rowcount));
5104: pa_debug.debug('interface_assets: ' || 'Processing Project '||to_char(projrec.project_id));
5105: pa_debug.debug('interface_assets: ' || 'Interfacing Lines');
5106: END IF;
5107:
5108: interface_asset_lines
5109: ( projrec.project_id,

Line 5138: pa_debug.debug('interface_assets: ' || 'Retirement Lines Found = ' || to_char(x_ret_rowcount));

5134: GOTO skip_ret_lines; --No retirement asset lines are selected
5135: END IF;
5136:
5137: IF G_debug_mode = 'Y' THEN
5138: pa_debug.debug('interface_assets: ' || 'Retirement Lines Found = ' || to_char(x_ret_rowcount));
5139: pa_debug.debug('interface_assets: ' || 'Processing Project '||to_char(projrec.project_id));
5140: pa_debug.debug('interface_assets: ' || 'Interfacing Retirement Lines');
5141: END IF;
5142:

Line 5139: pa_debug.debug('interface_assets: ' || 'Processing Project '||to_char(projrec.project_id));

5135: END IF;
5136:
5137: IF G_debug_mode = 'Y' THEN
5138: pa_debug.debug('interface_assets: ' || 'Retirement Lines Found = ' || to_char(x_ret_rowcount));
5139: pa_debug.debug('interface_assets: ' || 'Processing Project '||to_char(projrec.project_id));
5140: pa_debug.debug('interface_assets: ' || 'Interfacing Retirement Lines');
5141: END IF;
5142:
5143: interface_ret_asset_lines

Line 5140: pa_debug.debug('interface_assets: ' || 'Interfacing Retirement Lines');

5136:
5137: IF G_debug_mode = 'Y' THEN
5138: pa_debug.debug('interface_assets: ' || 'Retirement Lines Found = ' || to_char(x_ret_rowcount));
5139: pa_debug.debug('interface_assets: ' || 'Processing Project '||to_char(projrec.project_id));
5140: pa_debug.debug('interface_assets: ' || 'Interfacing Retirement Lines');
5141: END IF;
5142:
5143: interface_ret_asset_lines
5144: (projrec.project_id,

Line 5157: pa_debug.debug('interface_assets: ' || 'Unlock the project: '||to_char(projrec.project_id));

5153:
5154: COMMIT; -- we are done with this project now
5155: -- Release the project lock
5156: IF G_debug_mode = 'Y' THEN
5157: pa_debug.debug('interface_assets: ' || 'Unlock the project: '||to_char(projrec.project_id));
5158: END IF;
5159: If pa_debug.Release_user_lock('PA_CAP_'||to_char(projrec.project_id)) < 0 then
5160: errbuf := NVL(fnd_message.get_string('PA', 'PA_CAP_CANNOT_RELS_LOCK'),
5161: 'PA_CAP_CANNOT_RELS_LOCK');

Line 5159: If pa_debug.Release_user_lock('PA_CAP_'||to_char(projrec.project_id)) < 0 then

5155: -- Release the project lock
5156: IF G_debug_mode = 'Y' THEN
5157: pa_debug.debug('interface_assets: ' || 'Unlock the project: '||to_char(projrec.project_id));
5158: END IF;
5159: If pa_debug.Release_user_lock('PA_CAP_'||to_char(projrec.project_id)) < 0 then
5160: errbuf := NVL(fnd_message.get_string('PA', 'PA_CAP_CANNOT_RELS_LOCK'),
5161: 'PA_CAP_CANNOT_RELS_LOCK');
5162: retcode:=1;
5163: return;

Line 5168: pa_debug.debug('interface_assets: ' || 'Successfully processed project '||

5164: End if;
5165:
5166: x_projects_cnt := x_projects_cnt +1 ;
5167: IF G_debug_mode = 'Y' THEN
5168: pa_debug.debug('interface_assets: ' || 'Successfully processed project '||
5169: to_char(projrec.project_id));
5170: END IF;
5171: END IF; -- End if for locking project
5172: EXCEPTION

Line 5178: pa_debug.debug('interface_assets: ' || 'Exception Generated By Oracle Error:' || errbuf );

5174: x_err_code := SQLCODE;
5175: retcode := x_err_code;
5176: errbuf := SQLERRM(SQLCODE);
5177: IF G_debug_mode = 'Y' THEN
5178: pa_debug.debug('interface_assets: ' || 'Exception Generated By Oracle Error:' || errbuf );
5179: pa_debug.debug('interface_assets: ' || 'Skipping This project......');
5180: END IF;
5181: ROLLBACK WORK;
5182: END;

Line 5179: pa_debug.debug('interface_assets: ' || 'Skipping This project......');

5175: retcode := x_err_code;
5176: errbuf := SQLERRM(SQLCODE);
5177: IF G_debug_mode = 'Y' THEN
5178: pa_debug.debug('interface_assets: ' || 'Exception Generated By Oracle Error:' || errbuf );
5179: pa_debug.debug('interface_assets: ' || 'Skipping This project......');
5180: END IF;
5181: ROLLBACK WORK;
5182: END;
5183: <>

Line 5236: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

5232: projrec selprjs%ROWTYPE;
5233: x_err_stage VARCHAR2(120);
5234: x_err_code NUMBER;
5235: -- Fix for bug : 4878878
5236: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5237: l_ledger_id NUMBER;
5238:
5239: BEGIN
5240:

Line 5342: pa_debug.debug('summarize_xface: ' || 'Exception Generated By Oracle Error:' || errbuf );

5338: x_err_code := SQLCODE;
5339: retcode := x_err_code;
5340: errbuf := SQLERRM(SQLCODE);
5341: IF G_debug_mode = 'Y' THEN
5342: pa_debug.debug('summarize_xface: ' || 'Exception Generated By Oracle Error:' || errbuf );
5343: pa_debug.debug('summarize_xface: ' || 'Skipping This project......');
5344: END IF;
5345: ROLLBACK WORK;
5346: END;

Line 5343: pa_debug.debug('summarize_xface: ' || 'Skipping This project......');

5339: retcode := x_err_code;
5340: errbuf := SQLERRM(SQLCODE);
5341: IF G_debug_mode = 'Y' THEN
5342: pa_debug.debug('summarize_xface: ' || 'Exception Generated By Oracle Error:' || errbuf );
5343: pa_debug.debug('summarize_xface: ' || 'Skipping This project......');
5344: END IF;
5345: ROLLBACK WORK;
5346: END;
5347: END LOOP;

Line 5369: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

5365: ) RETURN BOOLEAN IS
5366: dummy number;
5367: v_errbuf varchar2(250);
5368: -- Fix for bug : 4878878
5369: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5370:
5371: BEGIN
5372:
5373: /* ********

Line 5573: pa_debug.debug('is_project_eligible: ' || 'Exception Generated By Oracle Error:' || v_errbuf );

5569: EXCEPTION
5570: WHEN OTHERS THEN
5571: v_errbuf := substr(SQLERRM(SQLCODE),1.200);
5572: IF G_debug_mode = 'Y' THEN
5573: pa_debug.debug('is_project_eligible: ' || 'Exception Generated By Oracle Error:' || v_errbuf );
5574: pa_debug.debug('is_project_eligible: ' || 'Skipping This project......');
5575: END IF;
5576: return FALSE;
5577: END is_project_eligible;

Line 5574: pa_debug.debug('is_project_eligible: ' || 'Skipping This project......');

5570: WHEN OTHERS THEN
5571: v_errbuf := substr(SQLERRM(SQLCODE),1.200);
5572: IF G_debug_mode = 'Y' THEN
5573: pa_debug.debug('is_project_eligible: ' || 'Exception Generated By Oracle Error:' || v_errbuf );
5574: pa_debug.debug('is_project_eligible: ' || 'Skipping This project......');
5575: END IF;
5576: return FALSE;
5577: END is_project_eligible;
5578:

Line 6002: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

5998:
5999: no_event_proj_rec no_event_proj_cur%ROWTYPE;*/
6000:
6001: -- Fix for bug : 4878878
6002: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
6003: is_no_event_proj VARCHAR2(1) := 'N'; -- Added for bug 5758490
6004: BEGIN
6005:
6006: x_err_code := 0;

Line 6011: pa_debug.debug('summarize_proj: ' || 'Set Capital Event ID = -1 for No Event Processing projects.');

6007: x_err_stage := 'Updating assets and events for No Event Processing projects';
6008:
6009:
6010: IF G_debug_mode = 'Y' THEN
6011: pa_debug.debug('summarize_proj: ' || 'Set Capital Event ID = -1 for No Event Processing projects.');
6012: END IF;
6013:
6014: /* Commented for bug 5758490
6015: FOR no_event_proj_rec IN no_event_proj_cur LOOP */