DBA Data[Home] [Help]

APPS.AMW_LOAD_RC_DATA dependencies on FND_FILE

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

404: l_has_risk_ctrl_assn_access varchar2(15) := 'T'; --defaulting to 'T', which means 'has access'
405: l_has_proc_obj_assoc_access varchar2(15) := 'T'; --defaulting to 'T', which means 'has access'
406: l_has_proc_risk_assoc_access varchar2(15) := 'T'; --defaulting to 'T', which means 'has access'
407: BEGIN
408: fnd_file.put_line (fnd_file.LOG, 'resp id: '||fnd_global.RESP_ID);
409: fnd_file.put_line (fnd_file.LOG, 'resp appl id: '||fnd_global.RESP_APPL_ID);
410:
411: --
412: -- check access privilege

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

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

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

518: l_new_risk := true; ---setting this to TRUE to avoid conflict with previous loop value
519: if(lx_risk_id is not null) then
520: ---Check for Update privilege here
521: l_new_risk := false;
522: fnd_file.put_line (fnd_file.LOG, '************** Checking Update Privilege for rc_rec.risk_name: '||rc_rec.risk_name);
523: l_has_risk_access := check_function(
524: p_function => 'AMW_RISK_UPDATE_PRVLG'
525: ,p_object_name => 'AMW_RISK'
526: ,p_instance_pk1_value => lx_risk_id

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

524: p_function => 'AMW_RISK_UPDATE_PRVLG'
525: ,p_object_name => 'AMW_RISK'
526: ,p_instance_pk1_value => lx_risk_id
527: ,p_user_id => fnd_global.user_id);
528: fnd_file.put_line (fnd_file.LOG, 'l_has_risk_access: '||l_has_risk_access);
529: fnd_file.put_line (fnd_file.LOG, '************** Checked Update Privilege for rc_rec.risk_name: '||rc_rec.risk_name);
530:
531: IF l_has_risk_access <> 'T' then
532: v_err_msg := 'Cannot update this Risk';

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

525: ,p_object_name => 'AMW_RISK'
526: ,p_instance_pk1_value => lx_risk_id
527: ,p_user_id => fnd_global.user_id);
528: fnd_file.put_line (fnd_file.LOG, 'l_has_risk_access: '||l_has_risk_access);
529: fnd_file.put_line (fnd_file.LOG, '************** Checked Update Privilege for rc_rec.risk_name: '||rc_rec.risk_name);
530:
531: IF l_has_risk_access <> 'T' then
532: v_err_msg := 'Cannot update this Risk';
533: update_interface_with_error (v_err_msg

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

539:
540:
541: L_PROCESS_ID := null;
542:
543: FND_FILE.PUT_LINE(FND_FILE.LOG, 'GETTING PROCESS_ID');
544: --npanandi 12.09.2004: check to get processId
545: --only if processCode and processName are not both
546: --uniformly NULL
547: if(not (rc_rec.process_code is null and rc_rec.process_name is null))then

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

546: --uniformly NULL
547: if(not (rc_rec.process_code is null and rc_rec.process_name is null))then
548: --executing these if blocks as before
549: if(rc_rec.process_code is null)then
550: FND_FILE.PUT_LINE(FND_FILE.LOG, 'v_interface_id: '||v_interface_id||', process_code is null --> display_name: '||rc_rec.process_name);
551: select process_id into l_process_id
552: from amw_latest_revisions_v
553: where display_name=rc_rec.process_name;
554: else

Line 555: 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);

551: select process_id into l_process_id
552: from amw_latest_revisions_v
553: where display_name=rc_rec.process_name;
554: else
555: 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);
556: select process_id into l_process_id
557: from amw_latest_revisions_v
558: where display_name=rc_rec.process_name
559: and process_code=rc_rec.process_code;

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

558: where display_name=rc_rec.process_name
559: and process_code=rc_rec.process_code;
560: end if;
561: end if; --end of npanandi check 12.09.2004
562: FND_FILE.PUT_LINE(FND_FILE.LOG, 'GOT PROCESS_ID: '||l_process_id);
563:
564: IF((L_PROCESS_ID IS NOT NULL) AND (L_PROCESS_ID <> -1)) THEN
565: FND_FILE.PUT_LINE(FND_FILE.LOG, '>>>>>>> Revising ProcessId: '||L_PROCESS_ID);
566: AMW_RL_HIERARCHY_PKG.revise_process_if_necessary(

Line 565: FND_FILE.PUT_LINE(FND_FILE.LOG, '>>>>>>> Revising ProcessId: '||L_PROCESS_ID);

561: end if; --end of npanandi check 12.09.2004
562: FND_FILE.PUT_LINE(FND_FILE.LOG, 'GOT PROCESS_ID: '||l_process_id);
563:
564: IF((L_PROCESS_ID IS NOT NULL) AND (L_PROCESS_ID <> -1)) THEN
565: FND_FILE.PUT_LINE(FND_FILE.LOG, '>>>>>>> Revising ProcessId: '||L_PROCESS_ID);
566: AMW_RL_HIERARCHY_PKG.revise_process_if_necessary(
567: P_PROCESS_ID => L_PROCESS_ID
568: );
569: END IF;

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

616: ,p_user_id => FND_GLOBAL.USER_ID);
617: end if;
618: ---02.28.2005 npanandi: if new Control, grant CtrlOwner prvlg
619:
620: fnd_file.put_line (fnd_file.LOG,'lx_return_status: '||lx_return_status);
621: fnd_file.put_line (fnd_file.LOG,'lx_risk_rev_id: '||lx_risk_rev_id);
622: fnd_file.put_line (fnd_file.LOG,'lx_risk_id: '||lx_risk_id);
623:
624: IF lx_return_status <> FND_API.G_RET_STS_SUCCESS then

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

617: end if;
618: ---02.28.2005 npanandi: if new Control, grant CtrlOwner prvlg
619:
620: fnd_file.put_line (fnd_file.LOG,'lx_return_status: '||lx_return_status);
621: fnd_file.put_line (fnd_file.LOG,'lx_risk_rev_id: '||lx_risk_rev_id);
622: fnd_file.put_line (fnd_file.LOG,'lx_risk_id: '||lx_risk_id);
623:
624: IF lx_return_status <> FND_API.G_RET_STS_SUCCESS then
625: v_err_msg := ' ';

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

618: ---02.28.2005 npanandi: if new Control, grant CtrlOwner prvlg
619:
620: fnd_file.put_line (fnd_file.LOG,'lx_return_status: '||lx_return_status);
621: fnd_file.put_line (fnd_file.LOG,'lx_risk_rev_id: '||lx_risk_rev_id);
622: fnd_file.put_line (fnd_file.LOG,'lx_risk_id: '||lx_risk_id);
623:
624: IF lx_return_status <> FND_API.G_RET_STS_SUCCESS then
625: v_err_msg := ' ';
626: FOR x IN 1..lx_msg_count LOOP

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

806: l_new_control := true; ---setting this to TRUE to avoid conflict with previous loop value
807: if(lx_control_id is not null) then
808: ---Check for Update privilege here
809: l_new_control := false;
810: fnd_file.put_line (fnd_file.LOG, '************** Checking Update Privilege for rc_rec.control_name: '||rc_rec.control_name);
811: l_has_ctrl_access := check_function(
812: p_function => 'AMW_CTRL_UPDATE_PRVLG'
813: ,p_object_name => 'AMW_CONTROL'
814: ,p_instance_pk1_value => lx_control_id

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

812: p_function => 'AMW_CTRL_UPDATE_PRVLG'
813: ,p_object_name => 'AMW_CONTROL'
814: ,p_instance_pk1_value => lx_control_id
815: ,p_user_id => fnd_global.user_id);
816: fnd_file.put_line (fnd_file.LOG, 'l_has_ctrl_access: '||l_has_ctrl_access);
817: fnd_file.put_line (fnd_file.LOG, '************** Checked Update Privilege for rc_rec.control_name: '||rc_rec.control_name);
818:
819: IF l_has_ctrl_access <> 'T' then
820: v_err_msg := 'Cannot update this Ctrl';

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

813: ,p_object_name => 'AMW_CONTROL'
814: ,p_instance_pk1_value => lx_control_id
815: ,p_user_id => fnd_global.user_id);
816: fnd_file.put_line (fnd_file.LOG, 'l_has_ctrl_access: '||l_has_ctrl_access);
817: fnd_file.put_line (fnd_file.LOG, '************** Checked Update Privilege for rc_rec.control_name: '||rc_rec.control_name);
818:
819: IF l_has_ctrl_access <> 'T' then
820: v_err_msg := 'Cannot update this Ctrl';
821: update_interface_with_error (v_err_msg

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

887: ,p_user_id => FND_GLOBAL.USER_ID);
888: end if;
889: ---03.01.2005 npanandi: if new Control, grant CtrlOwner prvlg
890:
891: fnd_file.put_line (fnd_file.LOG,'lx_return_status: '||lx_return_status);
892: fnd_file.put_line (fnd_file.LOG,'lx_risk_rev_id: '||lx_risk_rev_id);
893: fnd_file.put_line (fnd_file.LOG,'vx_control_rev_id: '||vx_control_rev_id);
894:
895: IF lx_return_status <> FND_API.G_RET_STS_SUCCESS then

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

888: end if;
889: ---03.01.2005 npanandi: if new Control, grant CtrlOwner prvlg
890:
891: fnd_file.put_line (fnd_file.LOG,'lx_return_status: '||lx_return_status);
892: fnd_file.put_line (fnd_file.LOG,'lx_risk_rev_id: '||lx_risk_rev_id);
893: fnd_file.put_line (fnd_file.LOG,'vx_control_rev_id: '||vx_control_rev_id);
894:
895: IF lx_return_status <> FND_API.G_RET_STS_SUCCESS then
896: v_err_msg := ' ';

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

889: ---03.01.2005 npanandi: if new Control, grant CtrlOwner prvlg
890:
891: fnd_file.put_line (fnd_file.LOG,'lx_return_status: '||lx_return_status);
892: fnd_file.put_line (fnd_file.LOG,'lx_risk_rev_id: '||lx_risk_rev_id);
893: fnd_file.put_line (fnd_file.LOG,'vx_control_rev_id: '||vx_control_rev_id);
894:
895: IF lx_return_status <> FND_API.G_RET_STS_SUCCESS then
896: v_err_msg := ' ';
897: FOR x IN 1..lx_msg_count LOOP

Line 1023: fnd_file.PUT_LINE(fnd_file.log, 'L_PROCESS_ID: '||L_PROCESS_ID||', LX_RISK_ID: '||LX_RISK_ID);

1019: --SET THESE 2 VARIABLES TO NULL FOR THIS LOOP
1020: L_CONTROL_ASSOCIATION_ID := NULL;
1021: L_APPROVAL_DATE := NULL;
1022: --CHECK FOR EXISTING LATEST_REVISION OF THIS ASSOCIATION, IF ANY
1023: fnd_file.PUT_LINE(fnd_file.log, 'L_PROCESS_ID: '||L_PROCESS_ID||', LX_RISK_ID: '||LX_RISK_ID);
1024: BEGIN
1025: SELECT CONTROL_ASSOCIATION_ID,APPROVAL_DATE
1026: INTO L_CONTROL_ASSOCIATION_ID,L_APPROVAL_DATE
1027: FROM AMW_CONTROL_ASSOCIATIONS

Line 1047: fnd_file.put_line(fnd_file.log,'%%%%%%%%%%%%%%%%%% l_has_risk_ctrl_assn_access: '||l_has_risk_ctrl_assn_access||' %%%%%%%%%%%%%%%%%%');

1043: p_function => 'AMW_UPD_RL_PROC_RISK_CTRL_ASSN'
1044: ,p_object_name => 'AMW_PROCESS_APPR_ETTY'
1045: ,p_instance_pk1_value => l_PROCESS_ID
1046: ,p_user_id => fnd_global.user_id);
1047: fnd_file.put_line(fnd_file.log,'%%%%%%%%%%%%%%%%%% l_has_risk_ctrl_assn_access: '||l_has_risk_ctrl_assn_access||' %%%%%%%%%%%%%%%%%%');
1048:
1049: IF(L_CONTROL_ASSOCIATION_ID IS NULL and l_has_risk_ctrl_assn_access = 'T') THEN
1050: --NO ROW RETRIEVED, SO ASSOCIATION DOESN'T EXIST YET
1051: --CREATE AN ASSOCIATION

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

1101: update_interface_with_error (v_err_msg
1102: ,v_table_name
1103: ,v_interface_id);
1104: else
1105: fnd_file.put_line (fnd_file.LOG,'%%%%%% Processing AP_Association data');
1106: fnd_file.PUT_LINE(fnd_file.log, 'CREATING AP_ASSOCIATIONS HERE');
1107: --SET THESE 2 VARS TO NULL FOR PROCESSING THIS LOOP
1108: L_AP_ASSOCIATION_ID := NULL;
1109: L_AP_APPROVAL_DATE := NULL;

Line 1106: fnd_file.PUT_LINE(fnd_file.log, 'CREATING AP_ASSOCIATIONS HERE');

1102: ,v_table_name
1103: ,v_interface_id);
1104: else
1105: fnd_file.put_line (fnd_file.LOG,'%%%%%% Processing AP_Association data');
1106: fnd_file.PUT_LINE(fnd_file.log, 'CREATING AP_ASSOCIATIONS HERE');
1107: --SET THESE 2 VARS TO NULL FOR PROCESSING THIS LOOP
1108: L_AP_ASSOCIATION_ID := NULL;
1109: L_AP_APPROVAL_DATE := NULL;
1110: --NPANANDI 10/26/2004: CHANGED THE ABOVE SELECT CHECK

Line 1125: fnd_file.PUT_LINE(fnd_file.log, 'L_AP_ASSOCIATION_ID: '||L_AP_ASSOCIATION_ID||', L_AP_APPROVAL_DATE: '||L_AP_APPROVAL_DATE);

1121: WHEN OTHERS THEN
1122: NULL; --DO NOTHING
1123: END;
1124:
1125: fnd_file.PUT_LINE(fnd_file.log, 'L_AP_ASSOCIATION_ID: '||L_AP_ASSOCIATION_ID||', L_AP_APPROVAL_DATE: '||L_AP_APPROVAL_DATE);
1126: L_ASSOC_AP_TO_CTRL := FALSE;
1127: IF((((l_revise_control_flag ='Y' OR v_control_db_approval_status is null)
1128: AND l_control_approval_status_code = 'A')
1129: OR (l_revise_control_flag='N' and v_control_db_approval_status='A'))) THEN

Line 1140: fnd_file.put_line(fnd_file.log,'%%%%%%%%%%%%%%%%%% l_has_ap_access: '||l_has_ap_access||' %%%%%%%%%%%%%%%%%%');

1136: p_function => 'AMW_UPDATE_AP_DETAILS'
1137: ,p_object_name => 'AMW_AUDIT_PROCEDURE'
1138: ,p_instance_pk1_value => RC_REC.AP_NAME
1139: ,p_user_id => fnd_global.user_id);
1140: fnd_file.put_line(fnd_file.log,'%%%%%%%%%%%%%%%%%% l_has_ap_access: '||l_has_ap_access||' %%%%%%%%%%%%%%%%%%');
1141:
1142: IF(L_ASSOC_AP_TO_CTRL and l_has_ap_access = 'T') THEN --putting this check, because Ctrl
1143: --to AP association is only for Approved Ctrls
1144:

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

1141:
1142: IF(L_ASSOC_AP_TO_CTRL and l_has_ap_access = 'T') THEN --putting this check, because Ctrl
1143: --to AP association is only for Approved Ctrls
1144:
1145: fnd_file.put_line (fnd_file.LOG,'l_object_type_count --> '||l_object_type_count);
1146: ---IF l_object_type_count = 0 THEN
1147: IF( L_AP_ASSOCIATION_ID IS NULL) THEN
1148: --for associating between Controls , take due cognizance of the
1149: --revise flags the following gory logic!

Line 1150: fnd_file.PUT_LINE(fnd_file.log, 'L_ASSOC_AP_TO_CTRL: MUST BE TRUE, HENCE I AM HERE');

1146: ---IF l_object_type_count = 0 THEN
1147: IF( L_AP_ASSOCIATION_ID IS NULL) THEN
1148: --for associating between Controls , take due cognizance of the
1149: --revise flags the following gory logic!
1150: fnd_file.PUT_LINE(fnd_file.log, 'L_ASSOC_AP_TO_CTRL: MUST BE TRUE, HENCE I AM HERE');
1151: fnd_file.put_line (fnd_file.LOG,'~~~~~~~~~~~~~~~~~~~AP_Association processable, values to be entered: ');
1152: fnd_file.put_line (fnd_file.LOG,'pk1: '||lx_control_id);
1153: fnd_file.put_line (fnd_file.LOG,'audit_procedure_id: '||rc_rec.ap_name);
1154:

Line 1151: fnd_file.put_line (fnd_file.LOG,'~~~~~~~~~~~~~~~~~~~AP_Association processable, values to be entered: ');

1147: IF( L_AP_ASSOCIATION_ID IS NULL) THEN
1148: --for associating between Controls , take due cognizance of the
1149: --revise flags the following gory logic!
1150: fnd_file.PUT_LINE(fnd_file.log, 'L_ASSOC_AP_TO_CTRL: MUST BE TRUE, HENCE I AM HERE');
1151: fnd_file.put_line (fnd_file.LOG,'~~~~~~~~~~~~~~~~~~~AP_Association processable, values to be entered: ');
1152: fnd_file.put_line (fnd_file.LOG,'pk1: '||lx_control_id);
1153: fnd_file.put_line (fnd_file.LOG,'audit_procedure_id: '||rc_rec.ap_name);
1154:
1155: --NPANANDI 12/09/2004:

Line 1152: fnd_file.put_line (fnd_file.LOG,'pk1: '||lx_control_id);

1148: --for associating between Controls , take due cognizance of the
1149: --revise flags the following gory logic!
1150: fnd_file.PUT_LINE(fnd_file.log, 'L_ASSOC_AP_TO_CTRL: MUST BE TRUE, HENCE I AM HERE');
1151: fnd_file.put_line (fnd_file.LOG,'~~~~~~~~~~~~~~~~~~~AP_Association processable, values to be entered: ');
1152: fnd_file.put_line (fnd_file.LOG,'pk1: '||lx_control_id);
1153: fnd_file.put_line (fnd_file.LOG,'audit_procedure_id: '||rc_rec.ap_name);
1154:
1155: --NPANANDI 12/09/2004:
1156: --WHEN CTRL TO AP ASSOCIATION IS BEING DONE, POST AMW.D

Line 1153: fnd_file.put_line (fnd_file.LOG,'audit_procedure_id: '||rc_rec.ap_name);

1149: --revise flags the following gory logic!
1150: fnd_file.PUT_LINE(fnd_file.log, 'L_ASSOC_AP_TO_CTRL: MUST BE TRUE, HENCE I AM HERE');
1151: fnd_file.put_line (fnd_file.LOG,'~~~~~~~~~~~~~~~~~~~AP_Association processable, values to be entered: ');
1152: fnd_file.put_line (fnd_file.LOG,'pk1: '||lx_control_id);
1153: fnd_file.put_line (fnd_file.LOG,'audit_procedure_id: '||rc_rec.ap_name);
1154:
1155: --NPANANDI 12/09/2004:
1156: --WHEN CTRL TO AP ASSOCIATION IS BEING DONE, POST AMW.D
1157: --AP NEEDS TO BE REVISED

Line 1159: fnd_file.PUT_LINE(fnd_file.log, 'CREATE_AMW_AP_ASSOC START');

1155: --NPANANDI 12/09/2004:
1156: --WHEN CTRL TO AP ASSOCIATION IS BEING DONE, POST AMW.D
1157: --AP NEEDS TO BE REVISED
1158: --THIS IS HANDLED IN CREATE_AMW_AP_ASSOC
1159: fnd_file.PUT_LINE(fnd_file.log, 'CREATE_AMW_AP_ASSOC START');
1160: LX_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
1161: LX_MSG_COUNT := 0;
1162: LX_MSG_DATA := NULL;
1163: CREATE_AMW_AP_ASSOC(

Line 1185: fnd_file.PUT_LINE(fnd_file.log, 'CREATE_AMW_AP_ASSOC END');

1181: update_interface_with_error (v_err_msg
1182: ,'AMW_AP_ASSOCIATIONS'
1183: ,v_interface_id);
1184: END IF;
1185: fnd_file.PUT_LINE(fnd_file.log, 'CREATE_AMW_AP_ASSOC END');
1186: ELSE
1187: --THIS MEANS THAT ASSOCIATION EXISTS, SO CHECK APPROVAL_DATE
1188:
1189: --IF APPROVAL_DATE IS NULL FOR CONTROL_ASSOCIATIONS,

Line 1195: fnd_file.PUT_LINE(fnd_file.log, 'UPSERTING AP 2 CTRL ASSOCIATION');

1191: --IS LATEST_REVISION, SO SIMPLY UPDATE ASSOC ATTRIBUTES
1192: IF(L_AP_APPROVAL_DATE IS NOT NULL) THEN
1193: --THIS MEANS THAT THIS IS LATEST REVISION FOR THIS ASSOCIATION
1194: --AND IS APPROVED, SO
1195: fnd_file.PUT_LINE(fnd_file.log, 'UPSERTING AP 2 CTRL ASSOCIATION');
1196: BEGIN
1197: UPDATE AMW_AP_ASSOCIATIONS
1198: SET DELETION_DATE=SYSDATE
1199: ,OBJECT_VERSION_NUMBER=OBJECT_VERSION_NUMBER+1

Line 1237: fnd_file.PUT_LINE(fnd_file.log, 'UPDATING AP 2 CTRL ASSOCIATION --> L_AP_ASSOCIATION_ID: '||L_AP_ASSOCIATION_ID);

1233: ELSE
1234: --THIS MEANS THAT AP 2 CTRL ASSOCIATION IS LATEST REVISION
1235: -- YET APPROVED, SO
1236: --SIMPLY UPDATE THE ASSOCIATION ATTRIBUTES HERE
1237: fnd_file.PUT_LINE(fnd_file.log, 'UPDATING AP 2 CTRL ASSOCIATION --> L_AP_ASSOCIATION_ID: '||L_AP_ASSOCIATION_ID);
1238: --IF(L_ASSOC_AP_TO_CTRL) THEN
1239: BEGIN
1240: UPDATE AMW_AP_ASSOCIATIONS
1241: SET DESIGN_EFFECTIVENESS=rc_rec.design_effectiveness

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

1270:
1271: ---if(not ((rc_rec.process_objective_name is null) or (trim(rc_rec.process_objective_name) = ' ')))then
1272: ---if(not ((rc_rec.process_objective_name is null) or (trim(rc_rec.process_objective_name) = '')))then
1273: if(l_process_obj_column = true)then
1274: fnd_file.put_line(fnd_file.LOG,'########## Before Going to Create_Process_Objectives');
1275: fnd_file.put_line(fnd_file.LOG,'vx_process_objective_id: '||vx_process_objective_id);
1276: create_process_objectives(p_process_objective_name => rc_rec.process_objective_name,
1277: p_process_obj_description => rc_rec.process_obj_description,
1278: p_requestor_id => l_requestor_id,

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

1271: ---if(not ((rc_rec.process_objective_name is null) or (trim(rc_rec.process_objective_name) = ' ')))then
1272: ---if(not ((rc_rec.process_objective_name is null) or (trim(rc_rec.process_objective_name) = '')))then
1273: if(l_process_obj_column = true)then
1274: fnd_file.put_line(fnd_file.LOG,'########## Before Going to Create_Process_Objectives');
1275: fnd_file.put_line(fnd_file.LOG,'vx_process_objective_id: '||vx_process_objective_id);
1276: create_process_objectives(p_process_objective_name => rc_rec.process_objective_name,
1277: p_process_obj_description => rc_rec.process_obj_description,
1278: p_requestor_id => l_requestor_id,
1279: x_return_status => lx_return_status);

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

1277: p_process_obj_description => rc_rec.process_obj_description,
1278: p_requestor_id => l_requestor_id,
1279: x_return_status => lx_return_status);
1280:
1281: fnd_file.put_line(fnd_file.LOG,'########## After Going to Create_Process_Objectives');
1282: fnd_file.put_line(fnd_file.LOG,'vx_process_objective_id: '||vx_process_objective_id);
1283:
1284: IF lx_return_status <> FND_API.G_RET_STS_SUCCESS then
1285: v_err_msg := ' ';

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

1278: p_requestor_id => l_requestor_id,
1279: x_return_status => lx_return_status);
1280:
1281: fnd_file.put_line(fnd_file.LOG,'########## After Going to Create_Process_Objectives');
1282: fnd_file.put_line(fnd_file.LOG,'vx_process_objective_id: '||vx_process_objective_id);
1283:
1284: IF lx_return_status <> FND_API.G_RET_STS_SUCCESS then
1285: v_err_msg := ' ';
1286: FOR x IN 1..lx_msg_count LOOP

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

1299: -- create the process objective associations
1300: --
1301: l_process_objective_id := vx_process_objective_id;
1302:
1303: ---fnd_file.put_line (fnd_file.LOG, 'v_error_found: '||v_error_found);
1304: fnd_file.put_line (fnd_file.LOG, 'rc_rec.process_objective_name: '||rc_rec.process_objective_name);
1305: fnd_file.put_line (fnd_file.LOG, 'l_process_id: '||l_process_id);
1306: fnd_file.put_line (fnd_file.LOG, 'l_process_objective_id: '||l_process_objective_id);
1307:

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

1300: --
1301: l_process_objective_id := vx_process_objective_id;
1302:
1303: ---fnd_file.put_line (fnd_file.LOG, 'v_error_found: '||v_error_found);
1304: fnd_file.put_line (fnd_file.LOG, 'rc_rec.process_objective_name: '||rc_rec.process_objective_name);
1305: fnd_file.put_line (fnd_file.LOG, 'l_process_id: '||l_process_id);
1306: fnd_file.put_line (fnd_file.LOG, 'l_process_objective_id: '||l_process_objective_id);
1307:
1308: IF((not v_error_found) AND

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

1301: l_process_objective_id := vx_process_objective_id;
1302:
1303: ---fnd_file.put_line (fnd_file.LOG, 'v_error_found: '||v_error_found);
1304: fnd_file.put_line (fnd_file.LOG, 'rc_rec.process_objective_name: '||rc_rec.process_objective_name);
1305: fnd_file.put_line (fnd_file.LOG, 'l_process_id: '||l_process_id);
1306: fnd_file.put_line (fnd_file.LOG, 'l_process_objective_id: '||l_process_objective_id);
1307:
1308: IF((not v_error_found) AND
1309: (l_process_obj_column = TRUE) AND

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

1302:
1303: ---fnd_file.put_line (fnd_file.LOG, 'v_error_found: '||v_error_found);
1304: fnd_file.put_line (fnd_file.LOG, 'rc_rec.process_objective_name: '||rc_rec.process_objective_name);
1305: fnd_file.put_line (fnd_file.LOG, 'l_process_id: '||l_process_id);
1306: fnd_file.put_line (fnd_file.LOG, 'l_process_objective_id: '||l_process_objective_id);
1307:
1308: IF((not v_error_found) AND
1309: (l_process_obj_column = TRUE) AND
1310: (l_process_id is not null) AND

Line 1342: fnd_file.put_line(fnd_file.log,'%%%%%%%%%%%%%%%%%%% l_has_proc_obj_assoc_access: '||l_has_proc_obj_assoc_access||' %%%%%%%%%%%%%%%%%%%');

1338: p_function => 'AMW_UPD_RL_PROC_OBJ_ASSOC'
1339: ,p_object_name => 'AMW_PROCESS_APPR_ETTY'
1340: ,p_instance_pk1_value => l_process_id
1341: ,p_user_id => fnd_global.user_id);
1342: fnd_file.put_line(fnd_file.log,'%%%%%%%%%%%%%%%%%%% l_has_proc_obj_assoc_access: '||l_has_proc_obj_assoc_access||' %%%%%%%%%%%%%%%%%%%');
1343:
1344: fnd_file.put_line (fnd_file.LOG, 'inside if for process: l_process_objective_id '||l_process_objective_id);
1345: fnd_file.put_line (fnd_file.LOG, 'inside if for risk: l_process_objectives_count '||l_process_objectives_count);
1346: IF (L_PROC_OBJ_ASSOCIATION_ID IS NULL and l_has_proc_obj_assoc_access = 'T') THEN

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

1340: ,p_instance_pk1_value => l_process_id
1341: ,p_user_id => fnd_global.user_id);
1342: fnd_file.put_line(fnd_file.log,'%%%%%%%%%%%%%%%%%%% l_has_proc_obj_assoc_access: '||l_has_proc_obj_assoc_access||' %%%%%%%%%%%%%%%%%%%');
1343:
1344: fnd_file.put_line (fnd_file.LOG, 'inside if for process: l_process_objective_id '||l_process_objective_id);
1345: fnd_file.put_line (fnd_file.LOG, 'inside if for risk: l_process_objectives_count '||l_process_objectives_count);
1346: IF (L_PROC_OBJ_ASSOCIATION_ID IS NULL and l_has_proc_obj_assoc_access = 'T') THEN
1347: --NO ROW RETRIEVED, SO ASSOCIATION DOESN'T EXIST YET
1348: --CREATE AN ASSOCIATION, SET ASSOCIATION_CREATION_DATE=SYSDATE

Line 1345: fnd_file.put_line (fnd_file.LOG, 'inside if for risk: l_process_objectives_count '||l_process_objectives_count);

1341: ,p_user_id => fnd_global.user_id);
1342: fnd_file.put_line(fnd_file.log,'%%%%%%%%%%%%%%%%%%% l_has_proc_obj_assoc_access: '||l_has_proc_obj_assoc_access||' %%%%%%%%%%%%%%%%%%%');
1343:
1344: fnd_file.put_line (fnd_file.LOG, 'inside if for process: l_process_objective_id '||l_process_objective_id);
1345: fnd_file.put_line (fnd_file.LOG, 'inside if for risk: l_process_objectives_count '||l_process_objectives_count);
1346: IF (L_PROC_OBJ_ASSOCIATION_ID IS NULL and l_has_proc_obj_assoc_access = 'T') THEN
1347: --NO ROW RETRIEVED, SO ASSOCIATION DOESN'T EXIST YET
1348: --CREATE AN ASSOCIATION, SET ASSOCIATION_CREATION_DATE=SYSDATE
1349: FND_FILE.PUT_LINE(FND_FILE.LOG,'Need to change the way data is inserted in amw_risk_associations');

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

1345: fnd_file.put_line (fnd_file.LOG, 'inside if for risk: l_process_objectives_count '||l_process_objectives_count);
1346: IF (L_PROC_OBJ_ASSOCIATION_ID IS NULL and l_has_proc_obj_assoc_access = 'T') THEN
1347: --NO ROW RETRIEVED, SO ASSOCIATION DOESN'T EXIST YET
1348: --CREATE AN ASSOCIATION, SET ASSOCIATION_CREATION_DATE=SYSDATE
1349: FND_FILE.PUT_LINE(FND_FILE.LOG,'Need to change the way data is inserted in amw_risk_associations');
1350: CREATE_AMW_OBJ_ASSOC(
1351: P_PROCESS_OBJECTIVE_ID => l_process_objective_id
1352: ,P_PK1 => l_process_id
1353: ,P_OBJECT_TYPE => 'PROCESS'

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

1360: --IS LATEST_REVISION, SO SIMPLY UPDATE ASSOC ATTRIBUTES
1361: IF(L_PROC_OBJ_APPROVAL_DATE IS NOT NULL and l_has_proc_obj_assoc_access = 'T') THEN
1362: --THIS MEANS THAT THIS IS LATEST REVISION FOR THIS ASSOCIATION
1363: --AND IS APPROVED, SO
1364: FND_FILE.PUT_LINE(FND_FILE.LOG,'UPDATE THIS ASSOCIATION, THEN INSERT');
1365: BEGIN
1366: UPDATE AMW_OBJECTIVE_ASSOCIATIONS
1367: SET DELETION_DATE=SYSDATE
1368: ,OBJECT_VERSION_NUMBER=OBJECT_VERSION_NUMBER+1

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

1388:
1389: --
1390: -- create the risk objective associations
1391: --
1392: fnd_file.put_line (fnd_file.LOG, 'rc_rec.process_objective_name: '||rc_rec.process_objective_name);
1393: fnd_file.put_line (fnd_file.LOG, 'l_process_objective_id: '||l_process_objective_id);
1394:
1395: IF((not v_error_found) AND
1396: (l_process_obj_column = TRUE) AND

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

1389: --
1390: -- create the risk objective associations
1391: --
1392: fnd_file.put_line (fnd_file.LOG, 'rc_rec.process_objective_name: '||rc_rec.process_objective_name);
1393: fnd_file.put_line (fnd_file.LOG, 'l_process_objective_id: '||l_process_objective_id);
1394:
1395: IF((not v_error_found) AND
1396: (l_process_obj_column = TRUE) AND
1397: (l_process_objective_id is not null)) then

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

1415: ---IF l_risk_objectives_count = 0 THEN
1416: IF(L_RISK_OBJ_ASSOCIATION_ID IS NULL) THEN
1417: --NO ROW RETRIEVED, SO ASSOCIATION DOESN'T EXIST YET
1418: --CREATE AN ASSOCIATION, SET ASSOCIATION_CREATION_DATE=SYSDATE
1419: FND_FILE.PUT_LINE(FND_FILE.LOG,'Need to change the way data is inserted in amw_risk_associations');
1420: CREATE_AMW_OBJ_ASSOC(
1421: P_PROCESS_OBJECTIVE_ID => l_process_objective_id
1422: ,P_PK1 => lx_risk_id
1423: ,P_OBJECT_TYPE => 'RISK'

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

1421: P_PROCESS_OBJECTIVE_ID => l_process_objective_id
1422: ,P_PK1 => lx_risk_id
1423: ,P_OBJECT_TYPE => 'RISK'
1424: );
1425: fnd_file.put_line (fnd_file.LOG, 'inserting lx_risk_id: '||lx_risk_id||' l_process_objective_id '||l_process_objective_id);
1426: ELSE
1427: --THIS MEANS THAT ASSOCIATION EXISTS, SO CHECK APPROVAL_DATE
1428:
1429: --IF APPROVAL_DATE IS NULL FOR OBJECTIVE_ASSOCIATIONS,

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

1431: --IS LATEST_REVISION, SO SIMPLY UPDATE ASSOC ATTRIBUTES
1432: IF(L_RISK_OBJ_APPROVAL_DATE IS NOT NULL) THEN
1433: --THIS MEANS THAT THIS IS LATEST REVISION FOR THIS ASSOCIATION
1434: --AND IS APPROVED, SO
1435: FND_FILE.PUT_LINE(FND_FILE.LOG,'UPDATE THIS ASSOCIATION, THEN INSERT');
1436: BEGIN
1437: UPDATE AMW_OBJECTIVE_ASSOCIATIONS
1438: SET DELETION_DATE=SYSDATE
1439: ,OBJECT_VERSION_NUMBER=OBJECT_VERSION_NUMBER+1

Line 1508: fnd_file.put_line (fnd_file.LOG, 'inserting lx_CONTROL_id: '||lx_CONTROL_id||' l_process_objective_id '||l_process_objective_id);

1504: ,P_PK2 => LX_RISK_ID
1505: ,P_PK3 => LX_CONTROL_ID
1506: ,P_OBJECT_TYPE => 'CONTROL'
1507: );
1508: fnd_file.put_line (fnd_file.LOG, 'inserting lx_CONTROL_id: '||lx_CONTROL_id||' l_process_objective_id '||l_process_objective_id);
1509: ELSE
1510: --THIS MEANS THAT ASSOCIATION EXISTS, SO CHECK APPROVAL_DATE
1511:
1512: --IF APPROVAL_DATE IS NULL FOR OBJECTIVE_ASSOCIATIONS,

Line 1605: fnd_file.put_line(fnd_file.log,'%%%%%%%%%%%%%%% l_has_proc_risk_assoc_access: '||l_has_proc_risk_assoc_access||' %%%%%%%%%%%%%%%');

1601: p_function => 'AMW_UPD_RL_PROC_RISK_ASSOC'
1602: ,p_object_name => 'AMW_PROCESS_APPR_ETTY'
1603: ,p_instance_pk1_value => L_PROCESS_ID
1604: ,p_user_id => fnd_global.user_id);
1605: fnd_file.put_line(fnd_file.log,'%%%%%%%%%%%%%%% l_has_proc_risk_assoc_access: '||l_has_proc_risk_assoc_access||' %%%%%%%%%%%%%%%');
1606:
1607: ---03.02.2005 npanandi: added this for access privilege
1608: ---check before inserting/update AmwRiskAssociations
1609: if(l_has_proc_risk_assoc_access = 'T') then

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

1627: --IS LATEST_REVISION, SO SIMPLY UPDATE ASSOC ATTRIBUTES
1628: IF(L_RISK_APPROVAL_DATE IS NOT NULL) THEN
1629: --THIS MEANS THAT THIS IS LATEST REVISION FOR THIS ASSOCIATION
1630: --AND IS APPROVED, SO
1631: FND_FILE.PUT_LINE(FND_FILE.LOG,'UPDATE THIS ASSOCIATION, THEN INSERT');
1632: BEGIN
1633: UPDATE AMW_RISK_ASSOCIATIONS
1634: SET DELETION_DATE=SYSDATE
1635: ,OBJECT_VERSION_NUMBER=OBJECT_VERSION_NUMBER+1

Line 1686: fnd_file.put_line (fnd_file.LOG, 'err in interface rec '||v_interface_id

1682: v_table_name := 'UNKNOWN';
1683: update_interface_with_error (v_err_msg
1684: ,v_table_name
1685: ,v_interface_id);
1686: fnd_file.put_line (fnd_file.LOG, 'err in interface rec '||v_interface_id
1687: ||': '||SUBSTR (v_err_msg, 1, 200));
1688: END;
1689: END LOOP;
1690:

Line 1712: fnd_file.put_line (fnd_file.LOG

1708: ,last_updated_by = v_user_id
1709: WHERE batch_id = p_batch_id;
1710: EXCEPTION
1711: WHEN OTHERS THEN
1712: fnd_file.put_line (fnd_file.LOG
1713: ,'err in update process flag: '||SUBSTR (SQLERRM, 1, 200));
1714: END;
1715: ELSE
1716: IF NOT v_error_found THEN

Line 1723: fnd_file.put_line (fnd_file.LOG

1719: WHERE batch_id = p_batch_id;
1720:
1721: EXCEPTION
1722: WHEN OTHERS THEN
1723: fnd_file.put_line (fnd_file.LOG
1724: ,'err in delete interface records: '||SUBSTR (SQLERRM, 1, 200));
1725: END;
1726: END IF;
1727: END IF;

Line 1733: fnd_file.put_line (fnd_file.LOG

1729:
1730: EXCEPTION
1731: /** nilesh added for invalid risk type **/
1732: WHEN e_invalid_risk_type THEN
1733: fnd_file.put_line (fnd_file.LOG
1734: , 'Invalid Risk Type.');
1735:
1736: BEGIN
1737: IF v_invalid_risk_type is null THEN

Line 1746: fnd_file.put_line (fnd_file.LOG

1742: ,interface_status = v_invalid_risk_type
1743: WHERE batch_id = p_batch_id;
1744: EXCEPTION
1745: WHEN OTHERS THEN
1746: fnd_file.put_line (fnd_file.LOG
1747: , 'unexpected exception in handling e_invalid_risk_type: '||sqlerrm);
1748: END;
1749: /** nilesh added for invalid risk type **/
1750:

Line 1752: fnd_file.put_line (fnd_file.LOG

1748: END;
1749: /** nilesh added for invalid risk type **/
1750:
1751: WHEN e_invalid_requestor_id THEN
1752: fnd_file.put_line (fnd_file.LOG
1753: , 'Invalid requestor id.');
1754:
1755: BEGIN
1756: IF v_invalid_requestor_msg is null THEN

Line 1765: fnd_file.put_line (fnd_file.LOG

1761: ,interface_status = v_invalid_requestor_msg
1762: WHERE batch_id = p_batch_id;
1763: EXCEPTION
1764: WHEN OTHERS THEN
1765: fnd_file.put_line (fnd_file.LOG
1766: , 'unexpected exception in handling e_invalid_requestor_id: '||sqlerrm);
1767: END;
1768: WHEN e_no_import_access THEN
1769: fnd_file.put_line (fnd_file.LOG

Line 1769: fnd_file.put_line (fnd_file.LOG

1765: fnd_file.put_line (fnd_file.LOG
1766: , 'unexpected exception in handling e_invalid_requestor_id: '||sqlerrm);
1767: END;
1768: WHEN e_no_import_access THEN
1769: fnd_file.put_line (fnd_file.LOG
1770: , 'no import privilege');
1771:
1772: BEGIN
1773: IF v_no_import_privilege_msg is null THEN

Line 1782: fnd_file.put_line (fnd_file.LOG

1778: ,interface_status = v_no_import_privilege_msg
1779: WHERE batch_id = p_batch_id;
1780: EXCEPTION
1781: WHEN OTHERS THEN
1782: fnd_file.put_line (fnd_file.LOG
1783: , 'unexpected exception in handling e_no_import_access: '||sqlerrm);
1784: END;
1785: WHEN others THEN
1786: rollback;

Line 1787: fnd_file.put_line (fnd_file.LOG

1783: , 'unexpected exception in handling e_no_import_access: '||sqlerrm);
1784: END;
1785: WHEN others THEN
1786: rollback;
1787: fnd_file.put_line (fnd_file.LOG
1788: , 'unexpected exception in create_risks_and_controls: '||sqlerrm);
1789: END create_risks_and_controls;
1790:
1791: --

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

1813: e_invalid_obj EXCEPTION;
1814: e_invalid_flag EXCEPTION;
1815: e_invalid_risk_type_flag exception;
1816: BEGIN
1817: fnd_file.put_line(fnd_file.log,'~~~~~~~~~~~~~~~~~~~~~~ create_process_objectives: START');
1818: fnd_file.put_line(fnd_file.log,'p_process_objective_name: '||p_process_objective_name);
1819: open c_get_objective;
1820: fetch c_get_objective into l_get_objective;
1821: close c_get_objective;

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

1814: e_invalid_flag EXCEPTION;
1815: e_invalid_risk_type_flag exception;
1816: BEGIN
1817: fnd_file.put_line(fnd_file.log,'~~~~~~~~~~~~~~~~~~~~~~ create_process_objectives: START');
1818: fnd_file.put_line(fnd_file.log,'p_process_objective_name: '||p_process_objective_name);
1819: open c_get_objective;
1820: fetch c_get_objective into l_get_objective;
1821: close c_get_objective;
1822:

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

1821: close c_get_objective;
1822:
1823: if(l_get_objective.process_objective_id is null)then
1824:
1825: fnd_file.put_line(fnd_file.log,'p_process_objective_name does not exist');
1826:
1827: OPEN c_process_objective_id;
1828: FETCH c_process_objective_id INTO l_process_objective_id;
1829: CLOSE c_process_objective_id;

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

1862: X_DESCRIPTION => p_process_obj_description
1863: );
1864:
1865: vx_process_objective_id := l_process_objective_id;
1866: fnd_file.put_line(fnd_file.log,'vx_process_objective_id: '||vx_process_objective_id);
1867: else
1868: vx_process_objective_id := l_get_objective.process_objective_id;
1869: fnd_file.put_line(fnd_file.log,'p_process_objective_name exists --> vx_process_objective_id: '||vx_process_objective_id);
1870: update AMW_PROCESS_OBJECTIVEs_TL set

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

1865: vx_process_objective_id := l_process_objective_id;
1866: fnd_file.put_line(fnd_file.log,'vx_process_objective_id: '||vx_process_objective_id);
1867: else
1868: vx_process_objective_id := l_get_objective.process_objective_id;
1869: fnd_file.put_line(fnd_file.log,'p_process_objective_name exists --> vx_process_objective_id: '||vx_process_objective_id);
1870: update AMW_PROCESS_OBJECTIVEs_TL set
1871: NAME = p_process_objective_name,
1872: DESCRIPTION = p_process_obj_description,
1873: LAST_UPDATE_DATE = sysdate,

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

1882: end if;
1883:
1884: end if;
1885:
1886: fnd_file.put_line(fnd_file.log,'~~~~~~~~~~~~~~~~~~~~~~ create_process_objectives: END');
1887:
1888: EXCEPTION
1889: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1890: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

2134: l_obj_exists number;
2135: e_invalid_obj EXCEPTION;
2136: e_invalid_flag EXCEPTION;
2137: BEGIN
2138: ---fnd_file.put_line(fnd_file.log,'control_objectives --> p_ctrl_obj_flag: '||p_ctrl_obj_flag||'p_lookup_tag: '||p_lookup_tag);
2139:
2140: IF p_ctrl_obj_flag is not null THEN
2141: IF UPPER (p_ctrl_obj_flag) = 'Y' THEN
2142: l_ctrl_obj_flag := 'Y';

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

2263: l_assert_exists number;
2264: e_invalid_assert EXCEPTION;
2265: e_invalid_flag EXCEPTION;
2266: BEGIN
2267: -----fnd_file.put_line(fnd_file.log,'control_assertions --> p_ctrl_assert_flag: '||p_ctrl_assert_flag||'p_lookup_tag: '||p_lookup_tag);
2268:
2269: IF (p_ctrl_assert_flag is not null) THEN
2270: IF UPPER (p_ctrl_assert_flag) = 'Y' THEN
2271: l_ctrl_assert_flag := 'Y';

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

2405: 'interface_id: = '
2406: || p_interface_id
2407: || ' '
2408: || SUBSTR (SQLERRM, 1, 100);
2409: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
2410: END;
2411:
2412: BEGIN
2413: UPDATE amw_risk_ctrl_interface

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

2420: || '**'
2421: ,error_flag = 'Y'
2422: WHERE risk_control_interface_id = p_interface_id;
2423:
2424: fnd_file.put_line (fnd_file.LOG, SUBSTR (l_interface_status, 1, 200));
2425: COMMIT;
2426: EXCEPTION
2427: WHEN OTHERS
2428: THEN

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

2430: 'Error during package processing '
2431: || ' interface_id: = '
2432: || p_interface_id
2433: || SUBSTR (SQLERRM, 1, 100);
2434: fnd_file.put_line (fnd_file.LOG, SUBSTR (v_err_msg, 1, 200));
2435: END;
2436:
2437: COMMIT;
2438: END update_interface_with_error;

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

2457: l_comp_exists number;
2458: e_invalid_comp EXCEPTION;
2459: e_invalid_flag EXCEPTION;
2460: BEGIN
2461: ---fnd_file.put_line(fnd_file.log,'control_objectives --> p_ctrl_obj_flag: '||p_ctrl_obj_flag||'p_lookup_tag: '||p_lookup_tag);
2462:
2463: IF p_ctrl_comp_flag is not null THEN
2464: IF UPPER (p_ctrl_comp_flag) = 'Y' THEN
2465: l_ctrl_comp_flag := 'Y';

Line 2595: fnd_file.put_line(fnd_file.log,'&&&&&&&&&&&&&&& l_has_risk_ctrl_assn_access: '||l_has_risk_ctrl_assn_access||' &&&&&&&&&&&&&&&');

2591: ,p_object_name => 'AMW_PROCESS_APPR_ETTY'
2592: ,p_instance_pk1_value => P_PROCESS_ID
2593: ,p_user_id => fnd_global.user_id);
2594:
2595: fnd_file.put_line(fnd_file.log,'&&&&&&&&&&&&&&& l_has_risk_ctrl_assn_access: '||l_has_risk_ctrl_assn_access||' &&&&&&&&&&&&&&&');
2596: --03.02.2005 npanandi: imposing the foll. IF condition to
2597: --create the association only if access privilege is present
2598: if(l_has_risk_ctrl_assn_access = 'T') then
2599: **/

Line 2655: fnd_file.put_line(fnd_file.log,'&&&&&&&&&&&&&&& l_has_ap_access: '||l_has_ap_access||' &&&&&&&&&&&&&&&');

2651: ,p_object_name => 'AMW_AUDIT_PROCEDURE'
2652: ,p_instance_pk1_value => P_AUDIT_PROCEDURE_ID
2653: ,p_user_id => fnd_global.user_id);
2654:
2655: fnd_file.put_line(fnd_file.log,'&&&&&&&&&&&&&&& l_has_ap_access: '||l_has_ap_access||' &&&&&&&&&&&&&&&');
2656: --03.01.2005 npanandi: imposing the foll. IF condition to
2657: --create the association only if access privilege is present
2658: if(l_has_ap_access = 'T') then
2659: **/

Line 2660: fnd_file.put_line(fnd_file.log,'Associating Ctrl to Audit Procedure');

2656: --03.01.2005 npanandi: imposing the foll. IF condition to
2657: --create the association only if access privilege is present
2658: if(l_has_ap_access = 'T') then
2659: **/
2660: fnd_file.put_line(fnd_file.log,'Associating Ctrl to Audit Procedure');
2661: --NPANANDI 12.09.2004: CALLING REVISE_AP FOR CHANGED DATAMODEL
2662: --
2663: AMW_AUDIT_PROCEDURES_PVT.Revise_Ap_If_Necessary(
2664: p_api_version_number => 1,

Line 2733: fnd_file.put_line(fnd_file.log,'&&&&&&&&&&&&&&& l_has_proc_obj_assoc_access: '||l_has_proc_obj_assoc_access||' &&&&&&&&&&&&&&&');

2729: ,p_instance_pk1_value => P_PK1
2730: ,p_user_id => fnd_global.user_id);
2731: end if;
2732:
2733: fnd_file.put_line(fnd_file.log,'&&&&&&&&&&&&&&& l_has_proc_obj_assoc_access: '||l_has_proc_obj_assoc_access||' &&&&&&&&&&&&&&&');
2734: --03.02.2005 npanandi: imposing the foll. IF condition to
2735: --create the association only if access privilege is present,
2736: --and moreover, only when associating Process to Objective in the spreadsheet
2737: if(l_has_proc_obj_assoc_access = 'T') then

Line 2796: fnd_file.put_line(fnd_file.log,'&&&&&&&&&&&&&&& l_has_proc_risk_assoc_access: '||l_has_proc_risk_assoc_access||' &&&&&&&&&&&&&&&');

2792: ,p_object_name => 'AMW_PROCESS_APPR_ETTY'
2793: ,p_instance_pk1_value => P_PROCESS_ID
2794: ,p_user_id => fnd_global.user_id);
2795:
2796: fnd_file.put_line(fnd_file.log,'&&&&&&&&&&&&&&& l_has_proc_risk_assoc_access: '||l_has_proc_risk_assoc_access||' &&&&&&&&&&&&&&&');
2797: --03.02.2005 npanandi: imposing the foll. IF condition to
2798: --create the association only if access privilege is present
2799: if(l_has_proc_risk_assoc_access = 'T') then
2800: **/