DBA Data[Home] [Help]

APPS.OZF_SD_BATCH_FEED_PVT dependencies on FND_GLOBAL

Line 36: last_updated_by = fnd_global.user_id

32:
33: UPDATE ozf_sd_batch_lines_int_all
34: SET processed_flag = 'S',
35: last_update_date = sysdate,
36: last_updated_by = fnd_global.user_id
37: WHERE ship_frm_sd_claim_request_id = p_batch_number
38: AND batch_line_number = p_batch_line_number
39: AND processed_flag = 'N';
40:

Line 1005: last_updated_by = fnd_global.user_id

1001: WHEN NO_DATA_FOUND THEN
1002: UPDATE ozf_sd_batch_lines_int_all
1003: SET validation_txt = 'Batch ID does not exist',
1004: last_update_date = sysdate,
1005: last_updated_by = fnd_global.user_id
1006: WHERE ship_frm_sd_claim_request_id = p_batch_number
1007: AND processed_flag = 'N';
1008: COMMIT;
1009: x_return_status := fnd_api.g_ret_sts_error;

Line 1029: last_updated_by = fnd_global.user_id

1025: UPDATE ozf_sd_batch_lines_int_all
1026: SET processed_flag = 'E',
1027: validation_txt = 'Batch not in WIP or SUBMITTED status',
1028: last_update_date = sysdate,
1029: last_updated_by = fnd_global.user_id
1030: WHERE ship_frm_sd_claim_request_id = p_batch_number
1031: AND processed_flag = 'N';
1032: COMMIT;
1033: x_return_status := fnd_api.g_ret_sts_error;

Line 1049: last_updated_by = fnd_global.user_id

1045: IF l_cnt_line = 0 THEN
1046: UPDATE ozf_sd_batch_lines_int_all
1047: SET validation_txt = 'There are no Lines for this Batch ID',
1048: last_update_date = sysdate,
1049: last_updated_by = fnd_global.user_id
1050: WHERE ship_frm_sd_claim_request_id = p_batch_number
1051: AND processed_flag = 'N';
1052: COMMIT;
1053: x_return_status := fnd_api.g_ret_sts_error;

Line 1112: fnd_global.user_id,

1108: a.dispute_code,
1109: 'N',
1110: sysdate,
1111: sysdate,
1112: fnd_global.user_id,
1113: fnd_global.conc_request_id,
1114: fnd_global.user_id,
1115: NULL, --created from
1116: fnd_global.conc_login_id,

Line 1113: fnd_global.conc_request_id,

1109: 'N',
1110: sysdate,
1111: sysdate,
1112: fnd_global.user_id,
1113: fnd_global.conc_request_id,
1114: fnd_global.user_id,
1115: NULL, --created from
1116: fnd_global.conc_login_id,
1117: fnd_global.prog_appl_id,

Line 1114: fnd_global.user_id,

1110: sysdate,
1111: sysdate,
1112: fnd_global.user_id,
1113: fnd_global.conc_request_id,
1114: fnd_global.user_id,
1115: NULL, --created from
1116: fnd_global.conc_login_id,
1117: fnd_global.prog_appl_id,
1118: NULL, --l_program_update_date,

Line 1116: fnd_global.conc_login_id,

1112: fnd_global.user_id,
1113: fnd_global.conc_request_id,
1114: fnd_global.user_id,
1115: NULL, --created from
1116: fnd_global.conc_login_id,
1117: fnd_global.prog_appl_id,
1118: NULL, --l_program_update_date,
1119: fnd_global.conc_program_id,
1120: fnd_global.security_group_id

Line 1117: fnd_global.prog_appl_id,

1113: fnd_global.conc_request_id,
1114: fnd_global.user_id,
1115: NULL, --created from
1116: fnd_global.conc_login_id,
1117: fnd_global.prog_appl_id,
1118: NULL, --l_program_update_date,
1119: fnd_global.conc_program_id,
1120: fnd_global.security_group_id
1121:

Line 1119: fnd_global.conc_program_id,

1115: NULL, --created from
1116: fnd_global.conc_login_id,
1117: fnd_global.prog_appl_id,
1118: NULL, --l_program_update_date,
1119: fnd_global.conc_program_id,
1120: fnd_global.security_group_id
1121:
1122: FROM -- No rejection code for rejected line
1123: ( SELECT intr.batch_id,

Line 1120: fnd_global.security_group_id

1116: fnd_global.conc_login_id,
1117: fnd_global.prog_appl_id,
1118: NULL, --l_program_update_date,
1119: fnd_global.conc_program_id,
1120: fnd_global.security_group_id
1121:
1122: FROM -- No rejection code for rejected line
1123: ( SELECT intr.batch_id,
1124: intr.batch_line_id,

Line 1243: last_updated_by = fnd_global.user_id,

1239: approved_amount = V_MISS_REJ_APP_REC.auth_cost,
1240: approved_currency_code = V_MISS_REJ_APP_REC.auth_curr_code,
1241: object_version_number = object_version_number + 1,
1242: last_update_date = sysdate,
1243: last_updated_by = fnd_global.user_id,
1244: vendor_ref_id = V_MISS_REJ_APP_REC.credit_reference_id,
1245: quantity_approved = V_MISS_REJ_APP_REC.vendor_auth_quantity,
1246: total_approved_amt = CASE WHEN V_MISS_REJ_APP_REC.stat_code ='REJECTED' THEN NVL(total_approved_amt,0) + V_MISS_REJ_APP_REC.approved_claim_amount
1247: WHEN V_MISS_REJ_APP_REC.stat_code ='APPROVED' THEN total_approved_amt + V_MISS_REJ_APP_REC.approved_claim_amount

Line 1361: last_updated_by = fnd_global.user_id

1357: SET status_code = 'APPROVED',
1358: claim_minor_version = NULL,
1359: object_version_number = object_version_number + 1,
1360: last_update_date = sysdate,
1361: last_updated_by = fnd_global.user_id
1362: WHERE batch_id = l_batch_id;
1363:
1364: --Mark all rows as processed
1365: UPDATE ozf_sd_batch_lines_int_all

Line 1368: last_updated_by = fnd_global.user_id

1364: --Mark all rows as processed
1365: UPDATE ozf_sd_batch_lines_int_all
1366: SET processed_flag = 'Y',
1367: last_update_date = sysdate,
1368: last_updated_by = fnd_global.user_id
1369: WHERE ship_frm_sd_claim_request_id = p_batch_number
1370: AND processed_flag = 'N';
1371:
1372: -- Update status_code,claim amount,batch_curr_claim_amount and quantity_shipped for over approved lines

Line 1469: last_updated_by = fnd_global.user_id

1465: ELSE total_approved_qty
1466: END,
1467: object_version_number = object_version_number + 1,
1468: last_update_date = sysdate,
1469: last_updated_by = fnd_global.user_id
1470: WHERE batch_id = l_batch_id
1471: AND purge_flag <> 'Y' ;
1472:
1473:

Line 1495: last_updated_by = fnd_global.user_id

1491: SET status_code = 'WIP',
1492: object_version_number = object_version_number + 1,
1493: claim_minor_version = l_claim_minor_version + 1,
1494: last_update_date = sysdate,
1495: last_updated_by = fnd_global.user_id
1496: WHERE batch_id = l_batch_id;
1497:
1498: --Mark all rows as processed
1499: UPDATE ozf_sd_batch_lines_int_all

Line 1502: last_updated_by = fnd_global.user_id

1498: --Mark all rows as processed
1499: UPDATE ozf_sd_batch_lines_int_all
1500: SET processed_flag = 'Y',
1501: last_update_date = sysdate,
1502: last_updated_by = fnd_global.user_id
1503: WHERE ship_frm_sd_claim_request_id = p_batch_number
1504: AND processed_flag = 'N';
1505:
1506: --Update the following fields for the under approved batch lines

Line 1680: last_updated_by = fnd_global.user_id,

1676: ELSE discount_value
1677: END,
1678: object_version_number = object_version_number + 1,
1679: last_update_date = sysdate,
1680: last_updated_by = fnd_global.user_id,
1681: total_approved_qty = CASE WHEN total_approved_amt IS NOT NULL AND total_approved_qty IS NULL THEN NVL(quantity_approved,quantity_shipped)
1682: ELSE total_approved_qty
1683: END
1684: WHERE batch_id = l_batch_id

Line 1699: last_updated_by = fnd_global.user_id

1695: UPDATE ozf_sd_batch_headers_all
1696: SET status_code = 'WIP',
1697: object_version_number = object_version_number + 1,
1698: last_update_date = sysdate,
1699: last_updated_by = fnd_global.user_id
1700: WHERE batch_id = l_batch_id;
1701:
1702: UPDATE ozf_sd_batch_lines_int_all
1703: SET processed_flag = 'Y',

Line 1705: last_updated_by = fnd_global.user_id

1701:
1702: UPDATE ozf_sd_batch_lines_int_all
1703: SET processed_flag = 'Y',
1704: last_update_date = sysdate,
1705: last_updated_by = fnd_global.user_id
1706: WHERE ship_frm_sd_claim_request_id = p_batch_number
1707: AND processed_flag = 'N';
1708:
1709: COMMIT;

Line 1724: last_updated_by = fnd_global.user_id

1720: SET status_code = 'APPROVED',
1721: claim_minor_version = NULL,
1722: object_version_number = object_version_number + 1,
1723: last_update_date = sysdate,
1724: last_updated_by = fnd_global.user_id
1725: WHERE batch_id = l_batch_id;
1726:
1727: --Mark all rows as processed
1728: UPDATE ozf_sd_batch_lines_int_all

Line 1731: last_updated_by = fnd_global.user_id

1727: --Mark all rows as processed
1728: UPDATE ozf_sd_batch_lines_int_all
1729: SET processed_flag = 'Y',
1730: last_update_date = sysdate,
1731: last_updated_by = fnd_global.user_id
1732: WHERE ship_frm_sd_claim_request_id = p_batch_number
1733: AND processed_flag = 'N';
1734:
1735: PROCESS_COMP_APPR_BATCH(l_batch_id, x_return_status, x_msg_data);

Line 1754: last_updated_by = fnd_global.user_id

1750: SET status_code = 'APPROVED',
1751: claim_minor_version = NULL,
1752: object_version_number = object_version_number + 1,
1753: last_update_date = sysdate,
1754: last_updated_by = fnd_global.user_id
1755: WHERE batch_id = l_batch_id;
1756:
1757: --Mark all rows as processed
1758: UPDATE ozf_sd_batch_lines_int_all

Line 1761: last_updated_by = fnd_global.user_id

1757: --Mark all rows as processed
1758: UPDATE ozf_sd_batch_lines_int_all
1759: SET processed_flag = 'Y',
1760: last_update_date = sysdate,
1761: last_updated_by = fnd_global.user_id
1762: WHERE ship_frm_sd_claim_request_id = p_batch_number
1763: AND processed_flag = 'N';
1764:
1765: --Update completely approved batch lines

Line 1863: last_updated_by = fnd_global.user_id,

1859: '%',ROUND((100 - ((NVL(approved_amount,agreement_price)/NVL(list_price,1)) *100)),2),discount_value),
1860: agreement_price = decode(discount_type,'%',NVL(approved_amount,agreement_price),'NEWPRICE',NVL(approved_amount,agreement_price),agreement_price),
1861: object_version_number = object_version_number + 1,
1862: last_update_date = sysdate,
1863: last_updated_by = fnd_global.user_id,
1864: total_approved_qty = CASE WHEN total_approved_amt IS NOT NULL AND total_approved_qty IS NULL THEN NVL(quantity_approved,quantity_shipped)
1865: ELSE total_approved_qty
1866: END
1867: WHERE batch_id = l_batch_id

Line 1973: last_updated_by = fnd_global.user_id,

1969: '%',ROUND((100 - ((NVL(approved_amount,agreement_price)/NVL(list_price,1)) *100)),2),discount_value),
1970: agreement_price = decode(discount_type,'%',NVL(approved_amount,agreement_price),'NEWPRICE',NVL(approved_amount,agreement_price),agreement_price),
1971: object_version_number = object_version_number + 1,
1972: last_update_date = sysdate,
1973: last_updated_by = fnd_global.user_id,
1974: total_approved_qty = CASE WHEN total_approved_amt IS NOT NULL AND total_approved_qty IS NULL THEN NVL(quantity_approved,quantity_shipped)
1975: ELSE total_approved_qty
1976: END
1977: WHERE batch_id = l_batch_id

Line 2005: last_updated_by = fnd_global.user_id

2001: SET status_code = 'WIP',
2002: object_version_number = object_version_number + 1,
2003: claim_minor_version = l_claim_minor_version + 1,
2004: last_update_date = sysdate,
2005: last_updated_by = fnd_global.user_id
2006: WHERE batch_id = l_batch_id;
2007:
2008: --Mark all rows as processed
2009: UPDATE ozf_sd_batch_lines_int_all

Line 2012: last_updated_by = fnd_global.user_id

2008: --Mark all rows as processed
2009: UPDATE ozf_sd_batch_lines_int_all
2010: SET processed_flag = 'Y',
2011: last_update_date = sysdate,
2012: last_updated_by = fnd_global.user_id
2013: WHERE ship_frm_sd_claim_request_id = p_batch_number
2014: AND processed_flag = 'N';
2015:
2016: --Update the following fields for the under approved batch lines

Line 2184: last_updated_by = fnd_global.user_id,

2180: ELSE discount_value
2181: END,
2182: object_version_number = object_version_number + 1,
2183: last_update_date = sysdate,
2184: last_updated_by = fnd_global.user_id,
2185: total_approved_qty = CASE WHEN total_approved_amt IS NOT NULL AND total_approved_qty IS NULL THEN NVL(quantity_approved,quantity_shipped)
2186: ELSE total_approved_qty
2187: END
2188: WHERE batch_id = l_batch_id

Line 2221: last_updated_by = fnd_global.user_id,

2217: when (original_claim_amount < 0 AND V_MISS_REJ_APP_REC.line_status_code = 'APPROVED') THEN V_MISS_REJ_APP_REC.auth_curr_code end),
2218:
2219: object_version_number = object_version_number + 1,
2220: last_update_date = sysdate,
2221: last_updated_by = fnd_global.user_id,
2222: vendor_ref_id = V_MISS_REJ_APP_REC.credit_reference_id,
2223: quantity_approved = (case when (original_claim_amount > 0) THEN V_MISS_REJ_APP_REC.vendor_auth_quantity
2224: when (original_claim_amount < 0 AND V_MISS_REJ_APP_REC.line_status_code = 'APPROVED') THEN V_MISS_REJ_APP_REC.vendor_auth_quantity end),
2225:

Line 2284: last_updated_by = fnd_global.user_id

2280: UPDATE ozf_sd_batch_headers_all
2281: SET status_code = 'WIP',
2282: object_version_number = object_version_number + 1,
2283: last_update_date = sysdate,
2284: last_updated_by = fnd_global.user_id
2285: WHERE batch_id = l_batch_id;
2286:
2287: UPDATE ozf_sd_batch_lines_int_all
2288: SET processed_flag = 'Y',

Line 2290: last_updated_by = fnd_global.user_id

2286:
2287: UPDATE ozf_sd_batch_lines_int_all
2288: SET processed_flag = 'Y',
2289: last_update_date = sysdate,
2290: last_updated_by = fnd_global.user_id
2291: WHERE ship_frm_sd_claim_request_id = p_batch_number
2292: AND processed_flag = 'N';
2293:
2294: COMMIT;

Line 2307: last_updated_by = fnd_global.user_id

2303: SET status_code = 'APPROVED',
2304: claim_minor_version = NULL,
2305: object_version_number = object_version_number + 1,
2306: last_update_date = sysdate,
2307: last_updated_by = fnd_global.user_id
2308: WHERE batch_id = l_batch_id;
2309:
2310: --Mark all rows as processed
2311: UPDATE ozf_sd_batch_lines_int_all

Line 2314: last_updated_by = fnd_global.user_id

2310: --Mark all rows as processed
2311: UPDATE ozf_sd_batch_lines_int_all
2312: SET processed_flag = 'Y',
2313: last_update_date = sysdate,
2314: last_updated_by = fnd_global.user_id
2315: WHERE ship_frm_sd_claim_request_id = p_batch_number
2316: AND processed_flag = 'N';
2317:
2318: PROCESS_COMP_APPR_BATCH(l_batch_id, x_return_status, x_msg_data);

Line 2336: last_updated_by = fnd_global.user_id

2332: SET status_code = 'WIP',
2333: object_version_number = object_version_number + 1,
2334: claim_minor_version = l_claim_minor_version + 1,
2335: last_update_date = sysdate,
2336: last_updated_by = fnd_global.user_id
2337: WHERE batch_id = l_batch_id;
2338:
2339: --Mark all rows as processed
2340: UPDATE ozf_sd_batch_lines_int_all

Line 2343: last_updated_by = fnd_global.user_id

2339: --Mark all rows as processed
2340: UPDATE ozf_sd_batch_lines_int_all
2341: SET processed_flag = 'Y',
2342: last_update_date = sysdate,
2343: last_updated_by = fnd_global.user_id
2344: WHERE ship_frm_sd_claim_request_id = p_batch_number
2345: AND processed_flag = 'N';
2346:
2347: COMMIT;

Line 2501: last_updated_by = fnd_global.user_id

2497: UPDATE ozf_sd_batch_lines_all
2498: SET batch_id = l_new_batch_id,
2499: object_version_number = object_version_number + 1,
2500: last_update_date = sysdate,
2501: last_updated_by = fnd_global.user_id
2502: WHERE batch_id = p_batch_id
2503: AND status_code = 'APPROVED'
2504: AND purge_flag <> 'Y';
2505: END IF; -- Approved lines

Line 2608: last_updated_by = fnd_global.user_id

2604: ELSE total_approved_qty
2605: END,
2606: object_version_number = object_version_number + 1,
2607: last_update_date = sysdate,
2608: last_updated_by = fnd_global.user_id
2609:
2610: WHERE batch_id = p_batch_id
2611: AND batch_line_id = p_batch_comp_appr_lines_tbl(i)
2612: AND purge_flag <> 'Y';

Line 3111: last_updated_by = fnd_global.user_id,

3107: '%',ROUND((100 - ((NVL(approved_amount,agreement_price)/NVL(list_price,1)) *100)),2),discount_value),
3108: agreement_price = decode(discount_type,'%',NVL(approved_amount,agreement_price),'NEWPRICE',NVL(approved_amount,agreement_price),agreement_price),
3109: object_version_number = object_version_number + 1,
3110: last_update_date = sysdate,
3111: last_updated_by = fnd_global.user_id,
3112: total_approved_qty = CASE WHEN total_approved_amt IS NOT NULL AND total_approved_qty IS NULL THEN NVL(l_batch_line_tbl_rec.quantity_approved,l_batch_line_tbl_rec.quantity_shipped)
3113: ELSE total_approved_qty
3114: END
3115: WHERE batch_id = p_batch_id

Line 3208: last_updated_by = fnd_global.user_id

3204: UPDATE ozf_sd_batch_lines_all
3205: SET batch_id = l_new_batch_id,
3206: object_version_number = object_version_number + 1,
3207: last_update_date = sysdate,
3208: last_updated_by = fnd_global.user_id
3209: WHERE batch_id = p_batch_id
3210: AND status_code = 'APPROVED'
3211: AND purge_flag <> 'Y';
3212:

Line 3282: last_updated_by = fnd_global.user_id,

3278: UPDATE ozf_sd_batch_headers_all
3279: SET status_code = 'CLOSED',
3280: claim_id = l_claim_id,
3281: last_update_date = sysdate,
3282: last_updated_by = fnd_global.user_id,
3283: object_version_number = object_version_number + 1
3284: WHERE batch_id = l_new_batch_id;
3285: ELSE
3286: ROLLBACK TO BEF_INVOKE_CLM_CHILD_BATCH;

Line 3290: last_updated_by = fnd_global.user_id,

3286: ROLLBACK TO BEF_INVOKE_CLM_CHILD_BATCH;
3287: UPDATE ozf_sd_batch_headers_all
3288: SET status_code = 'PENDING_CLAIM',
3289: last_update_date = sysdate,
3290: last_updated_by = fnd_global.user_id,
3291: object_version_number = object_version_number + 1
3292: WHERE batch_id = l_new_batch_id;
3293: END IF; -- If adjustment is successful
3294:

Line 3300: last_updated_by = fnd_global.user_id,

3296: ROLLBACK TO BEF_INVOKE_CLM_CHILD_BATCH;
3297: UPDATE ozf_sd_batch_headers_all
3298: SET status_code = 'PENDING_CLAIM',
3299: last_update_date = sysdate,
3300: last_updated_by = fnd_global.user_id,
3301: object_version_number = object_version_number + 1
3302: WHERE batch_id = l_new_batch_id;
3303: END IF; -- If claim is successful
3304:

Line 3409: last_updated_by = fnd_global.user_id,

3405: UPDATE ozf_sd_batch_headers_all
3406: SET status_code = 'CLOSED',
3407: claim_id = l_claim_id,
3408: last_update_date = sysdate,
3409: last_updated_by = fnd_global.user_id,
3410: object_version_number = object_version_number + 1
3411: WHERE batch_id = p_batch_id;
3412: ELSE -- If adjustment is not successful
3413: ROLLBACK TO BEFORE_INVOKING_CLAIM;

Line 3417: last_updated_by = fnd_global.user_id,

3413: ROLLBACK TO BEFORE_INVOKING_CLAIM;
3414: UPDATE ozf_sd_batch_headers_all
3415: SET status_code = 'PENDING_CLAIM',
3416: last_update_date = sysdate,
3417: last_updated_by = fnd_global.user_id,
3418: object_version_number = object_version_number + 1
3419: WHERE batch_id = p_batch_id;
3420: END IF; -- If adjustment is successful
3421:

Line 3428: last_updated_by = fnd_global.user_id,

3424: ROLLBACK TO BEFORE_INVOKING_CLAIM;
3425: UPDATE ozf_sd_batch_headers_all
3426: SET status_code = 'PENDING_CLAIM',
3427: last_update_date = sysdate,
3428: last_updated_by = fnd_global.user_id,
3429: object_version_number = object_version_number + 1
3430: WHERE batch_id = p_batch_id;
3431:
3432: END IF; -- If claim is successful

Line 3556: fnd_global.user_id,

3552: l_disputes(i),
3553: NULL, --review flag
3554: sysdate,
3555: sysdate,
3556: fnd_global.user_id,
3557: fnd_global.conc_request_id,
3558: fnd_global.user_id,
3559: NULL, --created from
3560: fnd_global.conc_login_id,

Line 3557: fnd_global.conc_request_id,

3553: NULL, --review flag
3554: sysdate,
3555: sysdate,
3556: fnd_global.user_id,
3557: fnd_global.conc_request_id,
3558: fnd_global.user_id,
3559: NULL, --created from
3560: fnd_global.conc_login_id,
3561: fnd_global.prog_appl_id, --l_program_application_id,

Line 3558: fnd_global.user_id,

3554: sysdate,
3555: sysdate,
3556: fnd_global.user_id,
3557: fnd_global.conc_request_id,
3558: fnd_global.user_id,
3559: NULL, --created from
3560: fnd_global.conc_login_id,
3561: fnd_global.prog_appl_id, --l_program_application_id,
3562: NULL, --l_program_update_date,

Line 3560: fnd_global.conc_login_id,

3556: fnd_global.user_id,
3557: fnd_global.conc_request_id,
3558: fnd_global.user_id,
3559: NULL, --created from
3560: fnd_global.conc_login_id,
3561: fnd_global.prog_appl_id, --l_program_application_id,
3562: NULL, --l_program_update_date,
3563: fnd_global.conc_program_id, -- p_Operating_Unit,
3564: fnd_global.security_group_id);

Line 3561: fnd_global.prog_appl_id, --l_program_application_id,

3557: fnd_global.conc_request_id,
3558: fnd_global.user_id,
3559: NULL, --created from
3560: fnd_global.conc_login_id,
3561: fnd_global.prog_appl_id, --l_program_application_id,
3562: NULL, --l_program_update_date,
3563: fnd_global.conc_program_id, -- p_Operating_Unit,
3564: fnd_global.security_group_id);
3565: END LOOP;

Line 3563: fnd_global.conc_program_id, -- p_Operating_Unit,

3559: NULL, --created from
3560: fnd_global.conc_login_id,
3561: fnd_global.prog_appl_id, --l_program_application_id,
3562: NULL, --l_program_update_date,
3563: fnd_global.conc_program_id, -- p_Operating_Unit,
3564: fnd_global.security_group_id);
3565: END LOOP;
3566: END LOOP;
3567: ozf_utility_pvt.debug_message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'OZF_SD_BATCH_FEED_PVT::update_dispute_data',

Line 3564: fnd_global.security_group_id);

3560: fnd_global.conc_login_id,
3561: fnd_global.prog_appl_id, --l_program_application_id,
3562: NULL, --l_program_update_date,
3563: fnd_global.conc_program_id, -- p_Operating_Unit,
3564: fnd_global.security_group_id);
3565: END LOOP;
3566: END LOOP;
3567: ozf_utility_pvt.debug_message(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW, 'OZF_SD_BATCH_FEED_PVT::update_dispute_data',
3568: 'Procedure Ends');