DBA Data[Home] [Help]

APPS.EAM_WO_PROCESSOR dependencies on FND_FILE

Line 71: FND_FILE.PUT_LINE(FND_FILE.LOG,'Setting debug to Y');

67: p_org_id in number) is
68: begin
69: G_DEBUG := FND_PROFILE.VALUE('MRP_DEBUG') = 'Y';
70: if G_DEBUG then
71: FND_FILE.PUT_LINE(FND_FILE.LOG,'Setting debug to Y');
72: else
73: FND_FILE.PUT_LINE(FND_FILE.LOG,'Setting debug to N');
74: end if;
75:

Line 73: FND_FILE.PUT_LINE(FND_FILE.LOG,'Setting debug to N');

69: G_DEBUG := FND_PROFILE.VALUE('MRP_DEBUG') = 'Y';
70: if G_DEBUG then
71: FND_FILE.PUT_LINE(FND_FILE.LOG,'Setting debug to Y');
72: else
73: FND_FILE.PUT_LINE(FND_FILE.LOG,'Setting debug to N');
74: end if;
75:
76: if (p_wip_entity_id <> -1 and p_status_type <> -1) then
77: wo_schedule(errbuf,retcode,p_wip_entity_id,p_status_type,p_org_id);

Line 98: FND_FILE.PUT_LINE(FND_FILE.LOG,'Processing for work order : '||p_wip_entity_id);

94: p_org_id in number) is
95: l_request_id number;
96: begin
97: if G_DEBUG then
98: FND_FILE.PUT_LINE(FND_FILE.LOG,'Processing for work order : '||p_wip_entity_id);
99: end if;
100:
101: -- Validate the work order status
102: if (not validate(p_wip_entity_id,p_org_id,p_status_type)) then

Line 109: FND_FILE.PUT_LINE(FND_FILE.LOG,'Completes Validation');

105: errbuf := fnd_message.get;
106: return;
107: end if;
108: if G_DEBUG then
109: FND_FILE.PUT_LINE(FND_FILE.LOG,'Completes Validation');
110: end if;
111:
112: -- Call WPS engine
113: l_request_id := finite_scheduler(p_wip_entity_id,p_org_id);

Line 121: FND_FILE.PUT_LINE(FND_FILE.LOG,'Request ID for WPS : '||l_request_id);

117: errbuf := fnd_message.get;
118: return;
119: end if;
120: if G_DEBUG then
121: FND_FILE.PUT_LINE(FND_FILE.LOG,'Request ID for WPS : '||l_request_id);
122: FND_FILE.PUT_LINE(FND_FILE.LOG,'committing...');
123: end if;
124:
125:

Line 122: FND_FILE.PUT_LINE(FND_FILE.LOG,'committing...');

118: return;
119: end if;
120: if G_DEBUG then
121: FND_FILE.PUT_LINE(FND_FILE.LOG,'Request ID for WPS : '||l_request_id);
122: FND_FILE.PUT_LINE(FND_FILE.LOG,'committing...');
123: end if;
124:
125:
126:

Line 131: FND_FILE.PUT_LINE(FND_FILE.LOG,'committed.');

127:
128: commit;
129:
130: if G_DEBUG then
131: FND_FILE.PUT_LINE(FND_FILE.LOG,'committed.');
132: end if;
133:
134: -- Wait until the WPS conc. program finishes
135: wait_conc_program(l_request_id,errbuf,retcode);

Line 138: FND_FILE.PUT_LINE(FND_FILE.LOG,'concurrent program finished.');

134: -- Wait until the WPS conc. program finishes
135: wait_conc_program(l_request_id,errbuf,retcode);
136:
137: if G_DEBUG then
138: FND_FILE.PUT_LINE(FND_FILE.LOG,'concurrent program finished.');
139: end if;
140:
141: if (retcode = G_ERROR) then
142: if G_DEBUG then

Line 143: FND_FILE.PUT_LINE(FND_FILE.LOG,'error.');

139: end if;
140:
141: if (retcode = G_ERROR) then
142: if G_DEBUG then
143: FND_FILE.PUT_LINE(FND_FILE.LOG,'error.');
144: end if;
145: error_status(p_wip_entity_id,p_org_id);
146: errbuf := fnd_message.get;
147: commit;

Line 149: FND_FILE.PUT_LINE(FND_FILE.LOG,'error, committed.');

145: error_status(p_wip_entity_id,p_org_id);
146: errbuf := fnd_message.get;
147: commit;
148: if G_DEBUG then
149: FND_FILE.PUT_LINE(FND_FILE.LOG,'error, committed.');
150: end if;
151: return;
152: end if;
153: if G_DEBUG then

Line 154: FND_FILE.PUT_LINE(FND_FILE.LOG,'WPS finish up successfully');

150: end if;
151: return;
152: end if;
153: if G_DEBUG then
154: FND_FILE.PUT_LINE(FND_FILE.LOG,'WPS finish up successfully');
155: end if;
156:
157: -- Changing the job status after scheduling
158: if (not change_status_type(p_wip_entity_id,p_org_id,p_status_type)) then

Line 165: FND_FILE.PUT_LINE(FND_FILE.LOG,'Processor finishes up successfully');

161: errbuf := fnd_message.get;
162: return;
163: end if;
164: if G_DEBUG then
165: FND_FILE.PUT_LINE(FND_FILE.LOG,'Processor finishes up successfully');
166: end if;
167:
168: commit;
169: end;

Line 184: FND_FILE.PUT_LINE(FND_FILE.LOG,'Processing for multi work order with group id : '||p_group_id);

180: l_err_cnt number;
181: l_dummy boolean;
182: begin
183: if G_DEBUG then
184: FND_FILE.PUT_LINE(FND_FILE.LOG,'Processing for multi work order with group id : '||p_group_id);
185: end if;
186:
187: -- Put the job in the table
188: l_jobs := populate_jobs(p_group_id);

Line 190: FND_FILE.PUT_LINE(FND_FILE.LOG,'Number of work order to be processed : '||l_jobs.count);

186:
187: -- Put the job in the table
188: l_jobs := populate_jobs(p_group_id);
189: if G_DEBUG then
190: FND_FILE.PUT_LINE(FND_FILE.LOG,'Number of work order to be processed : '||l_jobs.count);
191: end if;
192:
193: if (l_jobs.count = 0) then
194: return;

Line 201: FND_FILE.PUT_LINE(FND_FILE.LOG,'Validating work order : '||l_jobs(l_index).wip_entity_id);

197: -- Validate the job
198: l_index := l_jobs.first;
199: loop
200: if G_DEBUG then
201: FND_FILE.PUT_LINE(FND_FILE.LOG,'Validating work order : '||l_jobs(l_index).wip_entity_id);
202: end if;
203: if (not validate(l_jobs(l_index).wip_entity_id,p_org_id,l_jobs(l_index).status_type)) then
204: retcode := G_ERROR;
205: fnd_message.set_name('EAM','EAM_WO_PROC_VALIDATE');

Line 213: FND_FILE.PUT_LINE(FND_FILE.LOG,'Completes validating all work orders');

209: exit when l_index = l_jobs.last;
210: l_index := l_jobs.next(l_index);
211: end loop;
212: if G_DEBUG then
213: FND_FILE.PUT_LINE(FND_FILE.LOG,'Completes validating all work orders');
214: end if;
215:
216:
217: -- Call WIP mass Load

Line 226: FND_FILE.PUT_LINE(FND_FILE.LOG,'Calling Mass Load with request id : '||l_request_id);

222: errbuf := fnd_message.get;
223: return;
224: end if;
225: if G_DEBUG then
226: FND_FILE.PUT_LINE(FND_FILE.LOG,'Calling Mass Load with request id : '||l_request_id);
227: end if;
228:
229: -- Wait until the WIP mass Load conc. program finishes
230: wait_conc_program(l_request_id,errbuf,retcode);

Line 232: FND_FILE.PUT_LINE(FND_FILE.LOG,'Concurrent Program returns with status : '||retcode);

228:
229: -- Wait until the WIP mass Load conc. program finishes
230: wait_conc_program(l_request_id,errbuf,retcode);
231: if G_DEBUG then
232: FND_FILE.PUT_LINE(FND_FILE.LOG,'Concurrent Program returns with status : '||retcode);
233: end if;
234: if (retcode = G_ERROR) then
235: if G_DEBUG then
236: FND_FILE.PUT_LINE(FND_FILE.LOG,'Mass Load completes with error');

Line 236: FND_FILE.PUT_LINE(FND_FILE.LOG,'Mass Load completes with error');

232: FND_FILE.PUT_LINE(FND_FILE.LOG,'Concurrent Program returns with status : '||retcode);
233: end if;
234: if (retcode = G_ERROR) then
235: if G_DEBUG then
236: FND_FILE.PUT_LINE(FND_FILE.LOG,'Mass Load completes with error');
237: end if;
238: errbuf := fnd_message.get;
239: return;
240: end if;

Line 244: FND_FILE.PUT_LINE(FND_FILE.LOG,'Mass Load completes successfully');

240: end if;
241:
242: if (retcode = G_SUCCESS) then
243: if G_DEBUG then
244: FND_FILE.PUT_LINE(FND_FILE.LOG,'Mass Load completes successfully');
245: end if;
246: return;
247: end if;
248:

Line 251: FND_FILE.PUT_LINE(FND_FILE.LOG,'Mass Load completes with warning');

247: end if;
248:
249:
250: if G_DEBUG then
251: FND_FILE.PUT_LINE(FND_FILE.LOG,'Mass Load completes with warning');
252: end if;
253:
254: -- Setting the error
255: l_index := l_jobs.first;

Line 267: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error in work order '||l_jobs(l_index).wip_entity_id);

263:
264: if (l_err_cnt <> 0) then
265: error_status(l_jobs(l_index).wip_entity_id,p_org_id);
266: if G_DEBUG then
267: FND_FILE.PUT_LINE(FND_FILE.LOG,'Error in work order '||l_jobs(l_index).wip_entity_id);
268: end if;
269: end if;
270: exit when l_index = l_jobs.last;
271: l_index := l_jobs.next(l_index);