1065:
1066: BEGIN
1067: x_msg_count := 0;
1068: x_return_status := FND_API.G_RET_STS_SUCCESS;
1069: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
1070:
1071: IF l_debug_mode = 'Y' THEN
1072: pa_debug.set_curr_function( p_function => 'START_NOTIFICATION_WF',
1073: p_debug_mode => l_debug_mode );
1068: x_return_status := FND_API.G_RET_STS_SUCCESS;
1069: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
1070:
1071: IF l_debug_mode = 'Y' THEN
1072: pa_debug.set_curr_function( p_function => 'START_NOTIFICATION_WF',
1073: p_debug_mode => l_debug_mode );
1074: END IF;
1075:
1076: -- Check for business rules violations
1075:
1076: -- Check for business rules violations
1077:
1078: IF l_debug_mode = 'Y' THEN
1079: pa_debug.g_err_stage:= 'Validating input parameters';
1080: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1081: pa_debug.g_err_stage:= 'p_item_type = '|| p_item_type;
1082: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1083: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1076: -- Check for business rules violations
1077:
1078: IF l_debug_mode = 'Y' THEN
1079: pa_debug.g_err_stage:= 'Validating input parameters';
1080: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1081: pa_debug.g_err_stage:= 'p_item_type = '|| p_item_type;
1082: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1083: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1084: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1077:
1078: IF l_debug_mode = 'Y' THEN
1079: pa_debug.g_err_stage:= 'Validating input parameters';
1080: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1081: pa_debug.g_err_stage:= 'p_item_type = '|| p_item_type;
1082: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1083: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1084: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1085: pa_debug.g_err_stage:= 'p_ci_id = '|| p_ci_id;
1078: IF l_debug_mode = 'Y' THEN
1079: pa_debug.g_err_stage:= 'Validating input parameters';
1080: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1081: pa_debug.g_err_stage:= 'p_item_type = '|| p_item_type;
1082: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1083: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1084: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1085: pa_debug.g_err_stage:= 'p_ci_id = '|| p_ci_id;
1086: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1079: pa_debug.g_err_stage:= 'Validating input parameters';
1080: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1081: pa_debug.g_err_stage:= 'p_item_type = '|| p_item_type;
1082: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1083: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1084: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1085: pa_debug.g_err_stage:= 'p_ci_id = '|| p_ci_id;
1086: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1087: pa_debug.g_err_stage:= 'p_action_id = '|| p_action_id;
1080: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1081: pa_debug.g_err_stage:= 'p_item_type = '|| p_item_type;
1082: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1083: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1084: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1085: pa_debug.g_err_stage:= 'p_ci_id = '|| p_ci_id;
1086: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1087: pa_debug.g_err_stage:= 'p_action_id = '|| p_action_id;
1088: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1081: pa_debug.g_err_stage:= 'p_item_type = '|| p_item_type;
1082: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1083: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1084: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1085: pa_debug.g_err_stage:= 'p_ci_id = '|| p_ci_id;
1086: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1087: pa_debug.g_err_stage:= 'p_action_id = '|| p_action_id;
1088: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1089: END IF;
1082: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1083: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1084: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1085: pa_debug.g_err_stage:= 'p_ci_id = '|| p_ci_id;
1086: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1087: pa_debug.g_err_stage:= 'p_action_id = '|| p_action_id;
1088: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1089: END IF;
1090:
1083: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1084: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1085: pa_debug.g_err_stage:= 'p_ci_id = '|| p_ci_id;
1086: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1087: pa_debug.g_err_stage:= 'p_action_id = '|| p_action_id;
1088: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1089: END IF;
1090:
1091: IF (p_item_type IS NULL) OR
1084: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1085: pa_debug.g_err_stage:= 'p_ci_id = '|| p_ci_id;
1086: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1087: pa_debug.g_err_stage:= 'p_action_id = '|| p_action_id;
1088: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1089: END IF;
1090:
1091: IF (p_item_type IS NULL) OR
1092: (p_process_name IS NULL) OR
1121: x_item_key := To_char(l_item_key);
1122:
1123:
1124: IF l_debug_mode = 'Y' THEN
1125: pa_debug.g_err_stage:= 'x_item_key = '|| x_item_key;
1126: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1127: END IF;
1128: -- create the workflow process
1129: WF_ENGINE.CreateProcess(p_item_type
1122:
1123:
1124: IF l_debug_mode = 'Y' THEN
1125: pa_debug.g_err_stage:= 'x_item_key = '|| x_item_key;
1126: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1127: END IF;
1128: -- create the workflow process
1129: WF_ENGINE.CreateProcess(p_item_type
1130: ,x_item_key
1146:
1147:
1148: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1149: IF l_debug_mode = 'Y' THEN
1150: pa_debug.g_err_stage:= 'Error calling pa_control_item_workflow.SET_WORKFLOW_ATTRIBUTES';
1151: pa_debug.write('START_NOTIFICATION_WF: ' || l_module_name,pa_debug.g_err_stage,l_debug_level5);
1152:
1153: PA_UTILS.Add_Message( p_app_short_name => 'PA'
1154: ,p_msg_name => 'PA_PR_CREATE_WF_FAILED');
1147:
1148: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1149: IF l_debug_mode = 'Y' THEN
1150: pa_debug.g_err_stage:= 'Error calling pa_control_item_workflow.SET_WORKFLOW_ATTRIBUTES';
1151: pa_debug.write('START_NOTIFICATION_WF: ' || l_module_name,pa_debug.g_err_stage,l_debug_level5);
1152:
1153: PA_UTILS.Add_Message( p_app_short_name => 'PA'
1154: ,p_msg_name => 'PA_PR_CREATE_WF_FAILED');
1155: END IF;
1156: RAISE Invalid_Arg_Exc_CI;
1157: END IF;
1158:
1159: IF l_debug_mode = 'Y' THEN
1160: pa_debug.g_err_stage:= 'returned from pa_control_items_workflow.set_workflow_attributes';
1161: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1162: END IF;
1163:
1164:
1157: END IF;
1158:
1159: IF l_debug_mode = 'Y' THEN
1160: pa_debug.g_err_stage:= 'returned from pa_control_items_workflow.set_workflow_attributes';
1161: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1162: END IF;
1163:
1164:
1165: WF_ENGINE.StartProcess(p_item_type
1190: END IF;
1191:
1192:
1193: IF l_debug_mode = 'Y' THEN
1194: pa_debug.g_err_stage:= 'Exiting START_NOTIFICATION_WF';
1195: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1196: pa_debug.reset_curr_function;
1197: END IF;
1198: EXCEPTION
1191:
1192:
1193: IF l_debug_mode = 'Y' THEN
1194: pa_debug.g_err_stage:= 'Exiting START_NOTIFICATION_WF';
1195: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1196: pa_debug.reset_curr_function;
1197: END IF;
1198: EXCEPTION
1199:
1192:
1193: IF l_debug_mode = 'Y' THEN
1194: pa_debug.g_err_stage:= 'Exiting START_NOTIFICATION_WF';
1195: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1196: pa_debug.reset_curr_function;
1197: END IF;
1198: EXCEPTION
1199:
1200: WHEN Invalid_Arg_Exc_CI THEN
1218: ELSE
1219: x_msg_count := l_msg_count;
1220: END IF;
1221: IF l_debug_mode = 'Y' THEN
1222: pa_debug.reset_curr_function;
1223: END IF;
1224:
1225: RETURN;
1226:
1239: ,p_procedure_name => 'START_NOTIFICATION_WF'
1240: ,p_error_text => x_msg_data);
1241:
1242: IF l_debug_mode = 'Y' THEN
1243: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
1244: pa_debug.write(l_module_name,pa_debug.g_err_stage,
1245: l_debug_level5);
1246: pa_debug.reset_curr_function;
1247: END IF;
1240: ,p_error_text => x_msg_data);
1241:
1242: IF l_debug_mode = 'Y' THEN
1243: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
1244: pa_debug.write(l_module_name,pa_debug.g_err_stage,
1245: l_debug_level5);
1246: pa_debug.reset_curr_function;
1247: END IF;
1248: RAISE;
1242: IF l_debug_mode = 'Y' THEN
1243: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
1244: pa_debug.write(l_module_name,pa_debug.g_err_stage,
1245: l_debug_level5);
1246: pa_debug.reset_curr_function;
1247: END IF;
1248: RAISE;
1249: END START_NOTIFICATION_WF;
1250:
1479: BEGIN
1480:
1481: x_msg_count := 0;
1482: x_return_status := FND_API.G_RET_STS_SUCCESS;
1483: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
1484:
1485: IF l_debug_mode = 'Y' THEN
1486: pa_debug.set_curr_function( p_function => 'set_workflow_attributes',
1487: p_debug_mode => l_debug_mode );
1482: x_return_status := FND_API.G_RET_STS_SUCCESS;
1483: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
1484:
1485: IF l_debug_mode = 'Y' THEN
1486: pa_debug.set_curr_function( p_function => 'set_workflow_attributes',
1487: p_debug_mode => l_debug_mode );
1488: END IF;
1489:
1490: -- Check for business rules violations
1489:
1490: -- Check for business rules violations
1491:
1492: IF l_debug_mode = 'Y' THEN
1493: pa_debug.g_err_stage:= 'Validating input parameters';
1494: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1495: pa_debug.g_err_stage:= 'p_item_type = '|| p_item_type;
1496: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1497: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1490: -- Check for business rules violations
1491:
1492: IF l_debug_mode = 'Y' THEN
1493: pa_debug.g_err_stage:= 'Validating input parameters';
1494: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1495: pa_debug.g_err_stage:= 'p_item_type = '|| p_item_type;
1496: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1497: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1498: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1491:
1492: IF l_debug_mode = 'Y' THEN
1493: pa_debug.g_err_stage:= 'Validating input parameters';
1494: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1495: pa_debug.g_err_stage:= 'p_item_type = '|| p_item_type;
1496: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1497: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1498: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1499: pa_debug.g_err_stage:= 'p_ci_id = '|| p_ci_id;
1492: IF l_debug_mode = 'Y' THEN
1493: pa_debug.g_err_stage:= 'Validating input parameters';
1494: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1495: pa_debug.g_err_stage:= 'p_item_type = '|| p_item_type;
1496: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1497: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1498: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1499: pa_debug.g_err_stage:= 'p_ci_id = '|| p_ci_id;
1500: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1493: pa_debug.g_err_stage:= 'Validating input parameters';
1494: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1495: pa_debug.g_err_stage:= 'p_item_type = '|| p_item_type;
1496: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1497: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1498: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1499: pa_debug.g_err_stage:= 'p_ci_id = '|| p_ci_id;
1500: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1501: END IF;
1494: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1495: pa_debug.g_err_stage:= 'p_item_type = '|| p_item_type;
1496: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1497: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1498: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1499: pa_debug.g_err_stage:= 'p_ci_id = '|| p_ci_id;
1500: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1501: END IF;
1502:
1495: pa_debug.g_err_stage:= 'p_item_type = '|| p_item_type;
1496: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1497: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1498: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1499: pa_debug.g_err_stage:= 'p_ci_id = '|| p_ci_id;
1500: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1501: END IF;
1502:
1503: IF (p_item_type IS NULL) OR
1496: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1497: pa_debug.g_err_stage:= 'p_process_name = '|| p_process_name;
1498: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1499: pa_debug.g_err_stage:= 'p_ci_id = '|| p_ci_id;
1500: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);
1501: END IF;
1502:
1503: IF (p_item_type IS NULL) OR
1504: (p_process_name IS NULL) OR
1843: l_loop_var1 := l_loop_var1 + 1;
1844:
1845: PartyId_Tbl(l_loop_var1) := x.party_id;
1846: IF l_debug_mode = 'Y' THEN
1847: pa_debug.g_err_stage:= 'notification sent to :'||PartyId_Tbl(l_loop_var1);
1848: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1849: END IF;
1850: --Bug 3608031
1851: --l_loop_var1 := l_loop_var1 + 1;
1844:
1845: PartyId_Tbl(l_loop_var1) := x.party_id;
1846: IF l_debug_mode = 'Y' THEN
1847: pa_debug.g_err_stage:= 'notification sent to :'||PartyId_Tbl(l_loop_var1);
1848: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1849: END IF;
1850: --Bug 3608031
1851: --l_loop_var1 := l_loop_var1 + 1;
1852: END IF;
1914: , l_role);
1915: END IF;
1916:
1917: IF l_debug_mode = 'Y' THEN
1918: pa_debug.g_err_stage:= 'Exiting set_workflow_attributes';
1919: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1920: pa_debug.reset_curr_function;
1921: END IF;
1922: EXCEPTION
1915: END IF;
1916:
1917: IF l_debug_mode = 'Y' THEN
1918: pa_debug.g_err_stage:= 'Exiting set_workflow_attributes';
1919: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1920: pa_debug.reset_curr_function;
1921: END IF;
1922: EXCEPTION
1923:
1916:
1917: IF l_debug_mode = 'Y' THEN
1918: pa_debug.g_err_stage:= 'Exiting set_workflow_attributes';
1919: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level3);
1920: pa_debug.reset_curr_function;
1921: END IF;
1922: EXCEPTION
1923:
1924: WHEN Invalid_Arg_Exc_CI THEN
1962: ELSE
1963: x_msg_count := l_msg_count;
1964: END IF;
1965: IF l_debug_mode = 'Y' THEN
1966: pa_debug.reset_curr_function;
1967: END IF;
1968:
1969: RETURN;
1970:
2003: ,p_procedure_name => 'set_workflow_attributes'
2004: ,p_error_text => x_msg_data);
2005:
2006: IF l_debug_mode = 'Y' THEN
2007: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
2008: pa_debug.write(l_module_name,pa_debug.g_err_stage,
2009: l_debug_level5);
2010: pa_debug.reset_curr_function;
2011: END IF;
2004: ,p_error_text => x_msg_data);
2005:
2006: IF l_debug_mode = 'Y' THEN
2007: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
2008: pa_debug.write(l_module_name,pa_debug.g_err_stage,
2009: l_debug_level5);
2010: pa_debug.reset_curr_function;
2011: END IF;
2012: RAISE;
2006: IF l_debug_mode = 'Y' THEN
2007: pa_debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
2008: pa_debug.write(l_module_name,pa_debug.g_err_stage,
2009: l_debug_level5);
2010: pa_debug.reset_curr_function;
2011: END IF;
2012: RAISE;
2013: END set_workflow_attributes;
2014:
2076: and rownum = 1;
2077:
2078: BEGIN
2079: -- Initialize the Error Stack
2080: PA_DEBUG.init_err_stack('PA_CONTROL_ITEMS_WORKFLOW.CLOSE_CI_ACTION');
2081:
2082:
2083: l_ci_id := wf_engine.GetItemAttrNumber
2084: ( itemtype => itemtype,
2303: from pa_control_items
2304: where ci_id = l_ci_id;
2305: BEGIN
2306: -- Initialize the Error Stack
2307: PA_DEBUG.init_err_stack('PA_CONTROL_ITEMS_WORKFLOW.KEEP_OPEN');
2308:
2309:
2310:
2311: l_ci_id := wf_engine.GetItemAttrNumber