145: -- ELSE
146: -- l_record_sequence := p_record_sequence;
147: -- END IF;
148:
149: pa_progress_report_pkg.INSERT_progress_report_VAL_ROW (
150: P_VERSION_ID,
151: P_REGION_SOURCE_TYPE,
152: P_REGION_CODE,
153: P_RECORD_SEQUENCE,
435: --debug_msg ('P_ATTRIBUTE7' || P_ATTRIBUTE8);
436: --debug_msg ('P_ATTRIBUTE7' || P_ATTRIBUTE9);
437:
438: -- we can update it now
439: PA_PROGRESS_REPORT_PKG.update_progress_report_val_row
440: (
441: P_VERSION_ID ,
442: P_REGION_SOURCE_TYPE,
443: P_REGION_CODE ,
666: */
667:
668: IF (p_validate_only <>FND_API.g_true AND x_return_status = FND_API.g_ret_sts_success) THEN
669: IF (p_record_sequence IS null) THEN
670: pa_progress_report_pkg.delete_progress_report_region(
671: P_VERSION_ID,
672: P_REGION_SOURCE_TYPE,
673: P_REGION_CODE,
674: x_return_status,
676: x_msg_data
677: );
678:
679: else
680: pa_progress_report_pkg.DELETE_progress_report_VAL_ROW (
681: P_VERSION_ID,
682: P_REGION_SOURCE_TYPE,
683: P_REGION_CODE,
684: P_RECORD_SEQUENCE,
836:
837: -- change the status of report to obsoleted.
838: IF (p_validate_only <>FND_API.g_true AND x_return_status = FND_API.g_ret_sts_success) then
839:
840: /* pa_progress_report_pkg.UPDATE_PROGRESS_REPORT_VER_ROW
841: (
842: p_version_id,
843: NULL,
844: NULL,
889: open update_last_published_rep;
890: fetch update_last_published_rep into l_version_id,l_RECORD_VERSION_NUMBER,l_summary_version_number;
891: IF update_last_published_rep%found then
892:
893: pa_progress_report_pkg.UPDATE_PROGRESS_REPORT_VER_ROW
894: (
895: l_version_id,
896: NULL,
897: NULL,
1026:
1027: IF (p_validate_only <>FND_API.g_true AND x_return_status = FND_API.g_ret_sts_success) then
1028:
1029: /*
1030: pa_progress_report_pkg.UPDATE_PROGRESS_REPORT_VER_ROW
1031: (
1032: p_version_id,
1033: NULL,
1034: NULL,
1177:
1178: IF (p_validate_only <>FND_API.g_true AND x_return_status = FND_API.g_ret_sts_success) then
1179:
1180: /*
1181: pa_progress_report_pkg.UPDATE_PROGRESS_REPORT_VER_ROW
1182: (
1183: p_version_id,
1184: NULL,
1185: NULL,
1372: --debug_msg ('before update 2' || To_char(l_reported_by));
1373: --debug_msg ('before update 3' || p_overview);
1374: --debug_msg ('before update 4' || p_progress_status);
1375:
1376: pa_progress_report_pkg.UPDATE_PROGRESS_REPORT_VER_ROW
1377: (
1378: p_version_id,
1379: NULL,
1380: NULL,
1757:
1758: -- we will insert into pa_object_page_layouts
1759: IF (p_validate_only <>FND_API.g_true AND x_return_status = FND_API.g_ret_sts_success) THEN
1760:
1761: pa_progress_report_pkg.insert_object_page_layout_row
1762: (
1763: P_OBJECT_ID ,
1764: P_OBJECT_TYPE ,
1765: L_PAGE_ID ,
1837: -- we will insert into pa_object_page_layouts
1838: IF (p_validate_only <>FND_API.g_true AND x_return_status = FND_API.g_ret_sts_success) THEN
1839:
1840:
1841: pa_progress_report_pkg.update_object_page_layout_row
1842: (
1843: P_OBJECT_ID ,
1844: P_OBJECT_TYPE ,
1845: L_PAGE_ID ,
2104:
2105: IF (p_validate_only <>FND_API.g_true AND x_return_status = FND_API.g_ret_sts_success) then
2106:
2107: -- delete all records in pa_progress_report_vals under the p_version_id
2108: pa_progress_report_pkg.delete_progress_report_vals
2109: (
2110: p_version_id,
2111: x_return_status ,
2112: x_msg_count ,
2115:
2116: IF (x_return_status = FND_API.g_ret_sts_success) THEN
2117:
2118: -- delete record in pa_progress_report_vers under the p_version_id
2119: pa_progress_report_pkg.delete_progress_report_ver_row
2120: (
2121: p_version_id,
2122: p_record_version_number,
2123: x_return_status ,
2262:
2263: -- set the status to working first
2264:
2265: /*
2266: pa_progress_report_pkg.UPDATE_PROGRESS_REPORT_VER_ROW
2267: (
2268: p_version_id ,
2269: NULL,
2270: NULL,
2516: -- set the status to working first
2517:
2518: --debug_msg('UPDATE_PROGRESS_REPORT_VER_ROW');
2519: /*
2520: pa_progress_report_pkg.UPDATE_PROGRESS_REPORT_VER_ROW
2521: (
2522: p_version_id,
2523: NULL,
2524: NULL,
2615: );
2616:
2617:
2618: --debug_msg('update_object_page_layout_row');
2619: pa_progress_report_pkg.update_object_page_layout_row
2620: (
2621: l_OBJECT_ID ,
2622: l_OBJECT_TYPE ,
2623: null ,
2787: IF (p_validate_only <>FND_API.g_true AND x_return_status = FND_API.g_ret_sts_success) then
2788:
2789: -- set the status to working first
2790:
2791: pa_progress_report_pkg.UPDATE_PROGRESS_REPORT_VER_ROW
2792: (
2793: p_version_id,
2794: NULL,
2795: NULL,
3014: and current_flag = 'Y';
3015:
3016: if (l_report_end_date >= x_report_end_Date) then
3017: l_current_flag := 'Y';
3018: pa_progress_report_pkg.UPDATE_PROGRESS_REPORT_VER_ROW
3019: (
3020: x_version_id,
3021: NULL,
3022: NULL,
3058: end if;
3059:
3060: -- change the progress status, launch the workflow if necessary
3061: IF (p_validate_only <>FND_API.g_true AND x_return_status = FND_API.g_ret_sts_success) then
3062: pa_progress_report_pkg.UPDATE_PROGRESS_REPORT_VER_ROW
3063: (
3064: p_version_id,
3065: NULL,
3066: NULL,
3439: ------CLOSE get_resource_id;
3440: l_person_id := pa_resource_utils.get_resource_id(p_user_id => FND_GLOBAL.user_id);
3441:
3442: --debug_msg ('l_person_id' || To_char(l_person_id));
3443: pa_progress_report_pkg.insert_PROGRESS_REPORT_ver_row
3444: (
3445: p_object_id,
3446: p_object_type,
3447: l_page_id,
3493:
3494: --debug_msg ('no published report' || obj_page_value_rec.view_region_code);
3495:
3496: -- debug_msg('insert val' || obj_page_value_rec.view_region_code);
3497: pa_progress_report_pkg.insert_progress_report_val_row
3498: (
3499: x_version_id,
3500: obj_page_value_rec.region_source_type,
3501: obj_page_value_rec.region_source_code,
3582:
3583: --END IF;
3584:
3585: --debug_msg ('copying overview ' || l_overview);
3586: pa_progress_report_pkg.UPDATE_PROGRESS_REPORT_VER_ROW (
3587: x_version_id,
3588: null,
3589: NULL,
3590: NULL,
3621: -- copy it, create entries in pa_progress_report_vals table
3622: FOR obj_page_value_rec IN get_all_regions LOOP
3623:
3624: --debug_msg ('published report' || obj_page_value_rec.region_code);
3625: pa_progress_report_pkg.insert_progress_report_val_row
3626: (
3627: x_version_id,
3628: obj_page_value_rec.region_source_type,
3629: obj_page_value_rec.region_code,