466: v_request_group_id number;
467: accp_flag char(1);
468: v_buyer_id number;
469: v_document_type po_change_requests.DOCUMENT_TYPE%TYPE;
470: l_user_id NUMBER := fnd_global.user_id;
471: l_login_id NUMBER := fnd_global.login_id;
472: l_api_name CONSTANT VARCHAR2(30) := 'save_request';
473: l_api_version_number CONSTANT NUMBER := 1.0;
474:
467: accp_flag char(1);
468: v_buyer_id number;
469: v_document_type po_change_requests.DOCUMENT_TYPE%TYPE;
470: l_user_id NUMBER := fnd_global.user_id;
471: l_login_id NUMBER := fnd_global.login_id;
472: l_api_name CONSTANT VARCHAR2(30) := 'save_request';
473: l_api_version_number CONSTANT NUMBER := 1.0;
474:
475: BEGIN
898: l_po_change_requests(i).po_release_id,
899: l_po_change_requests(i).document_revision_num,
900: accp_flag,
901: l_po_change_requests(i).request_reason,
902: v_buyer_id, fnd_global.user_id);
903:
904: elsif (l_po_change_requests(i).request_level='LINE' AND
905: l_po_change_requests(i).action_type='MODIFICATION') then
906: callWf := true;
942: l_po_change_requests(i).po_release_id,
943: l_po_change_requests(i).document_revision_num,
944: 'Y',
945: l_po_change_requests(i).request_reason,
946: v_buyer_id, fnd_global.user_id);
947:
948: END IF;
949:
950: else
1131: end if;
1132: -- Update the PO Headers/Releases even if the changes dosent require doc Check
1133: if (callDocCheck=false) then
1134: if (p_user_id is null or p_login_id is null) then
1135: l_user_id := fnd_global.user_id;
1136: l_login_id := fnd_global.login_id;
1137: else
1138: l_user_id := p_user_id;
1139: l_login_id := p_login_id;
1132: -- Update the PO Headers/Releases even if the changes dosent require doc Check
1133: if (callDocCheck=false) then
1134: if (p_user_id is null or p_login_id is null) then
1135: l_user_id := fnd_global.user_id;
1136: l_login_id := fnd_global.login_id;
1137: else
1138: l_user_id := p_user_id;
1139: l_login_id := p_login_id;
1140: end if;
1143: update po_releases_all set
1144: last_update_date = sysdate,
1145: last_updated_by = l_user_id,
1146: last_update_login = l_login_id,
1147: request_id = fnd_global.conc_request_id,
1148: program_application_id = fnd_global.prog_appl_id,
1149: program_id = fnd_global.conc_program_id,
1150: program_update_date = sysdate
1151: where po_release_id = p_po_release_id;
1144: last_update_date = sysdate,
1145: last_updated_by = l_user_id,
1146: last_update_login = l_login_id,
1147: request_id = fnd_global.conc_request_id,
1148: program_application_id = fnd_global.prog_appl_id,
1149: program_id = fnd_global.conc_program_id,
1150: program_update_date = sysdate
1151: where po_release_id = p_po_release_id;
1152: else
1145: last_updated_by = l_user_id,
1146: last_update_login = l_login_id,
1147: request_id = fnd_global.conc_request_id,
1148: program_application_id = fnd_global.prog_appl_id,
1149: program_id = fnd_global.conc_program_id,
1150: program_update_date = sysdate
1151: where po_release_id = p_po_release_id;
1152: else
1153: update po_headers_all set
1153: update po_headers_all set
1154: last_update_date = sysdate,
1155: last_updated_by = l_user_id,
1156: last_update_login = l_login_id,
1157: request_id = fnd_global.conc_request_id,
1158: program_application_id = fnd_global.prog_appl_id,
1159: program_id = fnd_global.conc_program_id,
1160: program_update_date = sysdate
1161: where po_header_id = p_po_header_id;
1154: last_update_date = sysdate,
1155: last_updated_by = l_user_id,
1156: last_update_login = l_login_id,
1157: request_id = fnd_global.conc_request_id,
1158: program_application_id = fnd_global.prog_appl_id,
1159: program_id = fnd_global.conc_program_id,
1160: program_update_date = sysdate
1161: where po_header_id = p_po_header_id;
1162: end if;
1155: last_updated_by = l_user_id,
1156: last_update_login = l_login_id,
1157: request_id = fnd_global.conc_request_id,
1158: program_application_id = fnd_global.prog_appl_id,
1159: program_id = fnd_global.conc_program_id,
1160: program_update_date = sysdate
1161: where po_header_id = p_po_header_id;
1162: end if;
1163: end if; -- if call doc check is false
1204: BEGIN
1205:
1206: x_return_status := FND_API.G_RET_STS_SUCCESS;
1207: if (p_user_id is null or p_login_id is null) then
1208: l_user_id := fnd_global.user_id;
1209: l_login_id := fnd_global.login_id;
1210: else
1211: l_user_id := p_user_id;
1212: l_login_id := p_login_id;
1205:
1206: x_return_status := FND_API.G_RET_STS_SUCCESS;
1207: if (p_user_id is null or p_login_id is null) then
1208: l_user_id := fnd_global.user_id;
1209: l_login_id := fnd_global.login_id;
1210: else
1211: l_user_id := p_user_id;
1212: l_login_id := p_login_id;
1213: end if;
1218: CHANGE_REQUESTED_BY = 'SUPPLIER',
1219: last_update_date = sysdate,
1220: last_updated_by = l_user_id,
1221: last_update_login = l_login_id,
1222: request_id = fnd_global.conc_request_id,
1223: program_application_id = fnd_global.prog_appl_id,
1224: program_id = fnd_global.conc_program_id,
1225: program_update_date = sysdate
1226: where po_header_id = p_po_header_id;
1219: last_update_date = sysdate,
1220: last_updated_by = l_user_id,
1221: last_update_login = l_login_id,
1222: request_id = fnd_global.conc_request_id,
1223: program_application_id = fnd_global.prog_appl_id,
1224: program_id = fnd_global.conc_program_id,
1225: program_update_date = sysdate
1226: where po_header_id = p_po_header_id;
1227:
1220: last_updated_by = l_user_id,
1221: last_update_login = l_login_id,
1222: request_id = fnd_global.conc_request_id,
1223: program_application_id = fnd_global.prog_appl_id,
1224: program_id = fnd_global.conc_program_id,
1225: program_update_date = sysdate
1226: where po_header_id = p_po_header_id;
1227:
1228: -- Update the approved_flag to R for all the shipments that has been changed
1290: revised_date = sysdate,
1291: last_update_date = sysdate,
1292: last_updated_by = l_user_id,
1293: last_update_login = l_login_id,
1294: request_id = fnd_global.conc_request_id,
1295: program_application_id = fnd_global.prog_appl_id,
1296: program_id = fnd_global.conc_program_id,
1297: program_update_date = sysdate
1298: where po_release_id = p_po_release_id;
1291: last_update_date = sysdate,
1292: last_updated_by = l_user_id,
1293: last_update_login = l_login_id,
1294: request_id = fnd_global.conc_request_id,
1295: program_application_id = fnd_global.prog_appl_id,
1296: program_id = fnd_global.conc_program_id,
1297: program_update_date = sysdate
1298: where po_release_id = p_po_release_id;
1299:
1292: last_updated_by = l_user_id,
1293: last_update_login = l_login_id,
1294: request_id = fnd_global.conc_request_id,
1295: program_application_id = fnd_global.prog_appl_id,
1296: program_id = fnd_global.conc_program_id,
1297: program_update_date = sysdate
1298: where po_release_id = p_po_release_id;
1299:
1300: -- Now Update the approved_flag to R for all the shipments that has been
2639: authorization_status = 'APPROVED',
2640: CHANGE_REQUESTED_BY = null,
2641: revised_date = sysdate,
2642: last_update_date = sysdate,
2643: last_updated_by = fnd_global.user_id,
2644: last_update_login = fnd_global.login_id,
2645: request_id = fnd_global.conc_request_id,
2646: program_application_id = fnd_global.prog_appl_id,
2647: program_id = fnd_global.conc_program_id,
2640: CHANGE_REQUESTED_BY = null,
2641: revised_date = sysdate,
2642: last_update_date = sysdate,
2643: last_updated_by = fnd_global.user_id,
2644: last_update_login = fnd_global.login_id,
2645: request_id = fnd_global.conc_request_id,
2646: program_application_id = fnd_global.prog_appl_id,
2647: program_id = fnd_global.conc_program_id,
2648: program_update_date = sysdate
2641: revised_date = sysdate,
2642: last_update_date = sysdate,
2643: last_updated_by = fnd_global.user_id,
2644: last_update_login = fnd_global.login_id,
2645: request_id = fnd_global.conc_request_id,
2646: program_application_id = fnd_global.prog_appl_id,
2647: program_id = fnd_global.conc_program_id,
2648: program_update_date = sysdate
2649: where po_release_id = p_po_release_id;
2642: last_update_date = sysdate,
2643: last_updated_by = fnd_global.user_id,
2644: last_update_login = fnd_global.login_id,
2645: request_id = fnd_global.conc_request_id,
2646: program_application_id = fnd_global.prog_appl_id,
2647: program_id = fnd_global.conc_program_id,
2648: program_update_date = sysdate
2649: where po_release_id = p_po_release_id;
2650: -- Update all the change requests with current revision number
2643: last_updated_by = fnd_global.user_id,
2644: last_update_login = fnd_global.login_id,
2645: request_id = fnd_global.conc_request_id,
2646: program_application_id = fnd_global.prog_appl_id,
2647: program_id = fnd_global.conc_program_id,
2648: program_update_date = sysdate
2649: where po_release_id = p_po_release_id;
2650: -- Update all the change requests with current revision number
2651: else
2675: update po_headers_all set
2676: authorization_status = 'APPROVED',
2677: CHANGE_REQUESTED_BY = null,
2678: last_update_date = sysdate,
2679: last_updated_by = fnd_global.user_id,
2680: last_update_login = fnd_global.login_id,
2681: request_id = fnd_global.conc_request_id,
2682: program_application_id = fnd_global.prog_appl_id,
2683: program_id = fnd_global.conc_program_id,
2676: authorization_status = 'APPROVED',
2677: CHANGE_REQUESTED_BY = null,
2678: last_update_date = sysdate,
2679: last_updated_by = fnd_global.user_id,
2680: last_update_login = fnd_global.login_id,
2681: request_id = fnd_global.conc_request_id,
2682: program_application_id = fnd_global.prog_appl_id,
2683: program_id = fnd_global.conc_program_id,
2684: program_update_date = sysdate
2677: CHANGE_REQUESTED_BY = null,
2678: last_update_date = sysdate,
2679: last_updated_by = fnd_global.user_id,
2680: last_update_login = fnd_global.login_id,
2681: request_id = fnd_global.conc_request_id,
2682: program_application_id = fnd_global.prog_appl_id,
2683: program_id = fnd_global.conc_program_id,
2684: program_update_date = sysdate
2685: where po_header_id = p_po_header_id;
2678: last_update_date = sysdate,
2679: last_updated_by = fnd_global.user_id,
2680: last_update_login = fnd_global.login_id,
2681: request_id = fnd_global.conc_request_id,
2682: program_application_id = fnd_global.prog_appl_id,
2683: program_id = fnd_global.conc_program_id,
2684: program_update_date = sysdate
2685: where po_header_id = p_po_header_id;
2686: -- Update all the change requests with current revision number
2679: last_updated_by = fnd_global.user_id,
2680: last_update_login = fnd_global.login_id,
2681: request_id = fnd_global.conc_request_id,
2682: program_application_id = fnd_global.prog_appl_id,
2683: program_id = fnd_global.conc_program_id,
2684: program_update_date = sysdate
2685: where po_header_id = p_po_header_id;
2686: -- Update all the change requests with current revision number
2687: else