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 154: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

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

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

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

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

206:
207: End If;
208:
209: IF G_debug_mode = 'Y' THEN
210: pa_debug.debug('asset_category_id = ' || asset_category_id);
211: END IF;
212:
213: RETURN asset_category_id;
214:

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

849: cdl_fully_reversible BOOLEAN; -- This flag will indicate if the
850: -- project asset line is fully reversed
851: x_translated_reversal VARCHAR2(80);
852: -- Fix for bug : 4878878
853: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
854: BEGIN
855:
856: x_err_code := 0;
857: x_err_stage := 'Reversing the Asset Lines';

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

864: x_err_code);
865:
866: IF ( NOT asset_found ) THEN
867: IF G_debug_mode = 'Y' THEN
868: pa_debug.debug('reverse_asset_lines: ' || '. No assets to be reversed');
869: END IF;
870: RETURN;
871: END IF;
872:

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

889:
890: cdl_fully_reversible := TRUE;
891:
892: IF G_debug_mode = 'Y' THEN
893: pa_debug.debug('reverse_asset_lines: ' || '. Detail Line Id=' ||
894: to_char(detailidrec.project_asset_line_detail_id));
895: END IF;
896: -- Check if the project_asset_id on the line is same as one
897: -- of the asset being reversed in this batch

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

906: -- one of the project asset line has been assigned to an
907: -- asset not being reversed in the current process
908:
909: IF G_debug_mode = 'Y' THEN
910: pa_debug.debug('reverse_asset_lines: ' || '. This line is not fully reversible');
911: END IF;
912: cdl_fully_reversible := FALSE;
913:
914: END IF;

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

916: FOR assetlinerec IN
917: selprojassetlines(detailidrec.project_asset_line_detail_id) LOOP
918:
919: IF G_debug_mode = 'Y' THEN
920: pa_debug.debug('reverse_asset_lines: ' || '. Line ID=' ||
921: to_char(assetlinerec.project_asset_line_id));
922: END IF;
923:
924:

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

1232: assetlinerec selassetlines%ROWTYPE;
1233: curr_asset_line_detail_id NUMBER;
1234: update_detail_lines BOOLEAN;
1235: -- Fix for bug : 4878878
1236: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
1237:
1238: BEGIN
1239:
1240: x_err_code := 0;

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

1268: x_err_code);
1269: ELSE
1270:
1271: IF G_debug_mode = 'Y' THEN
1272: pa_debug.debug('delete_asset_lines: ' || '. Deleting detail for detail line id = ' ||
1273: to_char(assetlinerec.project_asset_line_detail_id));
1274: END IF;
1275:
1276: -- delete all the details

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

1938: client_asset_id number(15);
1939: v_crl_profile varchar2(1) := NVL(FND_PROFILE.value('PA_CRL_LICENSED'), 'N'); /*bug5523708*/
1940:
1941: -- Fix for bug : 4878878
1942: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
1943:
1944: cdlrec t_rec;
1945:
1946: BEGIN

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

1971: x_ledger_id,
1972: l_amount_type ) LOOP
1973:
1974: IF G_debug_mode = 'Y' THEN
1975: pa_debug.debug('generate_proj_asset_lines: ' || '. Processing Expenditure Item Id= '||
1976: to_char(cdlrec.expenditure_item_id)||
1977: ' CDL num = '||to_char(cdlrec.line_num));
1978: END IF;
1979: orig_asset_id := l_asset_id;

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

2694: fai.asset_id;
2695:
2696: faassetrec selfaassets%ROWTYPE;
2697: -- Fix for bug : 4878878
2698: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
2699:
2700: v_fa_asset_id PA_PROJECT_ASSETS_ALL.fa_asset_id%TYPE;
2701:
2702:

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

2768:
2769: EXCEPTION
2770: WHEN NO_DATA_FOUND THEN
2771: IF G_debug_mode = 'Y' THEN
2772: pa_debug.debug('check_asset_id_in_FA: ' || 'Current Deprn. Period not found for book : '||x_book_type_code);
2773: END IF;
2774: -- Initialised x_date_placed_in_service as NULL when deprn.
2775: -- period is not found for book
2776: x_date_placed_in_service:=NULL;

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

2931: IS
2932: x_inventorial_flag VARCHAR2(3);
2933: l_amortization_start_date DATE;
2934: -- Fix for bug : 4878878
2935: --PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
2936: x_period_of_addition VARCHAR2(1);
2937: x_amort_flag VARCHAR2(3);
2938:
2939: BEGIN

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

2998: and fdp.period_close_date is null;
2999: EXCEPTION
3000: WHEN NO_DATA_FOUND THEN
3001: IF G_debug_mode = 'Y' THEN
3002: pa_debug.debug('create_fa_mass_additions: ' || 'Current Deprn. Period not found for book = '||x_book_type_code);
3003: END IF;
3004: l_amortization_start_date:= NULL;
3005: END;
3006: END IF;

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

3413: l_depreciation_expense_ccid NUMBER;
3414:
3415:
3416: -- Fix for bug : 4878878
3417: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
3418:
3419: BEGIN
3420:
3421: begin

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

3543: x_err_stage => x_err_stage,
3544: x_err_code => x_err_code);
3545:
3546: IF G_debug_mode = 'Y' THEN
3547: pa_debug.debug('interface assets: ' || 'In CCID = '||assetlinerec.depreciation_expense_ccid ||
3548: ' Out CCID = ' || l_depreciation_expense_ccid);
3549: END IF;
3550:
3551: --Downstream processing will now be based on l_depreciation_expense_ccid instead of

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

3826: PA does not have 'amortize adjustments' checked. Else pass the value what
3827: ever is set at the asset level in PA */
3828: IF NOT FA_ASSET_VAL_PVT.validate_exp_after_amort(curr_add_to_asset_id,
3829: assetlinerec.book_type_code) THEN
3830: pa_debug.debug('Asset in FA cannot be expensed '||curr_add_to_asset_id);
3831: assetlinerec.amortize_flag := 'YES';
3832: l_amortize_flag := 'YES'; -- bug 4508689
3833: END IF;
3834: /* Added code for Bug#3552809 -- End */

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

4137: x_err_stage VARCHAR2(120);
4138: x_err_code NUMBER;
4139: x_capital_cost_type_code varchar2(1) ;
4140: x_projects_cnt number;
4141: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); Fix for bug : 4878878
4142:
4143: l_ledger_id number;
4144:
4145: BEGIN

Line 4152: pa_debug.enable_debug;

4148: x_err_stage := 'Generate Project Asset Lines';
4149: -- Fix for bug : 4878878
4150: G_debug_mode := nvl(x_debug_mode,'N');
4151: IF G_debug_mode = 'Y' THEN
4152: pa_debug.enable_debug;
4153: End if;
4154: -- End of fix for bug : 4878878
4155:
4156: IF (x_project_num_from IS NULL OR x_project_num_to IS NULL) THEN

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

4193: FOR projrec IN selprjs LOOP
4194:
4195: /* Automatic asset capitalization changes JPULTORAK 04-FEB-03 */
4196: IF G_debug_mode = 'Y' THEN
4197: pa_debug.debug('summarize_proj: ' || 'Calling CREATE_PROJECT_ASSETS Client Extension for project...'||projrec.project_id);
4198: END IF;
4199:
4200: PA_CLIENT_EXTN_ASSET_CREATION.create_project_assets
4201: (p_project_id => projrec.project_id,

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

4209: IF v_return_status = 'E' THEN
4210:
4211: BEGIN
4212: IF G_debug_mode = 'Y' THEN
4213: pa_debug.debug('summarize_proj: ' || 'Error in CREATE_PROJECT_ASSETS Client Extension...'||v_return_status||' - '||v_msg_data);
4214: END IF;
4215:
4216: INSERT INTO pa_capital_exceptions
4217: (request_id,

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

4240:
4241: ELSIF v_return_status = 'U' THEN
4242:
4243: IF G_debug_mode = 'Y' THEN
4244: pa_debug.debug('summarize_proj: ' || 'Unexpected Error in CREATE_PROJECT_ASSETS Client Extension...'||v_return_status||' - '||v_msg_data);
4245: END IF;
4246:
4247: errbuf := v_msg_data;
4248: retcode := SQLCODE;

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

4273:
4274: BEGIN
4275:
4276: IF G_debug_mode = 'Y' THEN
4277: pa_debug.debug('summarize_proj: ' || 'Processing project id...'||projrec.project_id);
4278: END IF;
4279:
4280: -- Acquire a lock before modifying project data
4281: IF G_debug_mode = 'Y' THEN

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

4278: END IF;
4279:
4280: -- Acquire a lock before modifying project data
4281: IF G_debug_mode = 'Y' THEN
4282: pa_debug.debug('summarize_proj: ' || 'Lock the project: '||to_char(projrec.project_id));
4283: END IF;
4284: If pa_debug.Acquire_user_lock( 'PA_CAP_'||to_char(projrec.project_id))<>0 then
4285: IF G_debug_mode = 'Y' THEN
4286: pa_debug.debug('summarize_proj: ' || 'Could not lock the project: '||projrec.segment1);

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

4280: -- Acquire a lock before modifying project data
4281: IF G_debug_mode = 'Y' THEN
4282: pa_debug.debug('summarize_proj: ' || 'Lock the project: '||to_char(projrec.project_id));
4283: END IF;
4284: If pa_debug.Acquire_user_lock( 'PA_CAP_'||to_char(projrec.project_id))<>0 then
4285: IF G_debug_mode = 'Y' THEN
4286: pa_debug.debug('summarize_proj: ' || 'Could not lock the project: '||projrec.segment1);
4287: END IF;
4288: else

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

4282: pa_debug.debug('summarize_proj: ' || 'Lock the project: '||to_char(projrec.project_id));
4283: END IF;
4284: If pa_debug.Acquire_user_lock( 'PA_CAP_'||to_char(projrec.project_id))<>0 then
4285: IF G_debug_mode = 'Y' THEN
4286: pa_debug.debug('summarize_proj: ' || 'Could not lock the project: '||projrec.segment1);
4287: END IF;
4288: else
4289:
4290: -- First reverse all the assets for this project

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

4288: else
4289:
4290: -- First reverse all the assets for this project
4291: IF G_debug_mode = 'Y' THEN
4292: pa_debug.debug('summarize_proj: ' || '. Generating reversing lines');
4293: END IF;
4294: reverse_asset_lines
4295: (projrec.project_id,
4296: x_capital_event_id,

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

4297: x_err_stage,
4298: x_err_code);
4299:
4300: IF G_debug_mode = 'Y' THEN
4301: pa_debug.debug('summarize_proj: ' || '. Deleting untransferred lines');
4302: END IF;
4303: -- now delete all the asset lines which could be deleted
4304: delete_asset_lines
4305: (projrec.project_id,

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

4308: x_err_code);
4309: commit ; -- Introducing commit for perf. reasons. -sesivara 868857
4310: -- Now summarize the cdls and create asset lines
4311: IF G_debug_mode = 'Y' THEN
4312: pa_debug.debug('summarize_proj: ' || '. Generating new asset lines');
4313: END IF;
4314: if (projrec.capital_cost_type_code = 'B' and
4315: NVL(projrec.total_burden_flag,'N') = 'Y') THEN
4316: x_capital_cost_type_code := 'D' ;

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

4335:
4336:
4337: -- Now mark reversed lines to interface cost adjustments
4338: IF G_debug_mode = 'Y' THEN
4339: pa_debug.debug('summarize_proj: ' || 'Marking reversing lines');
4340: END IF;
4341: mark_reversing_lines(projrec.project_id,
4342: x_capital_event_id,
4343: 'C', --x_line_type

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

4345: x_err_code);
4346:
4347: -- Now interface the cost adjustments for the reversed lines
4348: IF G_debug_mode = 'Y' THEN
4349: pa_debug.debug('summarize_proj: ' || '. Interfacing reversing lines');
4350: END IF;
4351: interface_asset_lines
4352: ( projrec.project_id,
4353: 'R', -- Reversing lines

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

4362: --at least one Retirement Cost task.
4363:
4364: -- Now summarize the cdls and create asset lines for Retirement Cost Adjustments
4365: IF G_debug_mode = 'Y' THEN
4366: pa_debug.debug('summarize_proj: ' || '. Determine if Retirement Cost Tasks exist');
4367: END IF;
4368:
4369: v_ret_cost_tasks_exist := 'N';
4370:

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

4387: IF v_ret_cost_tasks_exist = 'Y' THEN
4388:
4389: -- Now summarize the cdls and create asset lines for Retirement Cost Adjustments
4390: IF G_debug_mode = 'Y' THEN
4391: pa_debug.debug('summarize_proj: ' || '. Generating new Retirement Cost Adjustment asset lines');
4392: END IF;
4393:
4394: GENERATE_PROJ_ASSET_LINES
4395: (projrec.project_id,

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

4408:
4409:
4410: -- Now mark reversed lines to interface cost adjustments
4411: IF G_debug_mode = 'Y' THEN
4412: pa_debug.debug('summarize_proj: ' || 'Marking reversing retirement cost lines');
4413: END IF;
4414:
4415: MARK_REVERSING_LINES
4416: (projrec.project_id,

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

4420: x_err_code);
4421:
4422: -- Now interface the cost adjustments for the reversed lines
4423: IF G_debug_mode = 'Y' THEN
4424: pa_debug.debug('summarize_proj: ' || '. Interfacing reversing retirement cost lines');
4425: END IF;
4426:
4427: INTERFACE_RET_ASSET_LINES
4428: (projrec.project_id,

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

4438: /* Automatic asset capitalization changes JPULTORAK 04-FEB-03 */
4439:
4440: x_err_stage := 'Allocate Unassigned Project Asset Lines';
4441: IF G_debug_mode = 'Y' THEN
4442: pa_debug.debug('summarize_proj: ' || '. Allocate Unassigned Asset Lines');
4443: END IF;
4444:
4445: --Add logic to allocate any unassigned asset lines for the project being processed
4446: FOR unassigned_lines_rec IN unassigned_lines_cur(projrec.project_id) LOOP

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

4520: ELSIF v_return_status = 'U' THEN
4521:
4522:
4523: IF G_debug_mode = 'Y' THEN
4524: pa_debug.debug('summarize_proj: ' || 'Unexpected Error in ALLOCATE_UNASSIGNED procedure...'||v_return_status||' - '||v_msg_data);
4525: END IF;
4526:
4527: errbuf := v_msg_data;
4528: retcode := SQLCODE;

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

4542: COMMIT; -- we are done with this project now
4543:
4544: -- Release the project lock
4545: IF G_debug_mode = 'Y' THEN
4546: pa_debug.debug('summarize_proj: ' || 'Unlock the project: '||to_char(projrec.project_id));
4547: END IF;
4548: If pa_debug.Release_user_lock('PA_CAP_'||to_char(projrec.project_id)) < 0 then
4549: errbuf := NVL(fnd_message.get_string('PA', 'PA_CAP_CANNOT_RELS_LOCK'),
4550: 'PA_CAP_CANNOT_RELS_LOCK');

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

4544: -- Release the project lock
4545: IF G_debug_mode = 'Y' THEN
4546: pa_debug.debug('summarize_proj: ' || 'Unlock the project: '||to_char(projrec.project_id));
4547: END IF;
4548: If pa_debug.Release_user_lock('PA_CAP_'||to_char(projrec.project_id)) < 0 then
4549: errbuf := NVL(fnd_message.get_string('PA', 'PA_CAP_CANNOT_RELS_LOCK'),
4550: 'PA_CAP_CANNOT_RELS_LOCK');
4551: retcode:=1;
4552: return;

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

4553: End if;
4554:
4555: x_projects_cnt := x_projects_cnt +1 ; -- number of projects processed
4556: IF G_debug_mode = 'Y' THEN
4557: pa_debug.debug('summarize_proj: ' || 'Successfully processed project '||
4558: to_char(projrec.project_id));
4559: END IF;
4560: END if; -- End if for locking project
4561:

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

4564: x_err_code := SQLCODE;
4565: retcode := x_err_code;
4566: errbuf := SQLERRM(SQLCODE);
4567: IF G_debug_mode = 'Y' THEN
4568: pa_debug.debug('summarize_proj: ' || 'Exception Generated By Oracle Error:' || errbuf );
4569: pa_debug.debug('summarize_proj: ' || 'Skipping This project......');
4570: END IF;
4571: ROLLBACK WORK;
4572: END;

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

4565: retcode := x_err_code;
4566: errbuf := SQLERRM(SQLCODE);
4567: IF G_debug_mode = 'Y' THEN
4568: pa_debug.debug('summarize_proj: ' || 'Exception Generated By Oracle Error:' || errbuf );
4569: pa_debug.debug('summarize_proj: ' || 'Skipping This project......');
4570: END IF;
4571: ROLLBACK WORK;
4572: END;
4573: END IF;

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

4658: /* Automatic asset capitalization changes JPULTORAK 04-FEB-03 */
4659: x_ret_rowcount NUMBER;
4660: /* End of Automatic asset capitalization changes */
4661: -- Fix for bug : 4878878
4662: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
4663:
4664:
4665: BEGIN
4666:

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

4685: -- Now interface the asset lines to FA
4686:
4687: -- Acquire a lock before modifying project data
4688: IF G_debug_mode = 'Y' THEN
4689: pa_debug.debug('interface_assets: ' || 'Lock the project: '||to_char(projrec.project_id));
4690: END IF;
4691: If pa_debug.Acquire_user_lock('PA_CAP_'||to_char(projrec.project_id))<>0 then
4692: IF G_debug_mode = 'Y' THEN
4693: pa_debug.debug('interface_assets: ' || 'Could not lock the project: '||projrec.segment1);

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

4687: -- Acquire a lock before modifying project data
4688: IF G_debug_mode = 'Y' THEN
4689: pa_debug.debug('interface_assets: ' || 'Lock the project: '||to_char(projrec.project_id));
4690: END IF;
4691: If pa_debug.Acquire_user_lock('PA_CAP_'||to_char(projrec.project_id))<>0 then
4692: IF G_debug_mode = 'Y' THEN
4693: pa_debug.debug('interface_assets: ' || 'Could not lock the project: '||projrec.segment1);
4694: END IF;
4695: ELSE

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

4689: pa_debug.debug('interface_assets: ' || 'Lock the project: '||to_char(projrec.project_id));
4690: END IF;
4691: If pa_debug.Acquire_user_lock('PA_CAP_'||to_char(projrec.project_id))<>0 then
4692: IF G_debug_mode = 'Y' THEN
4693: pa_debug.debug('interface_assets: ' || 'Could not lock the project: '||projrec.segment1);
4694: END IF;
4695: ELSE
4696:
4697: mark_asset_lines_for_xfer

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

4713: /* End of Automatic asset capitalization changes */
4714: END IF;
4715:
4716: IF G_debug_mode = 'Y' THEN
4717: pa_debug.debug('interface_assets: ' || 'Lines Found = ' || to_char(x_rowcount));
4718: pa_debug.debug('interface_assets: ' || 'Processing Project '||to_char(projrec.project_id));
4719: pa_debug.debug('interface_assets: ' || 'Interfacing Lines');
4720: END IF;
4721:

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

4714: END IF;
4715:
4716: IF G_debug_mode = 'Y' THEN
4717: pa_debug.debug('interface_assets: ' || 'Lines Found = ' || to_char(x_rowcount));
4718: pa_debug.debug('interface_assets: ' || 'Processing Project '||to_char(projrec.project_id));
4719: pa_debug.debug('interface_assets: ' || 'Interfacing Lines');
4720: END IF;
4721:
4722: interface_asset_lines

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

4715:
4716: IF G_debug_mode = 'Y' THEN
4717: pa_debug.debug('interface_assets: ' || 'Lines Found = ' || to_char(x_rowcount));
4718: pa_debug.debug('interface_assets: ' || 'Processing Project '||to_char(projrec.project_id));
4719: pa_debug.debug('interface_assets: ' || 'Interfacing Lines');
4720: END IF;
4721:
4722: interface_asset_lines
4723: ( projrec.project_id,

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

4748: GOTO skip_ret_lines; --No retirement asset lines are selected
4749: END IF;
4750:
4751: IF G_debug_mode = 'Y' THEN
4752: pa_debug.debug('interface_assets: ' || 'Retirement Lines Found = ' || to_char(x_ret_rowcount));
4753: pa_debug.debug('interface_assets: ' || 'Processing Project '||to_char(projrec.project_id));
4754: pa_debug.debug('interface_assets: ' || 'Interfacing Retirement Lines');
4755: END IF;
4756:

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

4749: END IF;
4750:
4751: IF G_debug_mode = 'Y' THEN
4752: pa_debug.debug('interface_assets: ' || 'Retirement Lines Found = ' || to_char(x_ret_rowcount));
4753: pa_debug.debug('interface_assets: ' || 'Processing Project '||to_char(projrec.project_id));
4754: pa_debug.debug('interface_assets: ' || 'Interfacing Retirement Lines');
4755: END IF;
4756:
4757: interface_ret_asset_lines

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

4750:
4751: IF G_debug_mode = 'Y' THEN
4752: pa_debug.debug('interface_assets: ' || 'Retirement Lines Found = ' || to_char(x_ret_rowcount));
4753: pa_debug.debug('interface_assets: ' || 'Processing Project '||to_char(projrec.project_id));
4754: pa_debug.debug('interface_assets: ' || 'Interfacing Retirement Lines');
4755: END IF;
4756:
4757: interface_ret_asset_lines
4758: (projrec.project_id,

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

4767:
4768: COMMIT; -- we are done with this project now
4769: -- Release the project lock
4770: IF G_debug_mode = 'Y' THEN
4771: pa_debug.debug('interface_assets: ' || 'Unlock the project: '||to_char(projrec.project_id));
4772: END IF;
4773: If pa_debug.Release_user_lock('PA_CAP_'||to_char(projrec.project_id)) < 0 then
4774: errbuf := NVL(fnd_message.get_string('PA', 'PA_CAP_CANNOT_RELS_LOCK'),
4775: 'PA_CAP_CANNOT_RELS_LOCK');

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

4769: -- Release the project lock
4770: IF G_debug_mode = 'Y' THEN
4771: pa_debug.debug('interface_assets: ' || 'Unlock the project: '||to_char(projrec.project_id));
4772: END IF;
4773: If pa_debug.Release_user_lock('PA_CAP_'||to_char(projrec.project_id)) < 0 then
4774: errbuf := NVL(fnd_message.get_string('PA', 'PA_CAP_CANNOT_RELS_LOCK'),
4775: 'PA_CAP_CANNOT_RELS_LOCK');
4776: retcode:=1;
4777: return;

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

4778: End if;
4779:
4780: x_projects_cnt := x_projects_cnt +1 ;
4781: IF G_debug_mode = 'Y' THEN
4782: pa_debug.debug('interface_assets: ' || 'Successfully processed project '||
4783: to_char(projrec.project_id));
4784: END IF;
4785: END IF; -- End if for locking project
4786: EXCEPTION

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

4788: x_err_code := SQLCODE;
4789: retcode := x_err_code;
4790: errbuf := SQLERRM(SQLCODE);
4791: IF G_debug_mode = 'Y' THEN
4792: pa_debug.debug('interface_assets: ' || 'Exception Generated By Oracle Error:' || errbuf );
4793: pa_debug.debug('interface_assets: ' || 'Skipping This project......');
4794: END IF;
4795: ROLLBACK WORK;
4796: END;

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

4789: retcode := x_err_code;
4790: errbuf := SQLERRM(SQLCODE);
4791: IF G_debug_mode = 'Y' THEN
4792: pa_debug.debug('interface_assets: ' || 'Exception Generated By Oracle Error:' || errbuf );
4793: pa_debug.debug('interface_assets: ' || 'Skipping This project......');
4794: END IF;
4795: ROLLBACK WORK;
4796: END;
4797: <>

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

4846: projrec selprjs%ROWTYPE;
4847: x_err_stage VARCHAR2(120);
4848: x_err_code NUMBER;
4849: -- Fix for bug : 4878878
4850: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
4851: l_ledger_id NUMBER;
4852:
4853: BEGIN
4854:

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

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

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

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

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

4979: ) RETURN BOOLEAN IS
4980: dummy number;
4981: v_errbuf varchar2(250);
4982: -- Fix for bug : 4878878
4983: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
4984:
4985: BEGIN
4986:
4987: /* ********

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

5183: EXCEPTION
5184: WHEN OTHERS THEN
5185: v_errbuf := substr(SQLERRM(SQLCODE),1.200);
5186: IF G_debug_mode = 'Y' THEN
5187: pa_debug.debug('is_project_eligible: ' || 'Exception Generated By Oracle Error:' || v_errbuf );
5188: pa_debug.debug('is_project_eligible: ' || 'Skipping This project......');
5189: END IF;
5190: return FALSE;
5191: END is_project_eligible;

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

5184: WHEN OTHERS THEN
5185: v_errbuf := substr(SQLERRM(SQLCODE),1.200);
5186: IF G_debug_mode = 'Y' THEN
5187: pa_debug.debug('is_project_eligible: ' || 'Exception Generated By Oracle Error:' || v_errbuf );
5188: pa_debug.debug('is_project_eligible: ' || 'Skipping This project......');
5189: END IF;
5190: return FALSE;
5191: END is_project_eligible;
5192:

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

5612:
5613: no_event_proj_rec no_event_proj_cur%ROWTYPE;*/
5614:
5615: -- Fix for bug : 4878878
5616: -- PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5617: is_no_event_proj VARCHAR2(1) := 'N'; -- Added for bug 5758490
5618: BEGIN
5619:
5620: x_err_code := 0;

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

5621: x_err_stage := 'Updating assets and events for No Event Processing projects';
5622:
5623:
5624: IF G_debug_mode = 'Y' THEN
5625: pa_debug.debug('summarize_proj: ' || 'Set Capital Event ID = -1 for No Event Processing projects.');
5626: END IF;
5627:
5628: /* Commented for bug 5758490
5629: FOR no_event_proj_rec IN no_event_proj_cur LOOP */