eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.WF_CLONE dependencies on WF_CLONE

Line 1: package body WF_CLONE as

1: package body WF_CLONE as
2: /* $Header: wfcloneb.pls 120.1 2005/07/02 03:42:45 appldev noship $ */
3:
4: procedure UpdateAttrValues(WEB_HOST in varchar2,
5: DOMAIN in varchar2,

Line 108: raise_application_error(-20000, 'Error : WF_CLONE.UpdateAttrValues -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);

104: end;
105:
106: exception
107: when others then
108: raise_application_error(-20000, 'Error : WF_CLONE.UpdateAttrValues -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);
109: end;
110:
111:
112:

Line 179: raise_application_error(-20000, 'Error : WF_CLONE.UpdateSysGuid -: Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);

175: exception
176: when others then
177: --Rollback any exception
178: rollback to wf_update_guid;
179: raise_application_error(-20000, 'Error : WF_CLONE.UpdateSysGuid -: Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);
180: end;
181:
182: procedure UpdateMailer(WEB_HOST in varchar2,
183: DOMAIN in varchar2,

Line 218: raise_application_error(-20000, 'Error : WF_CLONE.UpdateMailer -: Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);

214: where parameter = 'REPLYTO';
215:
216: exception
217: when others then
218: raise_application_error(-20000, 'Error : WF_CLONE.UpdateMailer -: Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);
219: end;
220:
221:
222: --This would be called only last in the template as we

Line 249: raise_application_error(-20000, 'Error : WF_CLONE.UpdateResource -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);

245: where name = 'WF_WEB_AGENT';
246:
247: exception
248: when others then
249: raise_application_error(-20000, 'Error : WF_CLONE.UpdateResource -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);
250: end;
251:
252: Function DetermineClone(WEB_HOST in varchar2,
253: DOMAIN in varchar2,

Line 307: wf_clone.UpdateAttrValues(p_web_host,p_domain, p_web_port,p_sid,p_url_proto);

303: P_SID in varchar2,
304: P_URL_PROTO in varchar2)
305: is
306: begin
307: wf_clone.UpdateAttrValues(p_web_host,p_domain, p_web_port,p_sid,p_url_proto);
308: wf_clone.UpdateSysGuid;
309: wf_clone.UpdateMailer(p_web_host, p_domain, p_web_port,p_sid,p_url_proto );
310: wf_clone.UpdateResource(p_web_host,p_domain, p_web_port,p_sid,p_url_proto );
311: exception

Line 308: wf_clone.UpdateSysGuid;

304: P_URL_PROTO in varchar2)
305: is
306: begin
307: wf_clone.UpdateAttrValues(p_web_host,p_domain, p_web_port,p_sid,p_url_proto);
308: wf_clone.UpdateSysGuid;
309: wf_clone.UpdateMailer(p_web_host, p_domain, p_web_port,p_sid,p_url_proto );
310: wf_clone.UpdateResource(p_web_host,p_domain, p_web_port,p_sid,p_url_proto );
311: exception
312: when others then

Line 309: wf_clone.UpdateMailer(p_web_host, p_domain, p_web_port,p_sid,p_url_proto );

305: is
306: begin
307: wf_clone.UpdateAttrValues(p_web_host,p_domain, p_web_port,p_sid,p_url_proto);
308: wf_clone.UpdateSysGuid;
309: wf_clone.UpdateMailer(p_web_host, p_domain, p_web_port,p_sid,p_url_proto );
310: wf_clone.UpdateResource(p_web_host,p_domain, p_web_port,p_sid,p_url_proto );
311: exception
312: when others then
313: raise;

Line 310: wf_clone.UpdateResource(p_web_host,p_domain, p_web_port,p_sid,p_url_proto );

306: begin
307: wf_clone.UpdateAttrValues(p_web_host,p_domain, p_web_port,p_sid,p_url_proto);
308: wf_clone.UpdateSysGuid;
309: wf_clone.UpdateMailer(p_web_host, p_domain, p_web_port,p_sid,p_url_proto );
310: wf_clone.UpdateResource(p_web_host,p_domain, p_web_port,p_sid,p_url_proto );
311: exception
312: when others then
313: raise;
314: end;

Line 350: wf_clone.QDequeue(substr(q_curs.queue_name,instr(q_curs.queue_name,'.')+1),substr(q_curs.queue_name,1,instr(q_curs.queue_name,'.')-1),q_curs.name,true);

346: end;
347:
348: for q_curs in queue_curs loop
349: begin
350: wf_clone.QDequeue(substr(q_curs.queue_name,instr(q_curs.queue_name,'.')+1),substr(q_curs.queue_name,1,instr(q_curs.queue_name,'.')-1),q_curs.name,true);
351: exception
352: when others then
353: null;
354: end;

Line 358: wf_clone.QDequeue('WF_DEFERRED_QUEUE_M',l_owner);

354: end;
355: end loop;
356:
357: --Now clear the background queues
358: wf_clone.QDequeue('WF_DEFERRED_QUEUE_M',l_owner);
359: wf_clone.QDequeue('WF_INBOUND_QUEUE',l_owner);
360: wf_clone.QDequeue('WF_OUTBOUND_QUEUE',l_owner);
361:
362: exception

Line 359: wf_clone.QDequeue('WF_INBOUND_QUEUE',l_owner);

355: end loop;
356:
357: --Now clear the background queues
358: wf_clone.QDequeue('WF_DEFERRED_QUEUE_M',l_owner);
359: wf_clone.QDequeue('WF_INBOUND_QUEUE',l_owner);
360: wf_clone.QDequeue('WF_OUTBOUND_QUEUE',l_owner);
361:
362: exception
363: when others then

Line 360: wf_clone.QDequeue('WF_OUTBOUND_QUEUE',l_owner);

356:
357: --Now clear the background queues
358: wf_clone.QDequeue('WF_DEFERRED_QUEUE_M',l_owner);
359: wf_clone.QDequeue('WF_INBOUND_QUEUE',l_owner);
360: wf_clone.QDequeue('WF_OUTBOUND_QUEUE',l_owner);
361:
362: exception
363: when others then
364: raise_application_error(-20000, 'Error : WF_CLONE.PurgeData -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);

Line 364: raise_application_error(-20000, 'Error : WF_CLONE.PurgeData -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);

360: wf_clone.QDequeue('WF_OUTBOUND_QUEUE',l_owner);
361:
362: exception
363: when others then
364: raise_application_error(-20000, 'Error : WF_CLONE.PurgeData -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);
365: end;
366:
367:
368: --Generic API to trucate runtime data tables

Line 384: raise_application_error(-20000, 'Error : WF_CLONE.TruncateTable -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);

380: when tableNotFound then
381: if (raise_error) then
382: null;
383: else
384: raise_application_error(-20000, 'Error : WF_CLONE.TruncateTable -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);
385: end if;
386: when OTHERS then
387: raise_application_error(-20000, 'Error : WF_CLONE.TruncateTable -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);
388: end;

Line 387: raise_application_error(-20000, 'Error : WF_CLONE.TruncateTable -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);

383: else
384: raise_application_error(-20000, 'Error : WF_CLONE.TruncateTable -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);
385: end if;
386: when OTHERS then
387: raise_application_error(-20000, 'Error : WF_CLONE.TruncateTable -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);
388: end;
389:
390: --Truncate Queue Table
391: PROCEDURE QTableTruncate(QName IN VARCHAR2,

Line 419: raise_application_error(-20000, 'Error : WF_CLONE.TruncateTable -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);

415: when tableNotFound then
416: if (raise_error) then
417: null;
418: else
419: raise_application_error(-20000, 'Error : WF_CLONE.TruncateTable -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);
420: end if;
421: when OTHERS then
422: raise_application_error(-20000, 'Error : WF_CLONE.TruncateTable -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);
423: end;

Line 422: raise_application_error(-20000, 'Error : WF_CLONE.TruncateTable -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);

418: else
419: raise_application_error(-20000, 'Error : WF_CLONE.TruncateTable -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);
420: end if;
421: when OTHERS then
422: raise_application_error(-20000, 'Error : WF_CLONE.TruncateTable -:Oracle Error = '||to_char(sqlcode)||' -'||sqlerrm);
423: end;
424:
425: PROCEDURE CLONE(errbuf out NOCOPY varchar2,
426: retcode out NOCOPY varchar2,

Line 438: wf_clone.WFClone(P_WEB_HOST,P_DOMAIN,P_WEB_PORT,P_SID,P_URL_PROTO);

434: begin
435: --Lets call DetermineClone to avoid unnecessary update
436: l_clonable := determineClone(P_WEB_HOST,P_DOMAIN,P_WEB_PORT,P_SID,P_URL_PROTO);
437: if l_clonable then
438: wf_clone.WFClone(P_WEB_HOST,P_DOMAIN,P_WEB_PORT,P_SID,P_URL_PROTO);
439: end if;
440:
441: retcode := '0'; -- (successful completion)
442: errbuf := '';

Line 618: wf_clone.purgedata;

614: PROCEDURE PURGE(errbuf out NOCOPY varchar2,
615: retcode out NOCOPY varchar2)
616: is
617: begin
618: wf_clone.purgedata;
619: retcode := '0'; -- (successful completion)
620: errbuf := '';
621: exception
622: when others then

Line 630: end wf_clone;

626: end;
627:
628:
629:
630: end wf_clone;
631: