DBA Data[Home] [Help]

APPS.WSM_JOBCOPIES_PVT dependencies on WSM_JOBCOPIES_PVT

Line 1: PACKAGE BODY WSM_JobCopies_PVT AS

1: PACKAGE BODY WSM_JobCopies_PVT AS
2: /* $Header: WSMVCPYB.pls 120.27.12020000.2 2012/07/11 09:14:48 sisankar ship $ */
3:
4: /*-------------------------------------------------------------+
5: | Name : Get_Job_Curr_Op_Info

Line 107: x_err_buf := 'WSM_JobCopies_PVT.Get_Job_Curr_Op_Info('||l_stmt_num||'): Warning ! No operations in the job';

103: END IF;
104:
105: IF (p_op_seq_num IS NULL) THEN -- Job creation : No records in WO for this p_wip_entity_id
106: x_err_code := -1;
107: x_err_buf := 'WSM_JobCopies_PVT.Get_Job_Curr_Op_Info('||l_stmt_num||'): Warning ! No operations in the job';
108: IF (g_debug = 'Y') THEN
109: fnd_file.put_line(fnd_file.log, x_err_buf);
110: END IF;
111: return;

Line 164: x_err_buf := 'WSM_JobCopies_PVT.Get_Job_Curr_Op_Info('||l_stmt_num||'): '||substrb(sqlerrm,1,1000);

160:
161: EXCEPTION
162: WHEN OTHERS THEN
163: x_err_code := SQLCODE;
164: x_err_buf := 'WSM_JobCopies_PVT.Get_Job_Curr_Op_Info('||l_stmt_num||'): '||substrb(sqlerrm,1,1000);
165: fnd_file.put_line(fnd_file.log, x_err_buf);
166:
167: END Get_Job_Curr_Op_Info;
168:

Line 969: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||x_err_buf);

965: THEN
966: fnd_message.set_name('WSM', 'WSM_INVALID_FIELD');
967: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'Primary Item ID in Job');
968: x_err_buf := fnd_message.get;
969: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||x_err_buf);
970: x_err_code := -2; -- Error
971: return;
972: END IF;
973:

Line 980: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||x_err_buf);

976: THEN
977: fnd_message.set_name('WSM', 'WSM_INVALID_FIELD');
978: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'Routing Item ID in Job');
979: x_err_buf := fnd_message.get;
980: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||x_err_buf);
981: x_err_code := -2; -- Error
982: return;
983: END IF;
984:

Line 991: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||x_err_buf);

987: THEN
988: fnd_message.set_name('WSM', 'WSM_INVALID_FIELD');
989: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'Common Routing Sequence ID in Job');
990: x_err_buf := fnd_message.get;
991: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||x_err_buf);
992: x_err_code := -2; -- Error
993: return;
994: END IF;
995:

Line 1001: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||x_err_buf);

997: THEN
998: fnd_message.set_name('WSM', 'WSM_INVALID_FIELD');
999: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'Routing Revision Date in Job');
1000: x_err_buf := fnd_message.get;
1001: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||x_err_buf);
1002: x_err_code := -2; -- Error
1003: return;
1004: END IF;
1005:

Line 1012: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||x_err_buf);

1008: THEN
1009: fnd_message.set_name('WSM', 'WSM_INVALID_FIELD');
1010: FND_MESSAGE.SET_TOKEN('FLD_NAME', 'Supply Type in Job');
1011: x_err_buf := fnd_message.get;
1012: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||x_err_buf);
1013: x_err_code := -2; -- Error
1014: return;
1015: END IF;
1016: -- End : Basic validations for the input parameters --

Line 1031: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||x_err_buf);

1027: THEN
1028: -- Invalid Infinite Scheduling Mode
1029: fnd_message.set_name('WSM', 'WSM_INVALID_INFSCH_MODE');
1030: x_err_buf := fnd_message.get;
1031: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||x_err_buf);
1032: x_err_code := -2; -- Error
1033: return;
1034: END IF;
1035:

Line 1059: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||

1055: WHERE wip_entity_id = p_wip_entity_id
1056: AND wsm_op_seq_num IS NULL;
1057: EXCEPTION
1058: WHEN OTHERS THEN
1059: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||
1060: '): Cannot upgrade wip_operations.wsm_op_seq_num for wip_entity_id '||p_wip_entity_id);
1061: END;
1062: end if;--check on p_insert_wip
1063: l_stmt_num := 15;

Line 1237: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.process_job_op_nw('||l_stmt_num||'): '||x_err_buf);

1233: IF v_job_ops.count = 0 THEN
1234: -- No valid operations exist for the job
1235: fnd_message.set_name('WSM', 'WSM_NO_VALID_OPS');
1236: x_err_buf := fnd_message.get;
1237: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.process_job_op_nw('||l_stmt_num||'): '||x_err_buf);
1238: x_err_code := -2; -- Error
1239:
1240: return;
1241: END IF;

Line 1369: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.process_job_op_nw('||l_stmt_num||'): '||x_err_buf);

1365:
1366: -- No valid network links exist for the job
1367: fnd_message.set_name('WSM', 'WSM_NO_VALID_NWK_LINKS');
1368: x_err_buf := fnd_message.get;
1369: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.process_job_op_nw('||l_stmt_num||'): '||x_err_buf);
1370: x_err_code := -2; -- Error
1371:
1372: return; -- This should not be commented out, since later it may get overwritten.
1373: -- Fixed bug #3465125

Line 1441: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||x_err_buf);

1437: else
1438: fnd_message.set_name('WSM', 'WSM_NET_START_NOT_EFFECTIVE');
1439: --x_err_buf := fnd_message.get;
1440: x_err_buf := 'l_count is'||to_char(l_start_op_seq_id);
1441: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||x_err_buf);
1442: x_err_code := -1; -- Warning
1443: --Bug 4264364:Added exception handling
1444: INSERT into WSM_LOT_BASED_JOBS
1445: (WIP_ENTITY_ID,

Line 1493: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.process_job_op_nw('||l_stmt_num||'): '||x_err_buf);

1489: else
1490: l_reco_path_seq_num := -1;
1491: fnd_message.set_name('WSM', 'WSM_NET_END_NOT_EFFECTIVE');
1492: x_err_buf := fnd_message.get;
1493: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.process_job_op_nw('||l_stmt_num||'): '||x_err_buf);
1494: x_err_code := -1; -- Warning
1495:
1496: --Bug 4264364:Added exception handling
1497: INSERT into WSM_LOT_BASED_JOBS

Line 1569: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.process_job_op_nw('||l_stmt_num||'): '||x_err_buf);

1565: l_stmt_num := 40.1;
1566: If l_curr_opseq_id <> l_start_op_seq_id or l_reco_path_seq_num = -1 then
1567: fnd_message.set_name('WSM', 'WSM_DISABLED_PRIMARY_PATH');
1568: x_err_buf := fnd_message.get;
1569: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.process_job_op_nw('||l_stmt_num||'): '||x_err_buf);
1570: x_err_code := -1; -- Warning
1571: l_inf_sch_flag := 'N'; -- Do not infinite schedule this job
1572: END IF;
1573:

Line 3932: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||x_err_buf);

3928: IF (SQL%ROWCOUNT = 0) THEN
3929: -- No record created in WSM_LOT_BASED_JOBS
3930: fnd_message.set_name('WSM', 'WSM_NO_WLBJ_REC');
3931: x_err_buf := fnd_message.get;
3932: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||x_err_buf);
3933: x_err_code := -2; -- Error
3934:
3935: return;
3936: ELSE

Line 3998: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||

3994: p_charges_exist => p_charges_exist
3995: );
3996:
3997: IF (g_debug = 'Y') THEN
3998: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||
3999: '): WSM_infinite_scheduler_PVT.schedule returned '||l_inf_sch_returnStatus);
4000: END IF;
4001:
4002: -- Start : We do not need to error if Inf Sch fails, since dates will be calculated while moving --

Line 4038: x_err_buf := 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||') : '||x_err_buf;

4034:
4035:
4036: EXCEPTION
4037: WHEN be_exploder_exception THEN
4038: x_err_buf := 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||') : '||x_err_buf;
4039: fnd_file.put_line(fnd_file.log, x_err_buf);
4040:
4041: WHEN loop_in_bom_exception THEN
4042: x_err_buf := 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||') : '||x_err_buf;

Line 4042: x_err_buf := 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||') : '||x_err_buf;

4038: x_err_buf := 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||') : '||x_err_buf;
4039: fnd_file.put_line(fnd_file.log, x_err_buf);
4040:
4041: WHEN loop_in_bom_exception THEN
4042: x_err_buf := 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||') : '||x_err_buf;
4043: fnd_file.put_line(fnd_file.log, x_err_buf);
4044:
4045: WHEN e_proc_error THEN
4046: x_err_buf := 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||') : '||x_err_buf;

Line 4046: x_err_buf := 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||') : '||x_err_buf;

4042: x_err_buf := 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||') : '||x_err_buf;
4043: fnd_file.put_line(fnd_file.log, x_err_buf);
4044:
4045: WHEN e_proc_error THEN
4046: x_err_buf := 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||') : '||x_err_buf;
4047: fnd_file.put_line(fnd_file.log, x_err_buf);
4048:
4049: --Bug 4264364:Added exception handling
4050: WHEN e_noneff_op THEN

Line 4051: x_err_buf := 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||') : '||x_err_buf;

4047: fnd_file.put_line(fnd_file.log, x_err_buf);
4048:
4049: --Bug 4264364:Added exception handling
4050: WHEN e_noneff_op THEN
4051: x_err_buf := 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||') : '||x_err_buf;
4052: fnd_file.put_line(fnd_file.log, x_err_buf);
4053:
4054: WHEN others THEN
4055: x_err_code := SQLCODE;

Line 4056: x_err_buf := 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||substrb(sqlerrm,1,1000);

4052: fnd_file.put_line(fnd_file.log, x_err_buf);
4053:
4054: WHEN others THEN
4055: x_err_code := SQLCODE;
4056: x_err_buf := 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): '||substrb(sqlerrm,1,1000);
4057: fnd_file.put_line(fnd_file.log, x_err_buf);
4058:
4059: END Create_JobCopies;
4060:

Line 4150: x_err_buf := 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): Invalid Infinite Scheduling Mode';

4146: )
4147: )
4148: THEN
4149: x_err_code := -1;
4150: x_err_buf := 'WSM_JobCopies_PVT.Create_JobCopies('||l_stmt_num||'): Invalid Infinite Scheduling Mode';
4151: fnd_file.put_line(fnd_file.log, x_err_buf);
4152: return;
4153: END IF;
4154:

Line 4925: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_RepJobCopies('||l_stmt_num||'): '||

4921: IF (x_err_code = -1) -- No WO records
4922: OR (x_err_code = -2) -- Invalid job
4923: OR (x_err_code <> 0) -- Some other error
4924: THEN
4925: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_RepJobCopies('||l_stmt_num||'): '||
4926: 'Get_Job_Curr_Op_Info returned '||x_err_code);
4927: fnd_file.put_line(fnd_file.log, 'Get_Job_Curr_Op_Info returned l_curr_op_seq_num='||l_curr_op_seq_num);
4928: return;
4929: END IF;

Line 4965: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_RepJobCopies('||l_stmt_num||

4961: );
4962:
4963:
4964: IF (g_debug = 'Y') THEN
4965: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Create_RepJobCopies('||l_stmt_num||
4966: '): WSM_infinite_scheduler_PVT.schedule returned '||l_inf_sch_returnStatus);
4967: END IF;
4968:
4969: -- Start : We do not need to error if Inf Sch fails, since dates will be calculated while moving --

Line 4985: x_err_buf := 'WSM_JobCopies_PVT.Create_RepJobCopies('||l_stmt_num||') : '||x_err_buf;

4981: EXCEPTION
4982:
4983: WHEN e_proc_error THEN
4984: -- x_err_code := SQLCODE;
4985: x_err_buf := 'WSM_JobCopies_PVT.Create_RepJobCopies('||l_stmt_num||') : '||x_err_buf;
4986: fnd_file.put_line(fnd_file.log, x_err_buf);
4987:
4988: WHEN others THEN
4989: x_err_code := SQLCODE;

Line 4990: x_err_buf := 'WSM_JobCopies_PVT.Create_RepJobCopies('||l_stmt_num||'): '||substrb(sqlerrm,1,1000);

4986: fnd_file.put_line(fnd_file.log, x_err_buf);
4987:
4988: WHEN others THEN
4989: x_err_code := SQLCODE;
4990: x_err_buf := 'WSM_JobCopies_PVT.Create_RepJobCopies('||l_stmt_num||'): '||substrb(sqlerrm,1,1000);
4991: fnd_file.put_line(fnd_file.log, x_err_buf);
4992:
4993: END Create_RepJobCopies;
4994:

Line 5133: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Upgrade_JobCopies('||l_stmt_num||

5129:
5130: l_stmt_num := 40;
5131:
5132: IF (to_number(fnd_profile.value('WSM_CREATE_LBJ_COPY_ROUTING')) = 1) THEN
5133: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Upgrade_JobCopies('||l_stmt_num||
5134: '): Value of profile "WSM: Create Lot Based Jobs Copy Routing" is YES.');
5135: fnd_file.put_line(fnd_file.log, 'Oracle Shopfloor Management is already upgraded to create Lot Based Job Copy Routing. Upgrade failed.');
5136: raise e_upg_error;
5137: ELSIF (to_number(fnd_profile.value('WSM_CREATE_LBJ_COPY_ROUTING')) = 2) THEN

Line 5138: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Upgrade_JobCopies('||l_stmt_num||

5134: '): Value of profile "WSM: Create Lot Based Jobs Copy Routing" is YES.');
5135: fnd_file.put_line(fnd_file.log, 'Oracle Shopfloor Management is already upgraded to create Lot Based Job Copy Routing. Upgrade failed.');
5136: raise e_upg_error;
5137: ELSIF (to_number(fnd_profile.value('WSM_CREATE_LBJ_COPY_ROUTING')) = 2) THEN
5138: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Upgrade_JobCopies('||l_stmt_num||
5139: '): Value of profile "WSM: Create Lot Based Jobs Copy Routing" is NO.');
5140: fnd_file.put_line(fnd_file.log, 'Upgrading Lot Based Jobs to Use Copy Routings ...');
5141: ELSE
5142: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Upgrade_JobCopies('||l_stmt_num||

Line 5142: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Upgrade_JobCopies('||l_stmt_num||

5138: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Upgrade_JobCopies('||l_stmt_num||
5139: '): Value of profile "WSM: Create Lot Based Jobs Copy Routing" is NO.');
5140: fnd_file.put_line(fnd_file.log, 'Upgrading Lot Based Jobs to Use Copy Routings ...');
5141: ELSE
5142: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Upgrade_JobCopies('||l_stmt_num||
5143: '): Not able to fetch the value of the profile "WSM: Create Lot Based Jobs Copy Routing".');
5144: raise e_profile_error;
5145: END IF;
5146:

Line 5180: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Upgrade_JobCopies('||l_stmt_num||

5176:
5177: l_curr_rows := upgrade_jobs%rowcount;
5178: CLOSE upgrade_jobs;
5179:
5180: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Upgrade_JobCopies('||l_stmt_num||
5181: '): Number of rows loaded for the current batch: '||l_curr_rows);
5182: IF (l_curr_rows = 0) THEN
5183: exit;
5184: END IF;

Line 5204: WSM_JobCopies_PVT.Create_JobCopies -- Call #1

5200: x_err_buf := NULL;
5201:
5202: l_stmt_num := 60;
5203:
5204: WSM_JobCopies_PVT.Create_JobCopies -- Call #1
5205: (
5206: x_err_buf => x_err_buf,
5207: x_err_code => x_err_code,
5208: p_wip_entity_id => v_job_wip_entity_id (l_counter),

Line 5425: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Upgrade_JobCopies('||l_stmt_num||')'||

5421:
5422: l_stmt_num := 144;
5423: t_err_upgrade_jobs.delete;
5424:
5425: fnd_file.put_line(fnd_file.log, 'WSM_JobCopies_PVT.Upgrade_JobCopies('||l_stmt_num||')'||
5426: 'Please correct the problem and run Refresh Open Jobs Copies for the above '||l_err_ctr||' jobs. ');
5427:
5428: l_stmt_num := 150;
5429:

Line 5448: x_err_buf := 'WSM_JobCopies_PVT.Upgrade_JobCopies('||l_stmt_num||'): '||substrb(sqlerrm,1,1000);

5444: raise_application_error (-20000, 'ERROR at line '||l_stmt_num||': Not able to fetch the value of the profile "WSM: Create Lot Based Jobs Copy Routing"');
5445:
5446: WHEN others THEN
5447: x_err_code := SQLCODE;
5448: x_err_buf := 'WSM_JobCopies_PVT.Upgrade_JobCopies('||l_stmt_num||'): '||substrb(sqlerrm,1,1000);
5449: fnd_file.put_line(fnd_file.log, x_err_buf);
5450:
5451: END Upgrade_JobCopies;
5452:

Line 6036: x_err_buf := 'WSM_JobCopies_PVT.process_wip_info('||l_stmt_num||'): '||substrb(sqlerrm,1,1000);

6032:
6033: exception
6034: WHEN others THEN
6035: x_err_code := SQLCODE;
6036: x_err_buf := 'WSM_JobCopies_PVT.process_wip_info('||l_stmt_num||'): '||substrb(sqlerrm,1,1000);
6037: fnd_file.put_line(fnd_file.log, x_err_buf);
6038: END process_wip_info;
6039:
6040: FUNCTION max_res_seq (p_op_seq_id NUMBER) return NUMBER

Line 6047: END WSM_JobCopies_PVT;

6043: BEGIN
6044: return(v_max_res_seq(p_op_seq_id));
6045: END max_res_seq;
6046:
6047: END WSM_JobCopies_PVT;