DBA Data[Home] [Help]

APPS.AMW_LOAD_RCM_ORG_DATA dependencies on FND_FILE

Line 407: fnd_file.put_line (fnd_file.LOG, 'resp id: '||fnd_global.RESP_ID);

403: ---03.04.2005 npanandi: added below var for data security checks
404: ---of Organization - Process to Risk association
405: l_has_proc_risk_access varchar2(15) := 'T'; --defaulting to 'T', which means 'has access'
406: BEGIN
407: fnd_file.put_line (fnd_file.LOG, 'resp id: '||fnd_global.RESP_ID);
408: fnd_file.put_line (fnd_file.LOG, 'resp appl id: '||fnd_global.RESP_APPL_ID);
409: fnd_file.put_line (fnd_file.LOG, 'batch id: '||p_batch_id);
410: fnd_file.put_line (fnd_file.LOG, 'user id: '||p_user_id);
411:

Line 408: fnd_file.put_line (fnd_file.LOG, 'resp appl id: '||fnd_global.RESP_APPL_ID);

404: ---of Organization - Process to Risk association
405: l_has_proc_risk_access varchar2(15) := 'T'; --defaulting to 'T', which means 'has access'
406: BEGIN
407: fnd_file.put_line (fnd_file.LOG, 'resp id: '||fnd_global.RESP_ID);
408: fnd_file.put_line (fnd_file.LOG, 'resp appl id: '||fnd_global.RESP_APPL_ID);
409: fnd_file.put_line (fnd_file.LOG, 'batch id: '||p_batch_id);
410: fnd_file.put_line (fnd_file.LOG, 'user id: '||p_user_id);
411:
412: --

Line 409: fnd_file.put_line (fnd_file.LOG, 'batch id: '||p_batch_id);

405: l_has_proc_risk_access varchar2(15) := 'T'; --defaulting to 'T', which means 'has access'
406: BEGIN
407: fnd_file.put_line (fnd_file.LOG, 'resp id: '||fnd_global.RESP_ID);
408: fnd_file.put_line (fnd_file.LOG, 'resp appl id: '||fnd_global.RESP_APPL_ID);
409: fnd_file.put_line (fnd_file.LOG, 'batch id: '||p_batch_id);
410: fnd_file.put_line (fnd_file.LOG, 'user id: '||p_user_id);
411:
412: --
413: -- check access privilege

Line 410: fnd_file.put_line (fnd_file.LOG, 'user id: '||p_user_id);

406: BEGIN
407: fnd_file.put_line (fnd_file.LOG, 'resp id: '||fnd_global.RESP_ID);
408: fnd_file.put_line (fnd_file.LOG, 'resp appl id: '||fnd_global.RESP_APPL_ID);
409: fnd_file.put_line (fnd_file.LOG, 'batch id: '||p_batch_id);
410: fnd_file.put_line (fnd_file.LOG, 'user id: '||p_user_id);
411:
412: --
413: -- check access privilege
414: --

Line 484: FND_FILE.PUT_LINE(FND_FILE.LOG, 'in too many rows');

480: AND PROCESS_CODE=VALID_REC.PROCESS_CODE;
481: END IF;
482: EXCEPTION
483: WHEN TOO_MANY_ROWS THEN
484: FND_FILE.PUT_LINE(FND_FILE.LOG, 'in too many rows');
485: V_ERR_MSG := 'Multiple processes exist with same Process Name, please select Unique Process Code';
486: update_interface_with_error (v_err_msg
487: ,'AMW_RISKS'
488: ,VALID_REC.rcm_org_interface_id);

Line 490: FND_FILE.PUT_LINE(FND_FILE.LOG, 'in no data found');

486: update_interface_with_error (v_err_msg
487: ,'AMW_RISKS'
488: ,VALID_REC.rcm_org_interface_id);
489: WHEN NO_DATA_FOUND THEN
490: FND_FILE.PUT_LINE(FND_FILE.LOG, 'in no data found');
491: V_ERR_MSG := 'Please select valid combination of Process Name and Process Code';
492: update_interface_with_error (v_err_msg
493: ,'AMW_RISKS'
494: ,VALID_REC.rcm_org_interface_id);

Line 496: FND_FILE.PUT_LINE(FND_FILE.LOG, 'in others');

492: update_interface_with_error (v_err_msg
493: ,'AMW_RISKS'
494: ,VALID_REC.rcm_org_interface_id);
495: WHEN OTHERS THEN
496: FND_FILE.PUT_LINE(FND_FILE.LOG, 'in others');
497: V_ERR_MSG := 'Please select valid combination of Process Name and Process Code';
498: update_interface_with_error (v_err_msg
499: ,'AMW_RISKS'
500: ,VALID_REC.rcm_org_interface_id);

Line 530: fnd_file.put_line (fnd_file.LOG, '************** Checking Update Privilege for rc_rec.risk_name: '||rc_rec.risk_name);

526: l_new_risk := true; ---setting this to TRUE to avoid conflict with previous loop value
527: if(lx_risk_id is not null) then
528: ---Check for Update privilege here
529: l_new_risk := false;
530: fnd_file.put_line (fnd_file.LOG, '************** Checking Update Privilege for rc_rec.risk_name: '||rc_rec.risk_name);
531: l_has_risk_access := check_function(
532: p_function => 'AMW_RISK_UPDATE_PRVLG'
533: ,p_object_name => 'AMW_RISK'
534: ,p_instance_pk1_value => lx_risk_id

Line 536: fnd_file.put_line (fnd_file.LOG, 'l_has_risk_access: '||l_has_risk_access);

532: p_function => 'AMW_RISK_UPDATE_PRVLG'
533: ,p_object_name => 'AMW_RISK'
534: ,p_instance_pk1_value => lx_risk_id
535: ,p_user_id => fnd_global.user_id);
536: fnd_file.put_line (fnd_file.LOG, 'l_has_risk_access: '||l_has_risk_access);
537: fnd_file.put_line (fnd_file.LOG, '************** Checked Update Privilege for rc_rec.risk_name: '||rc_rec.risk_name);
538:
539: IF l_has_risk_access <> 'T' then
540: v_err_msg := 'Cannot update this Risk';

Line 537: fnd_file.put_line (fnd_file.LOG, '************** Checked Update Privilege for rc_rec.risk_name: '||rc_rec.risk_name);

533: ,p_object_name => 'AMW_RISK'
534: ,p_instance_pk1_value => lx_risk_id
535: ,p_user_id => fnd_global.user_id);
536: fnd_file.put_line (fnd_file.LOG, 'l_has_risk_access: '||l_has_risk_access);
537: fnd_file.put_line (fnd_file.LOG, '************** Checked Update Privilege for rc_rec.risk_name: '||rc_rec.risk_name);
538:
539: IF l_has_risk_access <> 'T' then
540: v_err_msg := 'Cannot update this Risk';
541: update_interface_with_error (v_err_msg

Line 549: FND_FILE.PUT_LINE(FND_FILE.LOG, 'GETTING PROCESS_ID');

545: end if;
546: ---03.03.2005 npanandi: added data security checks ends
547:
548:
549: FND_FILE.PUT_LINE(FND_FILE.LOG, 'GETTING PROCESS_ID');
550: l_process_id := null;
551: if(rc_rec.process_code is not null and rc_rec.process_name is not null)then
552: begin
553: FND_FILE.PUT_LINE(FND_FILE.LOG, 'v_interface_id: '||v_interface_id||', process_code is exists --> display_name: '||rc_rec.process_name||', process_code: '||rc_rec.process_code);

Line 553: FND_FILE.PUT_LINE(FND_FILE.LOG, 'v_interface_id: '||v_interface_id||', process_code is exists --> display_name: '||rc_rec.process_name||', process_code: '||rc_rec.process_code);

549: FND_FILE.PUT_LINE(FND_FILE.LOG, 'GETTING PROCESS_ID');
550: l_process_id := null;
551: if(rc_rec.process_code is not null and rc_rec.process_name is not null)then
552: begin
553: FND_FILE.PUT_LINE(FND_FILE.LOG, 'v_interface_id: '||v_interface_id||', process_code is exists --> display_name: '||rc_rec.process_name||', process_code: '||rc_rec.process_code);
554: select process_id into l_process_id
555: from amw_latest_rev_org_v
556: where display_name=rc_rec.process_name
557: and process_code=rc_rec.process_code

Line 561: FND_FILE.PUT_LINE(FND_FILE.LOG, 'in too many rows');

557: and process_code=rc_rec.process_code
558: and organization_id=rc_rec.organization_id;
559: exception
560: WHEN TOO_MANY_ROWS THEN
561: FND_FILE.PUT_LINE(FND_FILE.LOG, 'in too many rows');
562: V_ERR_MSG := 'Multiple processes exist with same Process Name, please select Unique Process Code';
563: update_interface_with_error (v_err_msg
564: ,'AMW_RISKS'
565: ,rc_REC.rcm_org_interface_id);

Line 567: FND_FILE.PUT_LINE(FND_FILE.LOG, 'in no data found');

563: update_interface_with_error (v_err_msg
564: ,'AMW_RISKS'
565: ,rc_REC.rcm_org_interface_id);
566: WHEN NO_DATA_FOUND THEN
567: FND_FILE.PUT_LINE(FND_FILE.LOG, 'in no data found');
568: V_ERR_MSG := 'Please select valid combination of Process Name and Process Code';
569: update_interface_with_error (v_err_msg
570: ,'AMW_RISKS'
571: ,rc_REC.rcm_org_interface_id);

Line 573: FND_FILE.PUT_LINE(FND_FILE.LOG, 'in others');

569: update_interface_with_error (v_err_msg
570: ,'AMW_RISKS'
571: ,rc_REC.rcm_org_interface_id);
572: WHEN OTHERS THEN
573: FND_FILE.PUT_LINE(FND_FILE.LOG, 'in others');
574: V_ERR_MSG := 'Please select valid combination of Process Name and Process Code';
575: update_interface_with_error (v_err_msg
576: ,'AMW_RISKS'
577: ,rc_REC.rcm_org_interface_id);

Line 582: FND_FILE.PUT_LINE(FND_FILE.LOG, 'in no data found');

578: end;
579: else
580: if((rc_rec.process_code is not null and rc_rec.process_name is null) or
581: (rc_rec.process_code is null and rc_rec.process_name is not null)) then
582: FND_FILE.PUT_LINE(FND_FILE.LOG, 'in no data found');
583: V_ERR_MSG := 'Please select valid combination of Process Name and Process Code';
584: update_interface_with_error (v_err_msg
585: ,'AMW_RISKS'
586: ,rc_REC.rcm_org_interface_id);

Line 589: FND_FILE.PUT_LINE(FND_FILE.LOG, 'GOT PROCESS_ID: '||l_process_id);

585: ,'AMW_RISKS'
586: ,rc_REC.rcm_org_interface_id);
587: end if;
588: end if;
589: FND_FILE.PUT_LINE(FND_FILE.LOG, 'GOT PROCESS_ID: '||l_process_id);
590:
591: IF((L_PROCESS_ID IS NOT NULL) AND (L_PROCESS_ID <> -1)) THEN
592: FND_FILE.PUT_LINE(FND_FILE.LOG, 'CALLING TO REVISE PROCESS --> P_ORG_ID'||RC_REC.ORGANIZATION_ID||', l_process_id: '||l_process_id);
593: AMW_ORG_HIERARCHY_PKG.revise_process_if_necessary(

Line 592: FND_FILE.PUT_LINE(FND_FILE.LOG, 'CALLING TO REVISE PROCESS --> P_ORG_ID'||RC_REC.ORGANIZATION_ID||', l_process_id: '||l_process_id);

588: end if;
589: FND_FILE.PUT_LINE(FND_FILE.LOG, 'GOT PROCESS_ID: '||l_process_id);
590:
591: IF((L_PROCESS_ID IS NOT NULL) AND (L_PROCESS_ID <> -1)) THEN
592: FND_FILE.PUT_LINE(FND_FILE.LOG, 'CALLING TO REVISE PROCESS --> P_ORG_ID'||RC_REC.ORGANIZATION_ID||', l_process_id: '||l_process_id);
593: AMW_ORG_HIERARCHY_PKG.revise_process_if_necessary(
594: P_ORG_ID => RC_REC.ORGANIZATION_ID
595: ,P_PROCESS_ID => L_PROCESS_ID
596: );

Line 642: fnd_file.put_line (fnd_file.LOG,'lx_return_status: '||lx_return_status);

638: ,p_user_id => FND_GLOBAL.USER_ID);
639: end if;
640: ---02.28.2005 npanandi: if new Control, grant CtrlOwner prvlg
641:
642: fnd_file.put_line (fnd_file.LOG,'lx_return_status: '||lx_return_status);
643: fnd_file.put_line (fnd_file.LOG,'lx_risk_rev_id: '||lx_risk_rev_id);
644: fnd_file.put_line (fnd_file.LOG,'lx_risk_id: '||lx_risk_id);
645:
646: IF lx_return_status <> FND_API.G_RET_STS_SUCCESS then

Line 643: fnd_file.put_line (fnd_file.LOG,'lx_risk_rev_id: '||lx_risk_rev_id);

639: end if;
640: ---02.28.2005 npanandi: if new Control, grant CtrlOwner prvlg
641:
642: fnd_file.put_line (fnd_file.LOG,'lx_return_status: '||lx_return_status);
643: fnd_file.put_line (fnd_file.LOG,'lx_risk_rev_id: '||lx_risk_rev_id);
644: fnd_file.put_line (fnd_file.LOG,'lx_risk_id: '||lx_risk_id);
645:
646: IF lx_return_status <> FND_API.G_RET_STS_SUCCESS then
647: v_err_msg := ' ';

Line 644: fnd_file.put_line (fnd_file.LOG,'lx_risk_id: '||lx_risk_id);

640: ---02.28.2005 npanandi: if new Control, grant CtrlOwner prvlg
641:
642: fnd_file.put_line (fnd_file.LOG,'lx_return_status: '||lx_return_status);
643: fnd_file.put_line (fnd_file.LOG,'lx_risk_rev_id: '||lx_risk_rev_id);
644: fnd_file.put_line (fnd_file.LOG,'lx_risk_id: '||lx_risk_id);
645:
646: IF lx_return_status <> FND_API.G_RET_STS_SUCCESS then
647: v_err_msg := ' ';
648: FOR x IN 1..lx_msg_count LOOP

Line 827: fnd_file.put_line (fnd_file.LOG, '************** Checking Update Privilege for rc_rec.control_name: '||rc_rec.control_name);

823: l_new_control := true; ---setting this to TRUE to avoid conflict with previous loop value
824: if(lx_control_id is not null) then
825: ---Check for Update privilege here
826: l_new_control := false;
827: fnd_file.put_line (fnd_file.LOG, '************** Checking Update Privilege for rc_rec.control_name: '||rc_rec.control_name);
828: l_has_ctrl_access := check_function(
829: p_function => 'AMW_CTRL_UPDATE_PRVLG'
830: ,p_object_name => 'AMW_CONTROL'
831: ,p_instance_pk1_value => lx_control_id

Line 833: fnd_file.put_line (fnd_file.LOG, 'l_has_ctrl_access: '||l_has_ctrl_access);

829: p_function => 'AMW_CTRL_UPDATE_PRVLG'
830: ,p_object_name => 'AMW_CONTROL'
831: ,p_instance_pk1_value => lx_control_id
832: ,p_user_id => fnd_global.user_id);
833: fnd_file.put_line (fnd_file.LOG, 'l_has_ctrl_access: '||l_has_ctrl_access);
834: fnd_file.put_line (fnd_file.LOG, '************** Checked Update Privilege for rc_rec.control_name: '||rc_rec.control_name);
835:
836: IF l_has_ctrl_access <> 'T' then
837: v_err_msg := 'Cannot update this Ctrl';

Line 834: fnd_file.put_line (fnd_file.LOG, '************** Checked Update Privilege for rc_rec.control_name: '||rc_rec.control_name);

830: ,p_object_name => 'AMW_CONTROL'
831: ,p_instance_pk1_value => lx_control_id
832: ,p_user_id => fnd_global.user_id);
833: fnd_file.put_line (fnd_file.LOG, 'l_has_ctrl_access: '||l_has_ctrl_access);
834: fnd_file.put_line (fnd_file.LOG, '************** Checked Update Privilege for rc_rec.control_name: '||rc_rec.control_name);
835:
836: IF l_has_ctrl_access <> 'T' then
837: v_err_msg := 'Cannot update this Ctrl';
838: update_interface_with_error (v_err_msg

Line 907: fnd_file.put_line (fnd_file.LOG,'lx_return_status: '||lx_return_status);

903: ,p_user_id => FND_GLOBAL.USER_ID);
904: end if;
905: ---03.03.2005 npanandi: if new Control, grant CtrlOwner prvlg
906:
907: fnd_file.put_line (fnd_file.LOG,'lx_return_status: '||lx_return_status);
908: fnd_file.put_line (fnd_file.LOG,'lx_risk_rev_id: '||lx_risk_rev_id);
909: fnd_file.put_line (fnd_file.LOG,'vx_control_rev_id: '||vx_control_rev_id);
910:
911: IF lx_return_status <> FND_API.G_RET_STS_SUCCESS then

Line 908: fnd_file.put_line (fnd_file.LOG,'lx_risk_rev_id: '||lx_risk_rev_id);

904: end if;
905: ---03.03.2005 npanandi: if new Control, grant CtrlOwner prvlg
906:
907: fnd_file.put_line (fnd_file.LOG,'lx_return_status: '||lx_return_status);
908: fnd_file.put_line (fnd_file.LOG,'lx_risk_rev_id: '||lx_risk_rev_id);
909: fnd_file.put_line (fnd_file.LOG,'vx_control_rev_id: '||vx_control_rev_id);
910:
911: IF lx_return_status <> FND_API.G_RET_STS_SUCCESS then
912: v_err_msg := ' ';

Line 909: fnd_file.put_line (fnd_file.LOG,'vx_control_rev_id: '||vx_control_rev_id);

905: ---03.03.2005 npanandi: if new Control, grant CtrlOwner prvlg
906:
907: fnd_file.put_line (fnd_file.LOG,'lx_return_status: '||lx_return_status);
908: fnd_file.put_line (fnd_file.LOG,'lx_risk_rev_id: '||lx_risk_rev_id);
909: fnd_file.put_line (fnd_file.LOG,'vx_control_rev_id: '||vx_control_rev_id);
910:
911: IF lx_return_status <> FND_API.G_RET_STS_SUCCESS then
912: v_err_msg := ' ';
913: FOR x IN 1..lx_msg_count LOOP

Line 1051: fnd_file.put_line(fnd_file.log,'%%%%%%%%%%%%%%%%%% l_has_assn_access: '||l_has_assn_access||' %%%%%%%%%%%%%%%%%%');

1047: ---03.04.2005 npanandi: added pk1/pk2 for OrgId, ProcessId respectively
1048: ,p_instance_pk1_value => l_organization_ID
1049: ,p_instance_pk2_value => l_PROCESS_ID
1050: ,p_user_id => fnd_global.user_id);
1051: fnd_file.put_line(fnd_file.log,'%%%%%%%%%%%%%%%%%% l_has_assn_access: '||l_has_assn_access||' %%%%%%%%%%%%%%%%%%');
1052:
1053: IF l_has_assn_access <> 'T' then
1054: v_err_msg := 'Cannot associate to this Process';
1055: update_interface_with_error (v_err_msg

Line 1091: FND_FILE.PUT_LINE(FND_FILE.LOG,'PROCESS_ID DEFINED, HENCE INSIDE' );

1087:
1088: IF(L_CONTROL_ASSOCIATION_ID IS NULL) THEN
1089: --NO ROW RETRIEVED, SO ASSOCIATION DOESN'T EXIST YET
1090: --CREATE AN ASSOCIATION
1091: FND_FILE.PUT_LINE(FND_FILE.LOG,'PROCESS_ID DEFINED, HENCE INSIDE' );
1092: CREATE_AMW_CTRL_ASSOC(
1093: P_ORGANIZATION_ID => RC_REC.ORGANIZATION_ID
1094: ,P_PROCESS_ID => L_PROCESS_ID
1095: ,P_RISK_ID => lx_risk_id

Line 1161: fnd_file.put_line(fnd_file.log,'process_id defined, hence inside' );

1157:
1158: if(l_control_association_id is null) then
1159: --no row retrieved, so association doesn'T EXIST YET
1160: --create an association
1161: fnd_file.put_line(fnd_file.log,'process_id defined, hence inside' );
1162: create_entity_control(
1163: p_organization_id => rc_rec.organization_id
1164: ,p_risk_id => lx_risk_id
1165: ,p_control_id => lx_control_id

Line 1221: fnd_file.put_line (fnd_file.LOG,'%%%%%% Processing AP_Association data');

1217: update_interface_with_error (v_err_msg
1218: ,v_table_name
1219: ,v_interface_id);
1220: else
1221: fnd_file.put_line (fnd_file.LOG,'%%%%%% Processing AP_Association data');
1222: --SET THESE 2 VARS TO NULL FOR PROCESSING THIS LOOP
1223: L_AP_ASSOCIATION_ID := NULL;
1224: L_AP_APPROVAL_DATE := NULL;
1225: --NPANANDI 11/12/2004: CHANGED THE ABOVE SELECT CHECK

Line 1228: fnd_file.put_line (fnd_file.LOG,'l_object_type_count --> '||l_object_type_count);

1224: L_AP_APPROVAL_DATE := NULL;
1225: --NPANANDI 11/12/2004: CHANGED THE ABOVE SELECT CHECK
1226: --FOR EXISTING AP 2 CTRL ASSOCIATION
1227:
1228: fnd_file.put_line (fnd_file.LOG,'l_object_type_count --> '||l_object_type_count);
1229: IF((((l_revise_control_flag ='Y' OR v_control_db_approval_status is null)
1230: AND l_control_approval_status_code = 'A')
1231: OR (l_revise_control_flag='N' and v_control_db_approval_status='A'))) THEN
1232: ---set the below flag, depends on whether to use it later or not

Line 1298: fnd_file.put_line(fnd_file.LOG,'########## Before Going to Create_Process_Objectives');

1294: l_process_obj_column := FALSE;
1295: end if;
1296:
1297: if(l_process_obj_column = true)then
1298: fnd_file.put_line(fnd_file.LOG,'########## Before Going to Create_Process_Objectives');
1299: fnd_file.put_line(fnd_file.LOG,'vx_process_objective_id: '||vx_process_objective_id);
1300: create_process_objectives(p_process_objective_name => rc_rec.process_objective_name,
1301: p_process_obj_description => rc_rec.process_obj_description,
1302: p_requestor_id => l_requestor_id,

Line 1299: fnd_file.put_line(fnd_file.LOG,'vx_process_objective_id: '||vx_process_objective_id);

1295: end if;
1296:
1297: if(l_process_obj_column = true)then
1298: fnd_file.put_line(fnd_file.LOG,'########## Before Going to Create_Process_Objectives');
1299: fnd_file.put_line(fnd_file.LOG,'vx_process_objective_id: '||vx_process_objective_id);
1300: create_process_objectives(p_process_objective_name => rc_rec.process_objective_name,
1301: p_process_obj_description => rc_rec.process_obj_description,
1302: p_requestor_id => l_requestor_id,
1303: x_return_status => lx_return_status);

Line 1305: fnd_file.put_line(fnd_file.LOG,'########## After Going to Create_Process_Objectives');

1301: p_process_obj_description => rc_rec.process_obj_description,
1302: p_requestor_id => l_requestor_id,
1303: x_return_status => lx_return_status);
1304:
1305: fnd_file.put_line(fnd_file.LOG,'########## After Going to Create_Process_Objectives');
1306: fnd_file.put_line(fnd_file.LOG,'vx_process_objective_id: '||vx_process_objective_id);
1307:
1308: IF lx_return_status <> FND_API.G_RET_STS_SUCCESS then
1309: v_err_msg := ' ';

Line 1306: fnd_file.put_line(fnd_file.LOG,'vx_process_objective_id: '||vx_process_objective_id);

1302: p_requestor_id => l_requestor_id,
1303: x_return_status => lx_return_status);
1304:
1305: fnd_file.put_line(fnd_file.LOG,'########## After Going to Create_Process_Objectives');
1306: fnd_file.put_line(fnd_file.LOG,'vx_process_objective_id: '||vx_process_objective_id);
1307:
1308: IF lx_return_status <> FND_API.G_RET_STS_SUCCESS then
1309: v_err_msg := ' ';
1310: FOR x IN 1..lx_msg_count LOOP

Line 1329: ---fnd_file.put_line (fnd_file.LOG, 'v_error_found: '||v_error_found);

1325: --
1326: -- CREATE PROCESS OBJECTIVE TO PROCESS ASSOCIATIONS STARTS HERE
1327: --
1328: l_process_objective_id := vx_process_objective_id;
1329: ---fnd_file.put_line (fnd_file.LOG, 'v_error_found: '||v_error_found);
1330: fnd_file.put_line (fnd_file.LOG, 'rc_rec.process_objective_name: '||rc_rec.process_objective_name);
1331: fnd_file.put_line (fnd_file.LOG, 'l_process_id: '||l_process_id);
1332: fnd_file.put_line (fnd_file.LOG, 'l_process_objective_id: '||l_process_objective_id);
1333:

Line 1330: fnd_file.put_line (fnd_file.LOG, 'rc_rec.process_objective_name: '||rc_rec.process_objective_name);

1326: -- CREATE PROCESS OBJECTIVE TO PROCESS ASSOCIATIONS STARTS HERE
1327: --
1328: l_process_objective_id := vx_process_objective_id;
1329: ---fnd_file.put_line (fnd_file.LOG, 'v_error_found: '||v_error_found);
1330: fnd_file.put_line (fnd_file.LOG, 'rc_rec.process_objective_name: '||rc_rec.process_objective_name);
1331: fnd_file.put_line (fnd_file.LOG, 'l_process_id: '||l_process_id);
1332: fnd_file.put_line (fnd_file.LOG, 'l_process_objective_id: '||l_process_objective_id);
1333:
1334: IF((not v_error_found) AND

Line 1331: fnd_file.put_line (fnd_file.LOG, 'l_process_id: '||l_process_id);

1327: --
1328: l_process_objective_id := vx_process_objective_id;
1329: ---fnd_file.put_line (fnd_file.LOG, 'v_error_found: '||v_error_found);
1330: fnd_file.put_line (fnd_file.LOG, 'rc_rec.process_objective_name: '||rc_rec.process_objective_name);
1331: fnd_file.put_line (fnd_file.LOG, 'l_process_id: '||l_process_id);
1332: fnd_file.put_line (fnd_file.LOG, 'l_process_objective_id: '||l_process_objective_id);
1333:
1334: IF((not v_error_found) AND
1335: ---03.03.2005 npanandi: putting the Update Process access priv

Line 1332: fnd_file.put_line (fnd_file.LOG, 'l_process_objective_id: '||l_process_objective_id);

1328: l_process_objective_id := vx_process_objective_id;
1329: ---fnd_file.put_line (fnd_file.LOG, 'v_error_found: '||v_error_found);
1330: fnd_file.put_line (fnd_file.LOG, 'rc_rec.process_objective_name: '||rc_rec.process_objective_name);
1331: fnd_file.put_line (fnd_file.LOG, 'l_process_id: '||l_process_id);
1332: fnd_file.put_line (fnd_file.LOG, 'l_process_objective_id: '||l_process_objective_id);
1333:
1334: IF((not v_error_found) AND
1335: ---03.03.2005 npanandi: putting the Update Process access priv
1336: ---check here

Line 1365: FND_FILE.PUT_LINE(FND_FILE.LOG,'Need to change the way data is inserted in amw_objective_associations');

1361:
1362: IF (L_PROC_OBJ_ASSOCIATION_ID IS NULL) THEN
1363: --NO ROW RETRIEVED, SO ASSOCIATION DOESN'T EXIST YET
1364: --CREATE AN ASSOCIATION, SET ASSOCIATION_CREATION_DATE=SYSDATE
1365: FND_FILE.PUT_LINE(FND_FILE.LOG,'Need to change the way data is inserted in amw_objective_associations');
1366: CREATE_AMW_OBJ_ASSOC(
1367: P_PROCESS_OBJECTIVE_ID => l_process_objective_id
1368: ,P_PK1 => l_organization_id
1369: ---01.13.2005 npanandi: added below columns

Line 1440: FND_FILE.PUT_LINE(FND_FILE.LOG,'Need to change the way data is inserted in amw_risk_associations');

1436:
1437: IF(L_RISK_OBJ_ASSOCIATION_ID IS NULL) THEN
1438: --NO ROW RETRIEVED, SO ASSOCIATION DOESN'T EXIST YET
1439: --CREATE AN ASSOCIATION, SET ASSOCIATION_CREATION_DATE=SYSDATE
1440: FND_FILE.PUT_LINE(FND_FILE.LOG,'Need to change the way data is inserted in amw_risk_associations');
1441: CREATE_AMW_OBJ_ASSOC(
1442: P_PROCESS_OBJECTIVE_ID => l_process_objective_id
1443: ,P_PK1 => lx_risk_id
1444: ,P_OBJECT_TYPE => 'RISK'

Line 1446: fnd_file.put_line (fnd_file.LOG, 'inserting lx_risk_id: '||lx_risk_id||' l_process_objective_id '||l_process_objective_id);

1442: P_PROCESS_OBJECTIVE_ID => l_process_objective_id
1443: ,P_PK1 => lx_risk_id
1444: ,P_OBJECT_TYPE => 'RISK'
1445: );
1446: fnd_file.put_line (fnd_file.LOG, 'inserting lx_risk_id: '||lx_risk_id||' l_process_objective_id '||l_process_objective_id);
1447: ELSE
1448: --THIS MEANS THAT ASSOCIATION EXISTS, SO CHECK APPROVAL_DATE
1449:
1450: --IF APPROVAL_DATE IS NULL FOR OBJECTIVE_ASSOCIATIONS,

Line 1524: fnd_file.put_line (fnd_file.LOG, 'inside if for CONTROL_ORG: l_process_objective_id '||l_process_objective_id);

1520: EXCEPTION
1521: WHEN NO_DATA_FOUND THEN
1522: NULL; --DO NOTHING ...
1523: END;
1524: fnd_file.put_line (fnd_file.LOG, 'inside if for CONTROL_ORG: l_process_objective_id '||l_process_objective_id);
1525:
1526: IF(L_CTRL_OBJ_ASSOCIATION_ID IS NULL) THEN
1527: --NO ROW RETRIEVED, SO ASSOCIATION DOESN'T EXIST YET
1528: --CREATE AN ASSOCIATION, SET ASSOCIATION_CREATION_DATE=SYSDATE

Line 1529: FND_FILE.PUT_LINE(FND_FILE.LOG,'Need to change the way data is inserted in amw_risk_associations');

1525:
1526: IF(L_CTRL_OBJ_ASSOCIATION_ID IS NULL) THEN
1527: --NO ROW RETRIEVED, SO ASSOCIATION DOESN'T EXIST YET
1528: --CREATE AN ASSOCIATION, SET ASSOCIATION_CREATION_DATE=SYSDATE
1529: FND_FILE.PUT_LINE(FND_FILE.LOG,'Need to change the way data is inserted in amw_risk_associations');
1530: CREATE_AMW_OBJ_ASSOC(
1531: P_PROCESS_OBJECTIVE_ID => l_process_objective_id
1532: ,P_PK1 => l_organization_id
1533: --01.13.2005 npanandi: added pk2,pk3,pk4 for Org-Ctrl to Obj association

Line 1539: fnd_file.put_line (fnd_file.LOG, 'inserting lx_control_id: '||lx_control_id||' l_process_objective_id '||l_process_objective_id);

1535: ,P_PK3 => lx_risk_id
1536: ,P_PK4 => lx_control_id
1537: ,P_OBJECT_TYPE => 'CONTROL_ORG'
1538: );
1539: fnd_file.put_line (fnd_file.LOG, 'inserting lx_control_id: '||lx_control_id||' l_process_objective_id '||l_process_objective_id);
1540: ELSE
1541: --THIS MEANS THAT ASSOCIATION EXISTS, SO CHECK APPROVAL_DATE
1542:
1543: --IF APPROVAL_DATE IS NULL FOR OBJECTIVE_ASSOCIATIONS,

Line 1620: fnd_file.put_line(fnd_file.log,'%%%%%%%%%%%%%%%%%% l_has_proc_risk_access: '||l_has_proc_risk_access||' %%%%%%%%%%%%%%%%%%');

1616: ,p_object_name => 'AMW_PROCESS_ORGANIZATION'
1617: ,p_instance_pk1_value => l_organization_ID
1618: ,p_instance_pk2_value => l_PROCESS_ID
1619: ,p_user_id => fnd_global.user_id);
1620: fnd_file.put_line(fnd_file.log,'%%%%%%%%%%%%%%%%%% l_has_proc_risk_access: '||l_has_proc_risk_access||' %%%%%%%%%%%%%%%%%%');
1621:
1622: IF l_has_proc_risk_access <> 'T' then
1623: v_err_msg := 'Cannot associate to this Process';
1624: update_interface_with_error (v_err_msg

Line 1644: FND_FILE.PUT_LINE(FND_FILE.LOG, '>>>>>>>>>>>>>> PROCESSING RISK PROCESS ASSOCIATIONS');

1640: L_RISK_ASSOCIATION_ID := NULL;
1641: L_RISK_APPROVAL_DATE := NULL;
1642: --npanandi 10/26/2004: changed the way check is done post AMW.D
1643: BEGIN
1644: FND_FILE.PUT_LINE(FND_FILE.LOG, '>>>>>>>>>>>>>> PROCESSING RISK PROCESS ASSOCIATIONS');
1645: SELECT RISK_ASSOCIATION_ID,APPROVAL_DATE
1646: INTO L_RISK_ASSOCIATION_ID,L_RISK_APPROVAL_DATE
1647: FROM AMW_RISK_ASSOCIATIONS
1648: WHERE RISK_ID=lx_risk_id

Line 1678: FND_FILE.PUT_LINE(FND_FILE.LOG,'UPDATE THIS ASSOCIATION, THEN INSERT');

1674: --IS LATEST_REVISION, SO SIMPLY UPDATE ASSOC ATTRIBUTES
1675: IF(L_RISK_APPROVAL_DATE IS NOT NULL) THEN
1676: --THIS MEANS THAT THIS IS LATEST REVISION FOR THIS ASSOCIATION
1677: --AND IS APPROVED, SO
1678: FND_FILE.PUT_LINE(FND_FILE.LOG,'UPDATE THIS ASSOCIATION, THEN INSERT');
1679: BEGIN
1680: UPDATE AMW_RISK_ASSOCIATIONS
1681: SET DELETION_DATE=SYSDATE
1682: ,OBJECT_VERSION_NUMBER=OBJECT_VERSION_NUMBER+1

Line 1729: fnd_file.put_line(fnd_file.log, '>>>>>>>>>>>>>> PROCESSING RISK PROCESS ASSOCIATIONS');

1725: l_risk_association_id := null;
1726: l_risk_approval_date := null;
1727: --npanandi 10/26/2004: changed the way check is done post amw.d
1728: begin
1729: fnd_file.put_line(fnd_file.log, '>>>>>>>>>>>>>> PROCESSING RISK PROCESS ASSOCIATIONS');
1730: select risk_association_id,approval_date
1731: into l_risk_association_id,l_risk_approval_date
1732: from amw_risk_associations
1733: where risk_id=lx_risk_id

Line 1761: fnd_file.put_line(fnd_file.log,'update this association, then insert');

1757: --is latest_revision, so simply update assoc attributes
1758: if(l_risk_approval_date is not null) then
1759: --this means that this is latest revision for this association
1760: --and is approved, so
1761: fnd_file.put_line(fnd_file.log,'update this association, then insert');
1762: begin
1763: update amw_risk_associations
1764: set deletion_date=sysdate
1765: ,object_version_number=object_version_number+1

Line 1817: fnd_file.put_line (fnd_file.LOG, 'err in interface rec '||v_interface_id||': '||SUBSTR (v_err_msg, 1, 200));

1813: v_table_name := 'UNKNOWN';
1814: update_interface_with_error (v_err_msg
1815: ,v_table_name
1816: ,v_interface_id);
1817: fnd_file.put_line (fnd_file.LOG, 'err in interface rec '||v_interface_id||': '||SUBSTR (v_err_msg, 1, 200));
1818: END; --end of BEGIN in the beginning
1819: END LOOP; --end the top level FOR rc_rec IN Risk_Controls_Cur LOOP
1820:
1821: --

Line 1828: fnd_file.put_line (fnd_file.LOG, '********************** v_error_found is true, l_process_flag: '||l_process_flag);

1824: --
1825: IF v_error_found THEN
1826: ROLLBACK;
1827: l_process_flag := NULL;
1828: fnd_file.put_line (fnd_file.LOG, '********************** v_error_found is true, l_process_flag: '||l_process_flag);
1829: ELSE
1830: l_process_flag := 'Y';
1831: fnd_file.put_line (fnd_file.LOG, '********************** v_error_found is false, l_process_flag: '||l_process_flag);
1832: END IF;

Line 1831: fnd_file.put_line (fnd_file.LOG, '********************** v_error_found is false, l_process_flag: '||l_process_flag);

1827: l_process_flag := NULL;
1828: fnd_file.put_line (fnd_file.LOG, '********************** v_error_found is true, l_process_flag: '||l_process_flag);
1829: ELSE
1830: l_process_flag := 'Y';
1831: fnd_file.put_line (fnd_file.LOG, '********************** v_error_found is false, l_process_flag: '||l_process_flag);
1832: END IF;
1833:
1834: IF UPPER (l_amw_delt_rcm_org_intf) <> 'Y' THEN
1835: BEGIN

Line 1843: fnd_file.put_line (fnd_file.LOG,'err in update process flag: '||SUBSTR (SQLERRM, 1, 200));

1839: ,last_updated_by = v_user_id
1840: WHERE batch_id = p_batch_id;
1841: EXCEPTION
1842: WHEN OTHERS THEN
1843: fnd_file.put_line (fnd_file.LOG,'err in update process flag: '||SUBSTR (SQLERRM, 1, 200));
1844: END;
1845: ELSE
1846: IF NOT v_error_found THEN
1847: BEGIN

Line 1852: fnd_file.put_line (fnd_file.LOG,'err in delete interface records: '||SUBSTR (SQLERRM, 1, 200));

1848: DELETE FROM amw_rcm_org_interface WHERE batch_id = p_batch_id;
1849:
1850: EXCEPTION
1851: WHEN OTHERS THEN
1852: fnd_file.put_line (fnd_file.LOG,'err in delete interface records: '||SUBSTR (SQLERRM, 1, 200));
1853: END;
1854: END IF;
1855: END IF;
1856:

Line 1860: fnd_file.put_line (fnd_file.LOG, 'Invalid Risk Type.');

1856:
1857: EXCEPTION
1858: /** nilesh added for invalid risk type **/
1859: WHEN e_invalid_risk_type THEN
1860: fnd_file.put_line (fnd_file.LOG, 'Invalid Risk Type.');
1861:
1862: BEGIN
1863: IF v_invalid_risk_type is null THEN
1864: v_invalid_risk_type := FND_MESSAGE.GET_STRING('AMW', 'AMW_INVALID_RISK_TYPE');

Line 1872: fnd_file.put_line (fnd_file.LOG, 'unexpected exception in handling e_invalid_risk_type: '||sqlerrm);

1868: ,interface_status = v_invalid_risk_type
1869: WHERE batch_id = p_batch_id;
1870: EXCEPTION
1871: WHEN OTHERS THEN
1872: fnd_file.put_line (fnd_file.LOG, 'unexpected exception in handling e_invalid_risk_type: '||sqlerrm);
1873: END;
1874: /** nilesh added for invalid risk type **/
1875:
1876: WHEN e_invalid_requestor_id THEN

Line 1877: fnd_file.put_line (fnd_file.LOG, 'Invalid requestor id.');

1873: END;
1874: /** nilesh added for invalid risk type **/
1875:
1876: WHEN e_invalid_requestor_id THEN
1877: fnd_file.put_line (fnd_file.LOG, 'Invalid requestor id.');
1878: BEGIN
1879: IF v_invalid_requestor_msg is null THEN
1880: v_invalid_requestor_msg := FND_MESSAGE.GET_STRING('AMW', 'AMW_UNKNOWN_EMPLOYEE');
1881: END IF;

Line 1888: fnd_file.put_line (fnd_file.LOG, 'unexpected exception in handling e_invalid_requestor_id: '||sqlerrm);

1884: ,interface_status = v_invalid_requestor_msg
1885: WHERE batch_id = p_batch_id;
1886: EXCEPTION
1887: WHEN OTHERS THEN
1888: fnd_file.put_line (fnd_file.LOG, 'unexpected exception in handling e_invalid_requestor_id: '||sqlerrm);
1889: END;
1890:
1891: WHEN e_no_import_access THEN
1892: fnd_file.put_line (fnd_file.LOG, 'no import privilege');

Line 1892: fnd_file.put_line (fnd_file.LOG, 'no import privilege');

1888: fnd_file.put_line (fnd_file.LOG, 'unexpected exception in handling e_invalid_requestor_id: '||sqlerrm);
1889: END;
1890:
1891: WHEN e_no_import_access THEN
1892: fnd_file.put_line (fnd_file.LOG, 'no import privilege');
1893: BEGIN
1894: IF v_no_import_privilege_msg is null THEN
1895: v_no_import_privilege_msg := FND_MESSAGE.GET_STRING('AMW', 'AMW_NO_IMPORT_ACCESS');
1896: END IF;

Line 1903: fnd_file.put_line (fnd_file.LOG, 'unexpected exception in handling e_no_import_access: '||sqlerrm);

1899: ,interface_status = v_no_import_privilege_msg
1900: WHERE batch_id = p_batch_id;
1901: EXCEPTION
1902: WHEN OTHERS THEN
1903: fnd_file.put_line (fnd_file.LOG, 'unexpected exception in handling e_no_import_access: '||sqlerrm);
1904: END;
1905:
1906: WHEN others THEN
1907: rollback;

Line 1908: fnd_file.put_line (fnd_file.LOG, 'unexpected exception in create_risks_and_controls: '||sqlerrm);

1904: END;
1905:
1906: WHEN others THEN
1907: rollback;
1908: fnd_file.put_line (fnd_file.LOG, 'unexpected exception in create_risks_and_controls: '||sqlerrm);
1909: END create_risks_and_controls;
1910:
1911: --
1912: -- Insert or update the Process Objectives

Line 1937: fnd_file.put_line(fnd_file.log,'~~~~~~~~~~~~~~~~~~~~~~ create_process_objectives: START');

1933: e_invalid_obj EXCEPTION;
1934: e_invalid_flag EXCEPTION;
1935: e_invalid_risk_type_flag exception;
1936: BEGIN
1937: fnd_file.put_line(fnd_file.log,'~~~~~~~~~~~~~~~~~~~~~~ create_process_objectives: START');
1938: fnd_file.put_line(fnd_file.log,'p_process_objective_name: '||p_process_objective_name);
1939: /*
1940: select count(*) into l_risk_type_exists
1941: from amw_risk_type

Line 1938: fnd_file.put_line(fnd_file.log,'p_process_objective_name: '||p_process_objective_name);

1934: e_invalid_flag EXCEPTION;
1935: e_invalid_risk_type_flag exception;
1936: BEGIN
1937: fnd_file.put_line(fnd_file.log,'~~~~~~~~~~~~~~~~~~~~~~ create_process_objectives: START');
1938: fnd_file.put_line(fnd_file.log,'p_process_objective_name: '||p_process_objective_name);
1939: /*
1940: select count(*) into l_risk_type_exists
1941: from amw_risk_type
1942: where risk_rev_id = lx_risk_rev_id

Line 1951: fnd_file.put_line(fnd_file.log,'p_process_objective_name does not exist');

1947: close c_get_objective;
1948:
1949: if(l_get_objective.process_objective_id is null)then
1950:
1951: fnd_file.put_line(fnd_file.log,'p_process_objective_name does not exist');
1952:
1953: OPEN c_process_objective_id;
1954: FETCH c_process_objective_id INTO l_process_objective_id;
1955: CLOSE c_process_objective_id;

Line 1992: fnd_file.put_line(fnd_file.log,'vx_process_objective_id: '||vx_process_objective_id);

1988: X_DESCRIPTION => p_process_obj_description
1989: );
1990:
1991: vx_process_objective_id := l_process_objective_id;
1992: fnd_file.put_line(fnd_file.log,'vx_process_objective_id: '||vx_process_objective_id);
1993: else
1994: vx_process_objective_id := l_get_objective.process_objective_id;
1995: fnd_file.put_line(fnd_file.log,'p_process_objective_name exists --> vx_process_objective_id: '||vx_process_objective_id);
1996: update AMW_PROCESS_OBJECTIVEs_TL set

Line 1995: fnd_file.put_line(fnd_file.log,'p_process_objective_name exists --> vx_process_objective_id: '||vx_process_objective_id);

1991: vx_process_objective_id := l_process_objective_id;
1992: fnd_file.put_line(fnd_file.log,'vx_process_objective_id: '||vx_process_objective_id);
1993: else
1994: vx_process_objective_id := l_get_objective.process_objective_id;
1995: fnd_file.put_line(fnd_file.log,'p_process_objective_name exists --> vx_process_objective_id: '||vx_process_objective_id);
1996: update AMW_PROCESS_OBJECTIVEs_TL set
1997: NAME = p_process_objective_name,
1998: DESCRIPTION = p_process_obj_description,
1999: LAST_UPDATE_DATE = sysdate,

Line 2012: fnd_file.put_line(fnd_file.log,'~~~~~~~~~~~~~~~~~~~~~~ create_process_objectives: END');

2008: end if;
2009:
2010: end if;
2011:
2012: fnd_file.put_line(fnd_file.log,'~~~~~~~~~~~~~~~~~~~~~~ create_process_objectives: END');
2013:
2014: EXCEPTION
2015: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2016: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2254: ---fnd_file.put_line(fnd_file.log,'control_objectives --> p_ctrl_obj_flag: '||p_ctrl_obj_flag||'p_lookup_tag: '||p_lookup_tag);

2250: l_obj_exists number;
2251: e_invalid_obj EXCEPTION;
2252: e_invalid_flag EXCEPTION;
2253: BEGIN
2254: ---fnd_file.put_line(fnd_file.log,'control_objectives --> p_ctrl_obj_flag: '||p_ctrl_obj_flag||'p_lookup_tag: '||p_lookup_tag);
2255:
2256: IF p_ctrl_obj_flag is not null THEN
2257: IF UPPER (p_ctrl_obj_flag) = 'Y' THEN
2258: l_ctrl_obj_flag := 'Y';

Line 2389: -----fnd_file.put_line(fnd_file.log,'control_assertions --> p_ctrl_assert_flag: '||p_ctrl_assert_flag||'p_lookup_tag: '||p_lookup_tag);

2385: l_assert_exists number;
2386: e_invalid_assert EXCEPTION;
2387: e_invalid_flag EXCEPTION;
2388: BEGIN
2389: -----fnd_file.put_line(fnd_file.log,'control_assertions --> p_ctrl_assert_flag: '||p_ctrl_assert_flag||'p_lookup_tag: '||p_lookup_tag);
2390:
2391: IF (p_ctrl_assert_flag is not null) THEN
2392: IF UPPER (p_ctrl_assert_flag) = 'Y' THEN
2393: l_ctrl_assert_flag := 'Y';

Line 2526: fnd_file.put_line (fnd_file.LOG, '********************** UPDATE_INTERFACE_WITH_ERROR **********************');

2522: BEGIN
2523: ROLLBACK; -- rollback any inserts done during the current loop process
2524: v_error_found := TRUE;
2525:
2526: fnd_file.put_line (fnd_file.LOG, '********************** UPDATE_INTERFACE_WITH_ERROR **********************');
2527:
2528: BEGIN
2529: SELECT interface_status
2530: INTO l_interface_status

Line 2536: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));

2532: WHERE rcm_org_interface_id = p_interface_id;
2533: EXCEPTION
2534: WHEN OTHERS THEN
2535: v_err_msg :='interface_id: = '|| p_interface_id|| ' '|| SUBSTR (SQLERRM, 1, 100);
2536: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
2537: END;
2538:
2539: BEGIN
2540: UPDATE amw_rcm_org_interface

Line 2545: fnd_file.put_line (fnd_file.LOG, SUBSTR (l_interface_status, 1, 200));

2541: SET interface_status =l_interface_status|| p_err_msg|| '**'
2542: ,error_flag = 'Y'
2543: WHERE rcm_org_interface_id = p_interface_id;
2544:
2545: fnd_file.put_line (fnd_file.LOG, SUBSTR (l_interface_status, 1, 200));
2546: COMMIT;
2547: EXCEPTION
2548: WHEN OTHERS THEN
2549: v_err_msg :='Error during package processing '|| ' interface_id: = '|| p_interface_id|| SUBSTR (SQLERRM, 1, 100);

Line 2550: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));

2546: COMMIT;
2547: EXCEPTION
2548: WHEN OTHERS THEN
2549: v_err_msg :='Error during package processing '|| ' interface_id: = '|| p_interface_id|| SUBSTR (SQLERRM, 1, 100);
2550: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
2551: END;
2552:
2553: COMMIT;
2554: END update_interface_with_error;

Line 2577: ---fnd_file.put_line(fnd_file.log,'control_objectives --> p_ctrl_obj_flag: '||p_ctrl_obj_flag||'p_lookup_tag: '||p_lookup_tag);

2573: l_comp_exists number;
2574: e_invalid_comp EXCEPTION;
2575: e_invalid_flag EXCEPTION;
2576: BEGIN
2577: ---fnd_file.put_line(fnd_file.log,'control_objectives --> p_ctrl_obj_flag: '||p_ctrl_obj_flag||'p_lookup_tag: '||p_lookup_tag);
2578:
2579: IF p_ctrl_comp_flag is not null THEN
2580: IF UPPER (p_ctrl_comp_flag) = 'Y' THEN
2581: l_ctrl_comp_flag := 'Y';

Line 2761: fnd_file.put_line(fnd_file.log,'%%%%%%%%%%%%%%%%%% l_has_assn_access: '||l_has_assn_access||' %%%%%%%%%%%%%%%%%%');

2757: p_function => 'AMW_UPDATE_AP_DETAILS'
2758: ,p_object_name => 'AMW_AUDIT_PROCEDURE'
2759: ,p_instance_pk1_value => P_AUDIT_PROCEDURE_ID
2760: ,p_user_id => fnd_global.user_id);
2761: fnd_file.put_line(fnd_file.log,'%%%%%%%%%%%%%%%%%% l_has_assn_access: '||l_has_assn_access||' %%%%%%%%%%%%%%%%%%');
2762:
2763: ---03.03.2005 npanandi: do the association, only if l_has_assn_access = 'T'
2764: if(l_has_assn_access = 'T') then
2765: BEGIN

Line 3177: fnd_file.put_line(fnd_file.log,'check_function: start');

3173: close c_get_user_name;
3174:
3175: l_security_switch := NVL(fnd_profile.VALUE ('AMW_DATA_SECURITY_SWITCH'), 'N');
3176:
3177: fnd_file.put_line(fnd_file.log,'check_function: start');
3178: if(l_security_switch = 'Y') then ---check for Upd prvlg only if Security mode is set on
3179: l_has_access := fnd_data_security.check_function(
3180: p_api_version => 1
3181: ,p_function => p_function

Line 3188: fnd_file.put_line(fnd_file.log,'p_function: '||p_function||', p_object_name: '||p_object_name||', p_instance_pk1_value: '||p_instance_pk1_value||', p_instance_pk2_value: '||p_instance_pk2_value);

3184: ,p_instance_pk1_value => p_instance_pk1_value
3185: ,p_instance_pk2_value => p_instance_pk2_value
3186: ,p_user_name => l_user_name);
3187: end if;
3188: fnd_file.put_line(fnd_file.log,'p_function: '||p_function||', p_object_name: '||p_object_name||', p_instance_pk1_value: '||p_instance_pk1_value||', p_instance_pk2_value: '||p_instance_pk2_value);
3189: fnd_file.put_line(fnd_file.log,'check_function: end');
3190: return l_has_access;
3191: end;
3192: ---03.03.2005 npanandi: end function to check access privilege

Line 3189: fnd_file.put_line(fnd_file.log,'check_function: end');

3185: ,p_instance_pk2_value => p_instance_pk2_value
3186: ,p_user_name => l_user_name);
3187: end if;
3188: fnd_file.put_line(fnd_file.log,'p_function: '||p_function||', p_object_name: '||p_object_name||', p_instance_pk1_value: '||p_instance_pk1_value||', p_instance_pk2_value: '||p_instance_pk2_value);
3189: fnd_file.put_line(fnd_file.log,'check_function: end');
3190: return l_has_access;
3191: end;
3192: ---03.03.2005 npanandi: end function to check access privilege
3193: