281: );
282: END IF;
283:
284: retcode := 1;
285: fnd_message.set_name('WMS', 'WMS_LMS_PURGE_HIST_SUCCESS');
286: l_message := fnd_message.get;
287: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL',l_message);
288:
289: ELSE
282: END IF;
283:
284: retcode := 1;
285: fnd_message.set_name('WMS', 'WMS_LMS_PURGE_HIST_SUCCESS');
286: l_message := fnd_message.get;
287: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL',l_message);
288:
289: ELSE
290:
294: );
295: END IF;
296:
297: retcode := 2;
298: fnd_message.set_name('WMS', 'WMS_LMS_REQ_PARAM_NULL');
299: l_message := fnd_message.get;
300: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
301: END IF;
302:
295: END IF;
296:
297: retcode := 2;
298: fnd_message.set_name('WMS', 'WMS_LMS_REQ_PARAM_NULL');
299: l_message := fnd_message.get;
300: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
301: END IF;
302:
303:
309: );
310: END IF;
311: ROLLBACK TO purge_lms_history;
312: retcode := 2;
313: fnd_message.set_name('WMS', 'WMS_LMS_PURGE_HIST_ERROR');
314: l_message := fnd_message.get;
315: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
316:
317: END PURGE_LMS_SETUP_HISTORY;
310: END IF;
311: ROLLBACK TO purge_lms_history;
312: retcode := 2;
313: fnd_message.set_name('WMS', 'WMS_LMS_PURGE_HIST_ERROR');
314: l_message := fnd_message.get;
315: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
316:
317: END PURGE_LMS_SETUP_HISTORY;
318:
459: );
460: END IF;
461:
462: retcode := 1;
463: fnd_message.set_name('WMS', 'WMS_LMS_PURGE_TXNS_SUCCESS');
464: l_message := fnd_message.get;
465: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL',l_message);
466:
467: ELSE -- call to bucket actual timings is not a success
460: END IF;
461:
462: retcode := 1;
463: fnd_message.set_name('WMS', 'WMS_LMS_PURGE_TXNS_SUCCESS');
464: l_message := fnd_message.get;
465: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL',l_message);
466:
467: ELSE -- call to bucket actual timings is not a success
468:
472: );
473: END IF;
474:
475: retcode := 2;
476: fnd_message.set_name('WMS', 'WMS_LMS_PURGE_TXNS_ERROR');
477: l_message := fnd_message.get;
478: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
479:
480: ROLLBACK TO purge_lms_txns;
473: END IF;
474:
475: retcode := 2;
476: fnd_message.set_name('WMS', 'WMS_LMS_PURGE_TXNS_ERROR');
477: l_message := fnd_message.get;
478: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
479:
480: ROLLBACK TO purge_lms_txns;
481:
490: );
491: END IF;
492:
493: retcode := 2;
494: fnd_message.set_name('WMS', 'WMS_LMS_REQ_PARAM_NULL');
495: l_message := fnd_message.get;
496: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
497:
498: END IF; -- when required parameters passed
491: END IF;
492:
493: retcode := 2;
494: fnd_message.set_name('WMS', 'WMS_LMS_REQ_PARAM_NULL');
495: l_message := fnd_message.get;
496: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
497:
498: END IF; -- when required parameters passed
499:
506: );
507: END IF;
508: ROLLBACK TO purge_lms_txns;
509: retcode := 2;
510: fnd_message.set_name('WMS', 'WMS_LMS_PURGE_TXNS_ERROR');
511: l_message := fnd_message.get;
512: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
513:
514: END PURGE_LMS_TRANSACTIONS;
507: END IF;
508: ROLLBACK TO purge_lms_txns;
509: retcode := 2;
510: fnd_message.set_name('WMS', 'WMS_LMS_PURGE_TXNS_ERROR');
511: l_message := fnd_message.get;
512: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
513:
514: END PURGE_LMS_TRANSACTIONS;
515:
818:
819:
820: IF l_error = 0 THEN
821: retcode := 1;
822: fnd_message.set_name('WMS', 'WMS_LMS_COPY_TIMINGS_SUCCESS');
823: l_message := fnd_message.get;
824: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL',l_message);
825:
826: ELSIF l_error =2 THEN
819:
820: IF l_error = 0 THEN
821: retcode := 1;
822: fnd_message.set_name('WMS', 'WMS_LMS_COPY_TIMINGS_SUCCESS');
823: l_message := fnd_message.get;
824: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL',l_message);
825:
826: ELSIF l_error =2 THEN
827: retcode := 2;
824: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL',l_message);
825:
826: ELSIF l_error =2 THEN
827: retcode := 2;
828: fnd_message.set_name('WMS', 'WMS_LMS_COPY_TIMINGS_ERROR');
829: l_message := fnd_message.get;
830: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
831:
832: ELSE
825:
826: ELSIF l_error =2 THEN
827: retcode := 2;
828: fnd_message.set_name('WMS', 'WMS_LMS_COPY_TIMINGS_ERROR');
829: l_message := fnd_message.get;
830: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
831:
832: ELSE
833: retcode := 3;
830: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
831:
832: ELSE
833: retcode := 3;
834: fnd_message.set_name('WMS', 'WMS_LMS_COPY_TIMINGS_WARN');
835: l_message := fnd_message.get;
836: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('WARN',l_message);
837: END IF;
838:
831:
832: ELSE
833: retcode := 3;
834: fnd_message.set_name('WMS', 'WMS_LMS_COPY_TIMINGS_WARN');
835: l_message := fnd_message.get;
836: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('WARN',l_message);
837: END IF;
838:
839:
845: ,'COPY_ACTUAL_TIMINGS');
846: END IF;
847:
848: retcode := 2;
849: fnd_message.set_name('WMS', 'WMS_LMS_COPY_TIMINGS_ERROR');
850: l_message := fnd_message.get;
851: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
852:
853: END COPY_ACTUAL_TIMINGS;
846: END IF;
847:
848: retcode := 2;
849: fnd_message.set_name('WMS', 'WMS_LMS_COPY_TIMINGS_ERROR');
850: l_message := fnd_message.get;
851: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
852:
853: END COPY_ACTUAL_TIMINGS;
854:
914: debug('The value of time frame id is NULL Cant Proceed','CALCULATE_ACTUAL_TIMINGS');
915: END IF;
916:
917: retcode := 2;
918: fnd_message.set_name('WMS', 'WMS_LMS_TIME_FRAME_NULL');
919: l_message := fnd_message.get;
920: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
921: RETURN;
922: END;
915: END IF;
916:
917: retcode := 2;
918: fnd_message.set_name('WMS', 'WMS_LMS_TIME_FRAME_NULL');
919: l_message := fnd_message.get;
920: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
921: RETURN;
922: END;
923:
1007: debug('Calculate actual timings is a success','CALCULATE_ACTUAL_TIMINGS');
1008: END IF;
1009:
1010: retcode := 1;
1011: fnd_message.set_name('WMS', 'WMS_LMS_CAL_ACTUALS_SUCCESS');
1012: l_message := fnd_message.get;
1013: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL',l_message);
1014:
1015: ELSE -- if org id is not passed
1008: END IF;
1009:
1010: retcode := 1;
1011: fnd_message.set_name('WMS', 'WMS_LMS_CAL_ACTUALS_SUCCESS');
1012: l_message := fnd_message.get;
1013: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL',l_message);
1014:
1015: ELSE -- if org id is not passed
1016:
1018: debug('No org Id passed so error out','CALCULATE_ACTUAL_TIMINGS');
1019: END IF;
1020:
1021: retcode := 2;
1022: fnd_message.set_name('WMS', 'WMS_LMS_REQ_PARAM_NULL');
1023: l_message := fnd_message.get;
1024: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
1025:
1026: END IF;
1019: END IF;
1020:
1021: retcode := 2;
1022: fnd_message.set_name('WMS', 'WMS_LMS_REQ_PARAM_NULL');
1023: l_message := fnd_message.get;
1024: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
1025:
1026: END IF;
1027:
1034: debug('Exception has occured','CALCULATE_ACTUAL_TIMINGS');
1035: END IF;
1036:
1037: retcode := 2;
1038: fnd_message.set_name('WMS', 'WMS_LMS_CAL_ACTUALS_ERROR');
1039: l_message := fnd_message.get;
1040: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
1041:
1042: --close the cursor if it is open
1035: END IF;
1036:
1037: retcode := 2;
1038: fnd_message.set_name('WMS', 'WMS_LMS_CAL_ACTUALS_ERROR');
1039: l_message := fnd_message.get;
1040: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
1041:
1042: --close the cursor if it is open
1043:
1136: debug('Data period Unit from lookup = '|| l_meaning,'get_parameter_string');
1137: END IF;
1138:
1139:
1140: FND_MESSAGE.SET_NAME('WMS', 'WMS_LMS_REPORT_PARAMS');
1141: FND_MESSAGE.SET_TOKEN('TOKEN1',l_argument3);
1142: FND_MESSAGE.SET_TOKEN('TOKEN2',l_meaning);
1143: FND_MESSAGE.SET_TOKEN('TOKEN3',l_argument4);
1144: FND_MESSAGE.SET_TOKEN('TOKEN4',l_argument5);
1137: END IF;
1138:
1139:
1140: FND_MESSAGE.SET_NAME('WMS', 'WMS_LMS_REPORT_PARAMS');
1141: FND_MESSAGE.SET_TOKEN('TOKEN1',l_argument3);
1142: FND_MESSAGE.SET_TOKEN('TOKEN2',l_meaning);
1143: FND_MESSAGE.SET_TOKEN('TOKEN3',l_argument4);
1144: FND_MESSAGE.SET_TOKEN('TOKEN4',l_argument5);
1145:
1138:
1139:
1140: FND_MESSAGE.SET_NAME('WMS', 'WMS_LMS_REPORT_PARAMS');
1141: FND_MESSAGE.SET_TOKEN('TOKEN1',l_argument3);
1142: FND_MESSAGE.SET_TOKEN('TOKEN2',l_meaning);
1143: FND_MESSAGE.SET_TOKEN('TOKEN3',l_argument4);
1144: FND_MESSAGE.SET_TOKEN('TOKEN4',l_argument5);
1145:
1146: l_message_text := FND_MESSAGE.GET;
1139:
1140: FND_MESSAGE.SET_NAME('WMS', 'WMS_LMS_REPORT_PARAMS');
1141: FND_MESSAGE.SET_TOKEN('TOKEN1',l_argument3);
1142: FND_MESSAGE.SET_TOKEN('TOKEN2',l_meaning);
1143: FND_MESSAGE.SET_TOKEN('TOKEN3',l_argument4);
1144: FND_MESSAGE.SET_TOKEN('TOKEN4',l_argument5);
1145:
1146: l_message_text := FND_MESSAGE.GET;
1147:
1140: FND_MESSAGE.SET_NAME('WMS', 'WMS_LMS_REPORT_PARAMS');
1141: FND_MESSAGE.SET_TOKEN('TOKEN1',l_argument3);
1142: FND_MESSAGE.SET_TOKEN('TOKEN2',l_meaning);
1143: FND_MESSAGE.SET_TOKEN('TOKEN3',l_argument4);
1144: FND_MESSAGE.SET_TOKEN('TOKEN4',l_argument5);
1145:
1146: l_message_text := FND_MESSAGE.GET;
1147:
1148: IF g_debug=1 THEN
1142: FND_MESSAGE.SET_TOKEN('TOKEN2',l_meaning);
1143: FND_MESSAGE.SET_TOKEN('TOKEN3',l_argument4);
1144: FND_MESSAGE.SET_TOKEN('TOKEN4',l_argument5);
1145:
1146: l_message_text := FND_MESSAGE.GET;
1147:
1148: IF g_debug=1 THEN
1149: debug('Final Message text = '|| l_message_text,'get_parameter_string');
1150: END IF;
1185: and STATUS_CODE IN ( 'I','Q')
1186: and argument1 = to_char(p_org_id);
1187:
1188: IF ( l_next_scheduled_date IS NULL) THEN
1189: FND_MESSAGE.SET_NAME('WMS', 'WMS_LMS_NOT_SCHEDULED');
1190:
1191: l_message := FND_MESSAGE.GET;
1192:
1193: RETURN l_message;
1187:
1188: IF ( l_next_scheduled_date IS NULL) THEN
1189: FND_MESSAGE.SET_NAME('WMS', 'WMS_LMS_NOT_SCHEDULED');
1190:
1191: l_message := FND_MESSAGE.GET;
1192:
1193: RETURN l_message;
1194:
1195: END IF;
1249:
1250: EXCEPTION
1251: WHEN NO_DATA_FOUND THEN
1252:
1253: FND_MESSAGE.SET_NAME('WMS', 'WMS_LMS_NOT_RUN');
1254: l_message:= FND_MESSAGE.GET;
1255: RETURN l_message;
1256:
1257: END last_run_time;
1250: EXCEPTION
1251: WHEN NO_DATA_FOUND THEN
1252:
1253: FND_MESSAGE.SET_NAME('WMS', 'WMS_LMS_NOT_RUN');
1254: l_message:= FND_MESSAGE.GET;
1255: RETURN l_message;
1256:
1257: END last_run_time;
1258:
1295:
1296: EXCEPTION
1297: WHEN NO_DATA_FOUND THEN
1298:
1299: FND_MESSAGE.SET_NAME('WMS', 'WMS_LMS_NOT_RUN');
1300: l_message:= FND_MESSAGE.GET;
1301: RETURN l_message;
1302:
1303: END last_run_time_success;
1296: EXCEPTION
1297: WHEN NO_DATA_FOUND THEN
1298:
1299: FND_MESSAGE.SET_NAME('WMS', 'WMS_LMS_NOT_RUN');
1300: l_message:= FND_MESSAGE.GET;
1301: RETURN l_message;
1302:
1303: END last_run_time_success;
1304:
1332:
1333: EXCEPTION
1334: WHEN NO_DATA_FOUND THEN
1335:
1336: FND_MESSAGE.SET_NAME('WMS', 'WMS_LMS_NOT_RUN');
1337: l_last_run_status := FND_MESSAGE.GET;
1338: RETURN l_last_run_status;
1339:
1340: END last_run_status;
1333: EXCEPTION
1334: WHEN NO_DATA_FOUND THEN
1335:
1336: FND_MESSAGE.SET_NAME('WMS', 'WMS_LMS_NOT_RUN');
1337: l_last_run_status := FND_MESSAGE.GET;
1338: RETURN l_last_run_status;
1339:
1340: END last_run_status;
1341:
1535:
1536: -- Check if all required parameters are passed
1537:
1538: IF P_COPY_ID IS NULL THEN
1539: -- FND_MESSAGE.SET_NAME('WMS','WMS_NO_LINES_TO_COPY');
1540: -- FND_MSG_PUB.ADD;
1541: X_MSG_NAME := 'WMS_NO_LINES_SELECTED';
1542: X_RETURN_STATUS:=FND_API.G_RET_STS_ERROR;
1543: RETURN ;
1543: RETURN ;
1544: END IF;
1545:
1546: IF P_COPY_ANALYSIS IS NULL THEN
1547: -- FND_MESSAGE.SET_NAME('WMS','WMS_NO_LINES_TO_COPY');
1548: -- FND_MSG_PUB.ADD;
1549: X_MSG_NAME := 'WMS_NO_LINES_SELECTED';
1550: X_RETURN_STATUS:=FND_API.G_RET_STS_ERROR;
1551: RETURN ;
1577: IF g_debug=1 THEN
1578: debug('No Organization Specified','STANDARDIZE_LINES');
1579: END IF;
1580:
1581: -- FND_MESSAGE.SET_NAME('WMS','WMS_LMS_NO_ORG');
1582: -- FND_MSG_PUB.ADD;
1583: X_MSG_NAME := 'WMS_LMS_NO_ORG';
1584: X_RETURN_STATUS:=FND_API.G_RET_STS_ERROR;
1585: RETURN ;
2423:
2424: --- Dont PROCEED;return error from here itself;
2425: ROLLBACK TO standardize_lines_cp;
2426: retcode := 2;
2427: fnd_message.set_name('WMS', 'WMS_LMS_STANDARDIZE_ERROR');
2428: l_message := fnd_message.get;
2429: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
2430: RETURN;
2431:
2424: --- Dont PROCEED;return error from here itself;
2425: ROLLBACK TO standardize_lines_cp;
2426: retcode := 2;
2427: fnd_message.set_name('WMS', 'WMS_LMS_STANDARDIZE_ERROR');
2428: l_message := fnd_message.get;
2429: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
2430: RETURN;
2431:
2432: END IF;
2477:
2478: ROLLBACK TO standardize_lines_cp;
2479:
2480: retcode := 2;
2481: fnd_message.set_name('WMS', 'WMS_STANDARDIZE_LINES_ERROR');
2482: l_message := fnd_message.get;
2483: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
2484: RETURN;
2485:
2478: ROLLBACK TO standardize_lines_cp;
2479:
2480: retcode := 2;
2481: fnd_message.set_name('WMS', 'WMS_STANDARDIZE_LINES_ERROR');
2482: l_message := fnd_message.get;
2483: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
2484: RETURN;
2485:
2486: END;
2607:
2608: ROLLBACK TO standardize_lines_cp;
2609:
2610: retcode := 2;
2611: fnd_message.set_name('WMS', 'WMS_STANDARDIZE_LINES_ERROR');
2612: l_message := fnd_message.get;
2613: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
2614: RETURN;
2615:
2608: ROLLBACK TO standardize_lines_cp;
2609:
2610: retcode := 2;
2611: fnd_message.set_name('WMS', 'WMS_STANDARDIZE_LINES_ERROR');
2612: l_message := fnd_message.get;
2613: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
2614: RETURN;
2615:
2616: END;
2657:
2658: ROLLBACK TO standardize_lines_cp;
2659:
2660: retcode := 2;
2661: fnd_message.set_name('WMS', 'WMS_STANDARDIZE_LINES_ERROR');
2662: l_message := fnd_message.get;
2663: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
2664: RETURN;
2665:
2658: ROLLBACK TO standardize_lines_cp;
2659:
2660: retcode := 2;
2661: fnd_message.set_name('WMS', 'WMS_STANDARDIZE_LINES_ERROR');
2662: l_message := fnd_message.get;
2663: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
2664: RETURN;
2665:
2666:
2682: IF ( l_num_sql_failed = 0 )THEN
2683: -- every thing is done so the concurrent program has finished normal
2684: COMMIT;
2685: retcode := 1;
2686: fnd_message.set_name('WMS', 'WMS_STANDARDIZE_LINES_SUCCESS');
2687: l_message := fnd_message.get;
2688: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL',l_message);
2689:
2690: ELSE
2683: -- every thing is done so the concurrent program has finished normal
2684: COMMIT;
2685: retcode := 1;
2686: fnd_message.set_name('WMS', 'WMS_STANDARDIZE_LINES_SUCCESS');
2687: l_message := fnd_message.get;
2688: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL',l_message);
2689:
2690: ELSE
2691:
2690: ELSE
2691:
2692: COMMIT;
2693: retcode := 3;
2694: fnd_message.set_name('WMS', 'WMS_STANDARDIZE_LINES_WARN');
2695: l_message := fnd_message.get;
2696: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('WARNING',l_message);
2697:
2698: END IF;
2691:
2692: COMMIT;
2693: retcode := 3;
2694: fnd_message.set_name('WMS', 'WMS_STANDARDIZE_LINES_WARN');
2695: l_message := fnd_message.get;
2696: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('WARNING',l_message);
2697:
2698: END IF;
2699:
2705: );
2706: END IF;
2707:
2708: retcode := 2;
2709: fnd_message.set_name('WMS', 'WMS_LMS_REQ_PARAM_NULL');
2710: l_message := fnd_message.get;
2711: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
2712:
2713: END IF; -- when required parameters passed
2706: END IF;
2707:
2708: retcode := 2;
2709: fnd_message.set_name('WMS', 'WMS_LMS_REQ_PARAM_NULL');
2710: l_message := fnd_message.get;
2711: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
2712:
2713: END IF; -- when required parameters passed
2714:
2723: -- roll back to savepoint and return
2724: ROLLBACK TO standardize_lines_cp;
2725:
2726: retcode := 2;
2727: fnd_message.set_name('WMS', 'WMS_STANDARDIZE_LINES_ERROR');
2728: l_message := fnd_message.get;
2729: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
2730:
2731: END STANDARDIZE_LINES_CP;
2724: ROLLBACK TO standardize_lines_cp;
2725:
2726: retcode := 2;
2727: fnd_message.set_name('WMS', 'WMS_STANDARDIZE_LINES_ERROR');
2728: l_message := fnd_message.get;
2729: l_ret := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',l_message);
2730:
2731: END STANDARDIZE_LINES_CP;
2732: