[Home] [Help]
1: PACKAGE BODY EDR_PSIG_RULE AS
2: /* $Header: EDRRULEB.pls 120.20.12000000.3 2007/02/20 11:40:03 rvsingh ship $ */
3:
4: /* Global varaibles */
5:
169: l_error_msg varchar2(4000);
170: l_error_stack varchar2(4000);
171: l_signature_id number;
172: l_requester varchar2(240);
173: l_doc_params EDR_PSIG.params_table;
174:
175: /*Save Current Workflow Threshold */
176: l_cur_threshold WF_ENGINE.THRESHOLD%TYPE;
177: l_overriding_approver varchar2(80);
204: FND_MESSAGE.SET_NAME('EDR','EDR_FWK_PAGEFLOW_PROC_EVT');
205: FND_MESSAGE.SET_TOKEN('EVENT_NAME',l_event_name);
206: FND_MESSAGE.SET_TOKEN('EVENT_KEY',l_event_key);
207: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
208: 'edr.plsql.EDR_PSIG_RULE.CREATE_PAGEFLOW',
209: FALSE
210: );
211: end if;
212: --Diagnostics End
211: end if;
212: --Diagnostics End
213:
214: /* Insert into Temp tables for Further Processing */
215: wf_log_pkg.string(1, 'EDR_PSIG_rule.create_pageflow','Event Name Assigned');
216: wf_log_pkg.string(1, 'EDR_PSIG_rule.create_pageflow','CLOB Assignment Complete and insert being executed');
217:
218: INSERT INTO EDR_ERECORDS(EVENT_ID,
219: EVENT_NAME,
212: --Diagnostics End
213:
214: /* Insert into Temp tables for Further Processing */
215: wf_log_pkg.string(1, 'EDR_PSIG_rule.create_pageflow','Event Name Assigned');
216: wf_log_pkg.string(1, 'EDR_PSIG_rule.create_pageflow','CLOB Assignment Complete and insert being executed');
217:
218: INSERT INTO EDR_ERECORDS(EVENT_ID,
219: EVENT_NAME,
220: EVENT_KEY,
242: p_audit_group,
243: l_transaction_audit_id);
244:
245:
246: wf_log_pkg.string(1, 'EDR_PSIG_rule.create_pageflow','Insertion Complete in EDR_ERECORDS');
247: -- Bug Fix 3143107
248: -- Removed Open Docement
249: -- Post document parameters
250: -- Change status
258: FND_MESSAGE.SET_TOKEN('EVENT_NAME',l_event_name);
259: FND_MESSAGE.SET_TOKEN('EVENT_KEY',l_event_key);
260: FND_MESSAGE.SET_TOKEN('ERECORD_ID',l_document_id);
261: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
262: 'edr.plsql.EDR_PSIG_RULE.CREATE_PAGEFLOW',
263: FALSE
264: );
265: end if;
266: --Diagnostics End
265: end if;
266: --Diagnostics End
267:
268:
269: wf_log_pkg.string(1, 'EDR_PSIG_rule.create_pageflow','Set the Document ID '||l_document_ID ||' as Event Parameter');
270: wf_event.AddParameterToList('PSIG_DOCUMENT_ID', l_document_id,p_eventP.Parameter_List); /* Document_ID*/
271: wf_log_pkg.string(1, 'EDR_PSIG_rule.create_pageflow','Document ID added to event parameters ' );
272:
273: /* 24-FEB-2003: CJ : add the attachment item attribute to the workflow so that the attachments
267:
268:
269: wf_log_pkg.string(1, 'EDR_PSIG_rule.create_pageflow','Set the Document ID '||l_document_ID ||' as Event Parameter');
270: wf_event.AddParameterToList('PSIG_DOCUMENT_ID', l_document_id,p_eventP.Parameter_List); /* Document_ID*/
271: wf_log_pkg.string(1, 'EDR_PSIG_rule.create_pageflow','Document ID added to event parameters ' );
272:
273: /* 24-FEB-2003: CJ : add the attachment item attribute to the workflow so that the attachments
274: of the eRecord show up in the workflow notification sent out to the signer*/
275:
275:
276:
277: /* Attachments_ID*/
278: wf_event.AddParameterToList('#ATTACHMENTS', 'FND:entity=ERECORD'||'&'||'pk1name=DOCUMENT_ID'||'&'||'pk1value='||l_document_id,p_eventP.Parameter_List);
279: wf_log_pkg.string(3, 'EDR_PSIG_rule.create_pageflow','Attachments added to event parameters ' );
280: /* 24-FEB-2003: CJ: end */
281:
282: for i in 1 .. P_approverlist.count loop
283:
283:
284: --Bug 2674799: start
285: --New AME approvers table has the WF Directory name of user.
286: l_fnd_user := P_approverList(i).name;
287: wf_log_pkg.string(1, 'EDR_PSIG_rule.create_pageflow','AME Approver '||P_approverlist(i).occurrence||'-'||l_fnd_user);
288: wf_log_pkg.string(1, 'EDR_PSIG_rule.create_pageflow','Figuring out overriding approver for '||l_fnd_user);
289: --Bug 4160412: Start
290: --Find the overriding details only if a user name is provided.
291: if length(l_fnd_user) > 0 and instr(l_fnd_user,'#') = 0 then
284: --Bug 2674799: start
285: --New AME approvers table has the WF Directory name of user.
286: l_fnd_user := P_approverList(i).name;
287: wf_log_pkg.string(1, 'EDR_PSIG_rule.create_pageflow','AME Approver '||P_approverlist(i).occurrence||'-'||l_fnd_user);
288: wf_log_pkg.string(1, 'EDR_PSIG_rule.create_pageflow','Figuring out overriding approver for '||l_fnd_user);
289: --Bug 4160412: Start
290: --Find the overriding details only if a user name is provided.
291: if length(l_fnd_user) > 0 and instr(l_fnd_user,'#') = 0 then
292: EDR_STANDARD.FIND_WF_NTF_RECIPIENT(l_fnd_user,'EDRPSIGF','PSIG_EREC_MESSAGE_BLAF',
313: FND_MESSAGE.SET_TOKEN('ERECORD_ID',l_document_id);
314: FND_MESSAGE.SET_TOKEN('APPROVER_NO',i);
315: FND_MESSAGE.SET_TOKEN('APPROVER_COUNT',p_approverlist.count);
316: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
317: 'edr.plsql.EDR_PSIG_RULE.CREATE_PAGEFLOW',
318: FALSE
319: );
320: end if;
321: --Diagnostics End
319: );
320: end if;
321: --Diagnostics End
322:
323: wf_log_pkg.string(1, 'EDR_PSIG_rule.create_pageflow','Figured out overriding approver for '||l_fnd_user||' as '||l_overriding_approver);
324:
325: /* Insert into Temp tables for Further Processing */
326: SELECT EDR_ESIGNATURES_S.NEXTVAL into l_edr_signature_id from DUAL;
327: wf_log_pkg.string(3, 'EDR_PSIG_rule.create_pageflow','Signature Sequence Fetched '||l_edr_signature_id);
323: wf_log_pkg.string(1, 'EDR_PSIG_rule.create_pageflow','Figured out overriding approver for '||l_fnd_user||' as '||l_overriding_approver);
324:
325: /* Insert into Temp tables for Further Processing */
326: SELECT EDR_ESIGNATURES_S.NEXTVAL into l_edr_signature_id from DUAL;
327: wf_log_pkg.string(3, 'EDR_PSIG_rule.create_pageflow','Signature Sequence Fetched '||l_edr_signature_id);
328:
329: INSERT into EDR_ESIGNATURES(SIGNATURE_ID,
330: EVENT_ID,
331: EVENT_NAME,
352: FND_MESSAGE.SET_TOKEN('EVENT_KEY',l_event_key);
353: FND_MESSAGE.SET_TOKEN('ERECORD_ID',l_document_id);
354: FND_MESSAGE.SET_TOKEN('APPROVER',l_overriding_approver);
355: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
356: 'edr.plsql.EDR_PSIG_RULE.CREATE_PAGEFLOW',
357: FALSE
358: );
359: end if;
360: --Diagnostics End
359: end if;
360: --Diagnostics End
361:
362:
363: wf_log_pkg.string(3, 'EDR_PSIG_rule.create_pageflow','Insert Complete into EDR_ESIGNATURES');
364: wf_log_pkg.string(3, 'EDR_PSIG_rule.create_pageflow','Requesting Signatures in PSIG evidance Store');
365:
366: --Bug 2674799: start
367: --Store the approver order number in EDR_PSIG_DETAILS
360: --Diagnostics End
361:
362:
363: wf_log_pkg.string(3, 'EDR_PSIG_rule.create_pageflow','Insert Complete into EDR_ESIGNATURES');
364: wf_log_pkg.string(3, 'EDR_PSIG_rule.create_pageflow','Requesting Signatures in PSIG evidance Store');
365:
366: --Bug 2674799: start
367: --Store the approver order number in EDR_PSIG_DETAILS
368: --Bug 4160412: Start
363: wf_log_pkg.string(3, 'EDR_PSIG_rule.create_pageflow','Insert Complete into EDR_ESIGNATURES');
364: wf_log_pkg.string(3, 'EDR_PSIG_rule.create_pageflow','Requesting Signatures in PSIG evidance Store');
365:
366: --Bug 2674799: start
367: --Store the approver order number in EDR_PSIG_DETAILS
368: --Bug 4160412: Start
369: --Request for signature only if a user name is provided.
370: if length(l_fnd_user) > 0 and instr(l_fnd_user,'#') = 0 then
371: EDR_PSIG.REQUESTSIGNATURE(P_DOCUMENT_ID=>l_document_id,
367: --Store the approver order number in EDR_PSIG_DETAILS
368: --Bug 4160412: Start
369: --Request for signature only if a user name is provided.
370: if length(l_fnd_user) > 0 and instr(l_fnd_user,'#') = 0 then
371: EDR_PSIG.REQUESTSIGNATURE(P_DOCUMENT_ID=>l_document_id,
372: P_USER_NAME=>l_overriding_approver,
373: P_ORIGINAL_RECIPIENT=>l_fnd_user,
374: P_OVERRIDING_COMMENTS=>l_overriding_comments,
375: P_SIGNATURE_ID=>l_signature_id,
394: FND_MESSAGE.SET_TOKEN('EVENT_KEY',l_event_key);
395: FND_MESSAGE.SET_TOKEN('ERECORD_ID',l_document_id);
396: FND_MESSAGE.SET_TOKEN('APPROVER',l_overriding_approver);
397: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
398: 'edr.plsql.EDR_PSIG_RULE.CREATE_PAGEFLOW',
399: FALSE
400: );
401: end if;
402: --Diagnostics End
400: );
401: end if;
402: --Diagnostics End
403:
404: wf_log_pkg.string(1, 'EDR_PSIG_rule.create_pageflow','PSIG id for' ||l_fnd_user||' is '||l_signature_id);
405:
406: /* Clear the entries */
407: l_overriding_comments:=NULL;
408: l_overriding_approver:=NULL;
411: end loop;
412:
413: /* END Approver List */
414:
415: wf_log_pkg.string(3, 'EDR_PSIG_RULE.create_pageflow','AME Approver list inserted into temp table');
416: /*call Workflow dEfault Rule funciton */
417:
418: l_return_status:=WF_RULE.DEFAULT_RULE(p_subscription_guid=>p_subscription_guid,p_event=>p_eventP);
419:
428: l_error_msg := p_eventP.GETERRORMESSAGE;
429: RAISE DEFAULT_RULE_ERROR;
430: ELSE
431: COMMIT;
432: wf_log_pkg.string(3, 'EDR_PSIG_RULE.create_pageflow','COMMIT Completed in Create pageflow');
433:
434: --Diagnostics Start
435: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
436: FND_MESSAGE.SET_NAME('EDR','EDR_FWK_PAGEFLOW_SUCCESS_EVT');
437: FND_MESSAGE.SET_TOKEN('EVENT_NAME',l_event_name);
438: FND_MESSAGE.SET_TOKEN('EVENT_KEY',l_event_key);
439: FND_MESSAGE.SET_TOKEN('ERECORD_ID',l_document_id);
440: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
441: 'edr.plsql.EDR_PSIG_RULE.CREATE_PAGEFLOW',
442: FALSE
443: );
444: end if;
445: --Diagnostics End
454: when BAD_RULE then
455:
456: /* Update workflow threshold to saved value */
457: WF_ENGINE.THRESHOLD := l_cur_threshold;
458: Wf_Core.Context('EDR_PSIG_RULE', 'CREATE_PAGEFLOW', p_eventP.getEventName(), p_subscription_guid);
459: wf_event.setErrorInfo(p_eventP,'ERROR');
460: ROLLBACK;
461: p_err_code:=l_error;
462: p_err_msg:=l_error_msg;
463:
464: --Diagnostics Start
465: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
466: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
467: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
468: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','CREATE_PAGEFLOW');
469: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
470: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
471: 'edr.plsql.EDR_PSIG_RULE.CREATE_PAGEFLOW',
467: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
468: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','CREATE_PAGEFLOW');
469: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
470: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
471: 'edr.plsql.EDR_PSIG_RULE.CREATE_PAGEFLOW',
472: FALSE
473: );
474: end if;
475: --Diagnostics End
478:
479: when DEFAULT_RULE_ERROR then
480: /* Update workflow threshold to saved value */
481: WF_ENGINE.THRESHOLD := l_cur_threshold;
482: Wf_Core.Context('EDR_PSIG_RULE', 'CREATE_PAGEFLOW', p_eventP.getEventName(), p_subscription_guid);
483: wf_event.setErrorInfo(p_eventP,'ERROR');
484: ROLLBACK;
485: p_err_code:=l_error;
486: p_err_msg:= l_error_msg;
487:
488: --Diagnostics Start
489: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
490: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
491: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
492: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','CREATE_PAGEFLOW');
493: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
494: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
495: 'edr.plsql.EDR_PSIG_RULE.CREATE_PAGEFLOW',
491: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
492: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','CREATE_PAGEFLOW');
493: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
494: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
495: 'edr.plsql.EDR_PSIG_RULE.CREATE_PAGEFLOW',
496: FALSE
497: );
498: end if;
499: --Diagnostics End
504: /* Udate workflow threshold to saved value */
505: Wf_Core.get_ERROR(l_error,l_error_msg,l_error_stack);
506: wf_log_pkg.string(6,'in when others of create_pageflow'||l_error,l_error_msg||substr(l_error_stack,1,100));
507: WF_ENGINE.THRESHOLD := l_cur_threshold;
508: Wf_Core.Context('EDR_PSIG_RULE', 'CREATE_PAGEFLOW', p_eventP.getEventName(), p_subscription_guid);
509: wf_event.setErrorInfo(p_eventP,'ERROR');
510: ROLLBACK;
511: p_err_code:=l_error;
512: p_err_msg:=l_error_msg;
512: p_err_msg:=l_error_msg;
513: --Diagnostics Start
514: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
515: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
516: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
517: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','CREATE_PAGEFLOW');
518: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
519: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
520: 'edr.plsql.EDR_PSIG_RULE.CREATE_PAGEFLOW',
516: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
517: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','CREATE_PAGEFLOW');
518: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
519: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
520: 'edr.plsql.EDR_PSIG_RULE.CREATE_PAGEFLOW',
521: FALSE
522: );
523: end if;
524: --Diagnostics End
567: l_error number;
568: l_error_msg varchar2(4000);
569: l_event_user_key_label VARCHAR2(240);
570: l_event_user_key_VALUE VARCHAR2(240);
571: l_params EDR_PSIG.params_table;
572: l_source_application varchar2(240);
573: l_requester varchar2(240);
574: l_user_id NUMBER;
575: l_login_id NUMBER;
636: FND_MESSAGE.SET_NAME('EDR','EDR_FWK_ST_ERECORD_PROC_EVT');
637: FND_MESSAGE.SET_TOKEN('EVENT_NAME',l_event_name);
638: FND_MESSAGE.SET_TOKEN('EVENT_KEY',l_event_key);
639: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
640: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
641: FALSE
642: );
643: end if;
644: --Diagnostics End
644: --Diagnostics End
645:
646: /* Only eRecord Required. Generate the eRecord output Output and post it in temp tables */
647: L_EREC_OUTPUT:=P_XML_DOCUMENT;
648: wf_log_pkg.string(3, 'EDR_PSIG_RULE.STORE_ERECORD','Start of store erecord');
649: l_requester := wf_event.getValueForParameter('#WF_SIGN_REQUESTER',x_event.Parameter_List);
650:
651: --Bug 3170251 : Start- EREC_TEMPLATE TYPE from Workflow
652: /* Find the Style Sheet Type from Workflow Parameter EREC_TEMPLATE_TYPE */
653: l_style_sheet_type := wf_event.getValueForParameter('EREC_TEMPLATE_TYPE',x_event.Parameter_List);
654: -- Bug 3170251 : End
655:
656: -- Bug 3170251 : Start- Open the PSIG document, to get the l_document_id value for use in XDOC
657: EDR_PSIG.openDocument(P_PSIG_XML => p_xml_document,
658: P_PSIG_REQUESTER => l_requester,
659: P_DOCUMENT_ID => l_document_id,
660: P_ERROR => l_error,
661: P_ERROR_MSG => l_error_msg);
661: P_ERROR_MSG => l_error_msg);
662: -- Bug 3170251 : End
663:
664: IF l_error is NOT NULL THEN
665: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','open document errored out with code '||l_error);
666: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','open document Error Msg '||l_error_msg);
667: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Opened Document in eRecords Repository with Document ID '||l_document_id);
668: RAISE ERECORD_CREATION_ERROR;
669: END IF;
662: -- Bug 3170251 : End
663:
664: IF l_error is NOT NULL THEN
665: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','open document errored out with code '||l_error);
666: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','open document Error Msg '||l_error_msg);
667: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Opened Document in eRecords Repository with Document ID '||l_document_id);
668: RAISE ERECORD_CREATION_ERROR;
669: END IF;
670:
663:
664: IF l_error is NOT NULL THEN
665: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','open document errored out with code '||l_error);
666: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','open document Error Msg '||l_error_msg);
667: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Opened Document in eRecords Repository with Document ID '||l_document_id);
668: RAISE ERECORD_CREATION_ERROR;
669: END IF;
670:
671: wf_log_pkg.string(3, 'EDR_PSIG_RULE.store_erecord','committing the transaction in store erecord');
667: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Opened Document in eRecords Repository with Document ID '||l_document_id);
668: RAISE ERECORD_CREATION_ERROR;
669: END IF;
670:
671: wf_log_pkg.string(3, 'EDR_PSIG_RULE.store_erecord','committing the transaction in store erecord');
672: commit;
673:
674: --Diagnostics Start
675: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
677: FND_MESSAGE.SET_TOKEN('EVENT_NAME',l_event_name);
678: FND_MESSAGE.SET_TOKEN('EVENT_KEY',l_event_key);
679: FND_MESSAGE.SET_TOKEN('ERECORD_ID',l_document_id);
680: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
681: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
682: FALSE
683: );
684: end if;
685: --Diagnostics End
685: --Diagnostics End
686:
687: -- Bug 3761813 : start
688: l_redline_required := wf_event.getValueForParameter('REDLINE_REQUIRED',x_event.Parameter_List);
689: wf_log_pkg.string(3, 'EDR_PSIG_RULE.store_erecord','REDLINE_REQUIRED'||l_redline_required);
690: -- Bug 3761813 : end
691:
692:
693: -- Bug 3170251 : Start- if EREC_TEMPLATE TYPE isRTF then call EDR_XDOC_UTIL_PKG.GENERATE_ERECORD procedure.
710: FND_MESSAGE.SET_TOKEN('ERECORD_ID',l_document_id);
711: FND_MESSAGE.SET_TOKEN('TEMPLATE_NAME',p_style_sheet);
712: FND_MESSAGE.SET_TOKEN('TEMPLATE_VER',p_style_sheet_ver);
713: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
714: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
715: FALSE
716: );
717: end if;
718: --Diagnostics End
756: IF l_error = 10 THEN
757: -- This error means either the XSLFO for given template is missing i.e. due to
758: -- approval process missing or converision error OR Template is not uploaded
759: -- in the respective repository.
760: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code from PDF e-record generation process: '||l_error);
761: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg from PDF e-record generation process: '||l_error_msg);
762: RAISE ERECORD_GEN_XSLFOMISS_ERR;
763: END IF;
764:
757: -- This error means either the XSLFO for given template is missing i.e. due to
758: -- approval process missing or converision error OR Template is not uploaded
759: -- in the respective repository.
760: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code from PDF e-record generation process: '||l_error);
761: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg from PDF e-record generation process: '||l_error_msg);
762: RAISE ERECORD_GEN_XSLFOMISS_ERR;
763: END IF;
764:
765: IF l_error = 20 THEN
762: RAISE ERECORD_GEN_XSLFOMISS_ERR;
763: END IF;
764:
765: IF l_error = 20 THEN
766: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code from PDF e-record generation process: '||l_error);
767: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg from PDF e-record generation process: '||l_error_msg);
768: RAISE ERECORD_CREATION_ERROR;
769: END IF;
770:
763: END IF;
764:
765: IF l_error = 20 THEN
766: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code from PDF e-record generation process: '||l_error);
767: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg from PDF e-record generation process: '||l_error_msg);
768: RAISE ERECORD_CREATION_ERROR;
769: END IF;
770:
771: IF l_error = 30 THEN
768: RAISE ERECORD_CREATION_ERROR;
769: END IF;
770:
771: IF l_error = 30 THEN
772: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code from PDF e-record generation process: '||l_error);
773: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg from PDF e-record generation process: '||l_error_msg);
774: RAISE ERECORD_GEN_FATALERR;
775: END IF;
776:
769: END IF;
770:
771: IF l_error = 30 THEN
772: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code from PDF e-record generation process: '||l_error);
773: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg from PDF e-record generation process: '||l_error_msg);
774: RAISE ERECORD_GEN_FATALERR;
775: END IF;
776:
777: IF l_error = 40 THEN
774: RAISE ERECORD_GEN_FATALERR;
775: END IF;
776:
777: IF l_error = 40 THEN
778: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code from PDF e-record generation process: '||l_error);
779: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg from PDF e-record generation process: '||l_error_msg);
780: RAISE ERECORD_GEN_XDOERR;
781: END IF;
782:
775: END IF;
776:
777: IF l_error = 40 THEN
778: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code from PDF e-record generation process: '||l_error);
779: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg from PDF e-record generation process: '||l_error_msg);
780: RAISE ERECORD_GEN_XDOERR;
781: END IF;
782:
783: IF l_error = 100 THEN
780: RAISE ERECORD_GEN_XDOERR;
781: END IF;
782:
783: IF l_error = 100 THEN
784: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code from PDF e-record generation process: '||l_error);
785: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg from PDF e-record generation process: '||l_error_msg);
786: RAISE ERECORD_GEN_UNKNWN_ERR;
787: END IF;
788:
781: END IF;
782:
783: IF l_error = 100 THEN
784: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code from PDF e-record generation process: '||l_error);
785: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg from PDF e-record generation process: '||l_error_msg);
786: RAISE ERECORD_GEN_UNKNWN_ERR;
787: END IF;
788:
789: IF l_error = 505 THEN
786: RAISE ERECORD_GEN_UNKNWN_ERR;
787: END IF;
788:
789: IF l_error = 505 THEN
790: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code from PDF e-record generation process: '||l_error);
791: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg from PDF e-record generation process: '||l_error_msg);
792: RAISE ERECORD_GEN_JSPMSNG_ERR;
793: END IF;
794:
787: END IF;
788:
789: IF l_error = 505 THEN
790: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code from PDF e-record generation process: '||l_error);
791: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg from PDF e-record generation process: '||l_error_msg);
792: RAISE ERECORD_GEN_JSPMSNG_ERR;
793: END IF;
794:
795: IF l_error = 500 THEN
792: RAISE ERECORD_GEN_JSPMSNG_ERR;
793: END IF;
794:
795: IF l_error = 500 THEN
796: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code from PDF e-record generation process: '||l_error);
797: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg from PDF e-record generation process: '||l_error_msg);
798: RAISE ERECORD_GEN_JSPRQFAIL_ERR;
799: END IF;
800:
793: END IF;
794:
795: IF l_error = 500 THEN
796: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code from PDF e-record generation process: '||l_error);
797: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg from PDF e-record generation process: '||l_error_msg);
798: RAISE ERECORD_GEN_JSPRQFAIL_ERR;
799: END IF;
800:
801: /* Set the E-Record Notification Details to Message for PDF E-Records */
814: FND_MESSAGE.SET_TOKEN('EVENT_NAME',l_event_name);
815: FND_MESSAGE.SET_TOKEN('EVENT_KEY',l_event_key);
816: FND_MESSAGE.SET_TOKEN('ERECORD_ID',l_document_id);
817: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
818: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
819: FALSE
820: );
821: end if;
822: --Diagnostics End
835: FND_MESSAGE.SET_TOKEN('ERECORD_ID',l_document_id);
836: FND_MESSAGE.SET_TOKEN('TEMPLATE_NAME',p_style_sheet);
837: FND_MESSAGE.SET_TOKEN('TEMPLATE_VER',p_style_sheet_ver);
838: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
839: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
840: FALSE
841: );
842: end if;
843: --Diagnostics End
864: x_output_format => l_output_format,
865: x_error_code => l_error,
866: x_error_msg => l_error_msg);
867:
868: wf_log_pkg.string(1, 'EDR_PSIG_RULE.store_erecord',' generate_ERecord for redline. Error '||l_error );
869:
870: wf_log_pkg.string(1, 'EDR_PSIG_RULE.store_erecord',' generate_ERecord for redline. l_error_msg '||l_error_msg );
871:
872: dbms_lob.createtemporary(X_DIFF_XML,TRUE);
866: x_error_msg => l_error_msg);
867:
868: wf_log_pkg.string(1, 'EDR_PSIG_RULE.store_erecord',' generate_ERecord for redline. Error '||l_error );
869:
870: wf_log_pkg.string(1, 'EDR_PSIG_RULE.store_erecord',' generate_ERecord for redline. l_error_msg '||l_error_msg );
871:
872: dbms_lob.createtemporary(X_DIFF_XML,TRUE);
873: dbms_lob.open( X_DIFF_XML, dbms_lob.lob_readwrite );
874:
885: dbms_lob.close(X_DIFF_XML);
886: dbms_lob.freeTemporary(X_DIFF_XML );
887:
888: IF nvl(l_error,0) <> 0 THEN
889: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Template Type : text ');
890: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code '||l_error);
891: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
892: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','eRecord generated');
893: RAISE ERECORD_GEN_XSLT_ERR;
886: dbms_lob.freeTemporary(X_DIFF_XML );
887:
888: IF nvl(l_error,0) <> 0 THEN
889: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Template Type : text ');
890: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code '||l_error);
891: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
892: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','eRecord generated');
893: RAISE ERECORD_GEN_XSLT_ERR;
894: END IF;
887:
888: IF nvl(l_error,0) <> 0 THEN
889: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Template Type : text ');
890: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code '||l_error);
891: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
892: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','eRecord generated');
893: RAISE ERECORD_GEN_XSLT_ERR;
894: END IF;
895:
888: IF nvl(l_error,0) <> 0 THEN
889: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Template Type : text ');
890: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code '||l_error);
891: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
892: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','eRecord generated');
893: RAISE ERECORD_GEN_XSLT_ERR;
894: END IF;
895:
896: IF l_error = 10 THEN
896: IF l_error = 10 THEN
897: -- This error means either the XSLFO for given template is missing i.e. due to
898: -- approval process missing or converision error OR Template is not uploaded
899: -- in the respective repository.
900: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code XSL '||l_error);
901: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
902: RAISE ERECORD_GEN_XSLFOMISS_ERR;
903: END IF;
904:
897: -- This error means either the XSLFO for given template is missing i.e. due to
898: -- approval process missing or converision error OR Template is not uploaded
899: -- in the respective repository.
900: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code XSL '||l_error);
901: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
902: RAISE ERECORD_GEN_XSLFOMISS_ERR;
903: END IF;
904:
905: IF l_error = 20 THEN
902: RAISE ERECORD_GEN_XSLFOMISS_ERR;
903: END IF;
904:
905: IF l_error = 20 THEN
906: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code XSL'||l_error);
907: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
908: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','eRecord generated');
909: RAISE ERECORD_CREATION_ERROR;
910: END IF;
903: END IF;
904:
905: IF l_error = 20 THEN
906: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code XSL'||l_error);
907: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
908: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','eRecord generated');
909: RAISE ERECORD_CREATION_ERROR;
910: END IF;
911:
904:
905: IF l_error = 20 THEN
906: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code XSL'||l_error);
907: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
908: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','eRecord generated');
909: RAISE ERECORD_CREATION_ERROR;
910: END IF;
911:
912: IF l_error = 30 THEN
909: RAISE ERECORD_CREATION_ERROR;
910: END IF;
911:
912: IF l_error = 30 THEN
913: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code XSL'||l_error);
914: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
915: RAISE ERECORD_GEN_FATALERR;
916: END IF;
917:
910: END IF;
911:
912: IF l_error = 30 THEN
913: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code XSL'||l_error);
914: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
915: RAISE ERECORD_GEN_FATALERR;
916: END IF;
917:
918: IF l_error = 40 THEN
915: RAISE ERECORD_GEN_FATALERR;
916: END IF;
917:
918: IF l_error = 40 THEN
919: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error CodeXSL '||l_error);
920: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
921: RAISE ERECORD_GEN_XDOERR;
922: END IF;
923:
916: END IF;
917:
918: IF l_error = 40 THEN
919: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error CodeXSL '||l_error);
920: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
921: RAISE ERECORD_GEN_XDOERR;
922: END IF;
923:
924: IF l_error = 100 THEN
921: RAISE ERECORD_GEN_XDOERR;
922: END IF;
923:
924: IF l_error = 100 THEN
925: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code XSL'||l_error);
926: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
927: RAISE ERECORD_GEN_UNKNWN_ERR;
928: END IF;
929:
922: END IF;
923:
924: IF l_error = 100 THEN
925: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code XSL'||l_error);
926: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
927: RAISE ERECORD_GEN_UNKNWN_ERR;
928: END IF;
929:
930: IF l_error = 505 THEN
927: RAISE ERECORD_GEN_UNKNWN_ERR;
928: END IF;
929:
930: IF l_error = 505 THEN
931: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code XSL'||l_error);
932: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
933: RAISE ERECORD_GEN_JSPMSNG_ERR;
934: END IF;
935:
928: END IF;
929:
930: IF l_error = 505 THEN
931: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code XSL'||l_error);
932: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
933: RAISE ERECORD_GEN_JSPMSNG_ERR;
934: END IF;
935:
936: IF l_error = 500 THEN
933: RAISE ERECORD_GEN_JSPMSNG_ERR;
934: END IF;
935:
936: IF l_error = 500 THEN
937: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code XSL'||l_error);
938: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
939: RAISE ERECORD_GEN_JSPRQFAIL_ERR;
940: END IF;
941: END IF;
934: END IF;
935:
936: IF l_error = 500 THEN
937: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code XSL'||l_error);
938: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg '||l_error_msg);
939: RAISE ERECORD_GEN_JSPRQFAIL_ERR;
940: END IF;
941: END IF;
942: --Bug 4306292: End
951: -- Bug 4862464: Start
952: -- l_output_format :=TEXT;
953: -- Changing the harcoded document format from TEXT to
954: -- text/plain
955: -- The edr_psig.openDocument api converts the document format from TEXT
956: -- to text/plain but the updatedocument api retains the document format
957: -- so for consistency we pass the text/plain document format.
958: l_output_format := WF_NOTIFICATION.doc_text;
959: -- Bug 4862464: End
957: -- so for consistency we pass the text/plain document format.
958: l_output_format := WF_NOTIFICATION.doc_text;
959: -- Bug 4862464: End
960: IF nvl(l_error,0) <> 0 THEN
961: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','XSL Transformation Error Code '||l_error);
962: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','XSL Transformation Error Msg '||l_error_msg);
963: RAISE ERECORD_GEN_XSLT_ERR;
964: END IF;
965:
958: l_output_format := WF_NOTIFICATION.doc_text;
959: -- Bug 4862464: End
960: IF nvl(l_error,0) <> 0 THEN
961: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','XSL Transformation Error Code '||l_error);
962: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','XSL Transformation Error Msg '||l_error_msg);
963: RAISE ERECORD_GEN_XSLT_ERR;
964: END IF;
965:
966: --Diagnostics Start
969: FND_MESSAGE.SET_TOKEN('EVENT_NAME',l_event_name);
970: FND_MESSAGE.SET_TOKEN('EVENT_KEY',l_event_key);
971: FND_MESSAGE.SET_TOKEN('ERECORD_ID',l_document_id);
972: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
973: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
974: FALSE
975: );
976: end if;
977: --Diagnostics End
981:
982:
983: -- Check if template type is one of the valid types.
984: IF ((UPPER(l_style_sheet_type) <> 'XSL') AND (UPPER(l_style_sheet_type) <> 'RTF')) THEN
985: wf_log_pkg.string(5, 'EDR_PSIG_RULE.store_erecord','Wrong Stylesheet Type ' || l_style_sheet_type );
986: RAISE ERECORD_UNKWN_TMPL_TYPE;
987: END IF;
988:
989: /* Get Payload Attributes required by Rule function */
992: l_source_application := wf_event.getValueForParameter('#WF_SOURCE_APPLICATION_TYPE',x_event.Parameter_List);
993: l_requester := wf_event.getValueForParameter('#WF_SIGN_REQUESTER',x_event.Parameter_List);
994:
995: /* Call Repository API's */
996: wf_log_pkg.string(3, 'EDR_PSIG_RULE.store_erecord','Posting Document in eRecords Repository');
997:
998: EDR_PSIG.updateDocument(P_DOCUMENT_ID => l_document_id,
999: P_PSIG_XML => L_XML_DOCUMENT,
1000: P_PSIG_DOCUMENT => L_EREC_OUTPUT,
994:
995: /* Call Repository API's */
996: wf_log_pkg.string(3, 'EDR_PSIG_RULE.store_erecord','Posting Document in eRecords Repository');
997:
998: EDR_PSIG.updateDocument(P_DOCUMENT_ID => l_document_id,
999: P_PSIG_XML => L_XML_DOCUMENT,
1000: P_PSIG_DOCUMENT => L_EREC_OUTPUT,
1001: P_PSIG_DOCUMENTFORMAT => l_output_format,
1002: P_PSIG_REQUESTER => l_requester,
1006: P_WF_NID => NULL,
1007: P_ERROR => l_error,
1008: P_ERROR_MSG => l_error_msg);
1009: IF l_error is NOT NULL THEN
1010: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code during update document '||l_error);
1011: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg during update document '||l_error_msg);
1012: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Updated Document in eRecords Repository with Document ID '||l_document_id);
1013: RAISE ERECORD_CREATION_ERROR;
1014: END IF;
1007: P_ERROR => l_error,
1008: P_ERROR_MSG => l_error_msg);
1009: IF l_error is NOT NULL THEN
1010: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code during update document '||l_error);
1011: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg during update document '||l_error_msg);
1012: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Updated Document in eRecords Repository with Document ID '||l_document_id);
1013: RAISE ERECORD_CREATION_ERROR;
1014: END IF;
1015:
1008: P_ERROR_MSG => l_error_msg);
1009: IF l_error is NOT NULL THEN
1010: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code during update document '||l_error);
1011: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg during update document '||l_error_msg);
1012: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Updated Document in eRecords Repository with Document ID '||l_document_id);
1013: RAISE ERECORD_CREATION_ERROR;
1014: END IF;
1015:
1016: --Diagnostics Start
1019: FND_MESSAGE.SET_TOKEN('EVENT_NAME',l_event_name);
1020: FND_MESSAGE.SET_TOKEN('EVENT_KEY',l_event_key);
1021: FND_MESSAGE.SET_TOKEN('ERECORD_ID',l_document_id);
1022: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
1023: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1024: FALSE
1025: );
1026: end if;
1027: --Diagnostics End
1034: update fnd_attached_documents
1035: set pk1_value = l_document_id
1036: where entity_name = EDR_CONSTANTS_GRP.g_erecord_entity_name
1037: and pk1_value = p_edr_event_id; */
1038: wf_log_pkg.string(1, 'EDR_PSIG_RULE.store_erecord','Before Moving attachments from Temp entity to eRecord '
1039: ||'from '||p_edr_event_id||' to '||l_document_id);
1040:
1041: --Bug 4381237: Start
1042: --Change the call to EDR attachment API
1063: X_automatically_added_flag => 'N',
1064: X_from_category_id => null,
1065: X_to_category_id => null);
1066:
1067: wf_log_pkg.string(3, 'EDR_PSIG_RULE.store_erecord','After Moving attachments from Temp entity to eRecord '
1068: ||'from '||p_edr_event_id||' to '||l_document_id);
1069:
1070: wf_log_pkg.string(1, 'EDR_PSIG_RULE.store_erecord','Before Deleting attachments from Temp entity '
1071: ||'from '||p_edr_event_id);
1066:
1067: wf_log_pkg.string(3, 'EDR_PSIG_RULE.store_erecord','After Moving attachments from Temp entity to eRecord '
1068: ||'from '||p_edr_event_id||' to '||l_document_id);
1069:
1070: wf_log_pkg.string(1, 'EDR_PSIG_RULE.store_erecord','Before Deleting attachments from Temp entity '
1071: ||'from '||p_edr_event_id);
1072:
1073:
1074: -- Bug 3863541 : Start
1092: --Bug 4381237: End
1093: X_automatically_added_flag => 'N');
1094: --Bug 3863541 : End
1095:
1096: wf_log_pkg.string(3, 'EDR_PSIG_RULE.store_erecord','After Deleting attachments from Temp entity '
1097: ||'from '||p_edr_event_id);
1098:
1099:
1100: --Diagnostics Start
1104: FND_MESSAGE.SET_TOKEN('EVENT_KEY',l_event_key);
1105: FND_MESSAGE.SET_TOKEN('ERECORD_ID',l_document_id);
1106: FND_MESSAGE.SET_TOKEN('ATTACHMENT_ID',p_edr_event_id);
1107: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
1108: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1109: FALSE
1110: );
1111: end if;
1112: --Diagnostics End
1116: --ER # 2966866 start
1117: wf_event.AddParameterToList('#ERECORD_ID',
1118: l_document_id,
1119: x_event.Parameter_List);
1120: wf_log_pkg.string(1, 'EDR_PSIG_RULE.store_erecord','eRecord Id added to payload: '||l_document_id);
1121:
1122: --ER # 2966866 end
1123: /* Add Document Parameters */
1124: l_params(1).param_name:='PSIG_USER_KEY_LABEL';
1159: l_params(5).param_value := 'FND:entity=ERECORD'||'&'||'pk1name=DOCUMENT_ID'||'&'||'pk1value='||l_document_id;
1160:
1161: --Bug 4755255: End
1162:
1163: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Posting Document Parameters');
1164:
1165: EDR_PSIG.POSTDOCUMENTPARAMETER(P_DOCUMENT_ID => l_document_id,
1166: P_PARAMETERS => l_params,
1167: P_ERROR => l_error,
1161: --Bug 4755255: End
1162:
1163: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Posting Document Parameters');
1164:
1165: EDR_PSIG.POSTDOCUMENTPARAMETER(P_DOCUMENT_ID => l_document_id,
1166: P_PARAMETERS => l_params,
1167: P_ERROR => l_error,
1168: P_ERROR_MSG => l_error_msg);
1169:
1167: P_ERROR => l_error,
1168: P_ERROR_MSG => l_error_msg);
1169:
1170: IF l_error is NOT NULL THEN
1171: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code during posting doc params '||l_error);
1172: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg during posting doc params '||l_error_msg);
1173: RAISE ERECORD_PARAM_ERROR;
1174: END IF;
1175:
1168: P_ERROR_MSG => l_error_msg);
1169:
1170: IF l_error is NOT NULL THEN
1171: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Code during posting doc params '||l_error);
1172: wf_log_pkg.string(4, 'EDR_PSIG_RULE.store_erecord','Error Msg during posting doc params '||l_error_msg);
1173: RAISE ERECORD_PARAM_ERROR;
1174: END IF;
1175:
1176: --Diagnostics Start
1179: FND_MESSAGE.SET_TOKEN('EVENT_NAME',l_event_name);
1180: FND_MESSAGE.SET_TOKEN('EVENT_KEY',l_event_key);
1181: FND_MESSAGE.SET_TOKEN('ERECORD_ID',l_document_id);
1182: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
1183: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1184: FALSE
1185: );
1186: end if;
1187: --Diagnostics End
1192: --Bug 4150616: Start
1193: --If either ESIG_REQUIRED is set to 'N' or FORCE_ERECORD_USED has been set to 'Y' then close the document.
1194: IF p_esign_required = 'N' OR l_force_erecord_used = 'Y' THEN
1195: --Bug 4150616: End
1196: EDR_PSIG.closeDocument(P_DOCUMENT_ID => l_document_id,
1197: P_ERROR => l_error,
1198: P_ERROR_MSG => l_error_msg);
1199: wf_log_pkg.string(3, 'EDR_PSIG_RULE.store_erecord','Document Closed');
1200:
1195: --Bug 4150616: End
1196: EDR_PSIG.closeDocument(P_DOCUMENT_ID => l_document_id,
1197: P_ERROR => l_error,
1198: P_ERROR_MSG => l_error_msg);
1199: wf_log_pkg.string(3, 'EDR_PSIG_RULE.store_erecord','Document Closed');
1200:
1201: ELSIF p_esign_required = 'Y' THEN
1202: EDR_PSIG.CHANGEDOCUMENTSTATUS(P_DOCUMENT_ID => l_document_id,
1203: P_STATUS => 'ERROR',
1198: P_ERROR_MSG => l_error_msg);
1199: wf_log_pkg.string(3, 'EDR_PSIG_RULE.store_erecord','Document Closed');
1200:
1201: ELSIF p_esign_required = 'Y' THEN
1202: EDR_PSIG.CHANGEDOCUMENTSTATUS(P_DOCUMENT_ID => l_document_id,
1203: P_STATUS => 'ERROR',
1204: P_ERROR => L_ERROR,
1205: P_ERROR_MSG => l_error_msg);
1206: wf_log_pkg.string(3, 'EDR_PSIG_RULE.store_erecord','Changed Document Status to an Intermediate Status');
1202: EDR_PSIG.CHANGEDOCUMENTSTATUS(P_DOCUMENT_ID => l_document_id,
1203: P_STATUS => 'ERROR',
1204: P_ERROR => L_ERROR,
1205: P_ERROR_MSG => l_error_msg);
1206: wf_log_pkg.string(3, 'EDR_PSIG_RULE.store_erecord','Changed Document Status to an Intermediate Status');
1207: END IF;
1208: -- END Bug Fix 3143107
1209:
1210: -- If everything went fine, commiting the ERECORD Contents by commiting this autonomous transaction
1216: FND_MESSAGE.SET_TOKEN('EVENT_NAME',l_event_name);
1217: FND_MESSAGE.SET_TOKEN('EVENT_KEY',l_event_key);
1218: FND_MESSAGE.SET_TOKEN('ERECORD_ID',l_document_id);
1219: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
1220: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1221: FALSE
1222: );
1223: end if;
1224: --Diagnostics End
1222: );
1223: end if;
1224: --Diagnostics End
1225:
1226: wf_log_pkg.string(3, 'EDR_PSIG_RULE.store_erecord','Store_erecord completed successfully');
1227:
1228: EXCEPTION
1229: when ERECORD_GENERATION_ERROR then
1230: ROLLBACK;
1227:
1228: EXCEPTION
1229: when ERECORD_GENERATION_ERROR then
1230: ROLLBACK;
1231: Wf_Core.Context('EDR_PSIG_RULE', 'STORE_ERECORD', x_event.getEventName(), p_subscription_guid);
1232: wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR');
1233: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
1234: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
1235: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
1231: Wf_Core.Context('EDR_PSIG_RULE', 'STORE_ERECORD', x_event.getEventName(), p_subscription_guid);
1232: wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR');
1233: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
1234: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
1235: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
1236: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','PSIG_RULE');
1237:
1238: --Diagnostics Start
1239: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1237:
1238: --Diagnostics Start
1239: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1240: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
1241: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1242: FALSE
1243: );
1244: end if;
1245: --Diagnostics End
1246:
1247: APP_EXCEPTION.RAISE_EXCEPTION;
1248: when ERECORD_CREATION_ERROR then
1249: ROLLBACK;
1250: Wf_Core.Context('EDR_PSIG_RULE', 'STORE_ERECORD', x_event.getEventName(), p_subscription_guid);
1251: wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR');
1252: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
1253: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
1254: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
1250: Wf_Core.Context('EDR_PSIG_RULE', 'STORE_ERECORD', x_event.getEventName(), p_subscription_guid);
1251: wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR');
1252: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
1253: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
1254: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
1255: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','STORE_ERECORD');
1256:
1257: --Diagnostics Start
1258: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1256:
1257: --Diagnostics Start
1258: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1259: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
1260: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1261: FALSE
1262: );
1263: end if;
1264: --Diagnostics End
1265:
1266: APP_EXCEPTION.RAISE_EXCEPTION;
1267: when ERECORD_PARAM_ERROR then
1268: ROLLBACK;
1269: Wf_Core.Context('EDR_PSIG_RULE', 'STORE_ERECORD', x_event.getEventName(), p_subscription_guid);
1270: wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR');
1271: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
1272: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
1273: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
1269: Wf_Core.Context('EDR_PSIG_RULE', 'STORE_ERECORD', x_event.getEventName(), p_subscription_guid);
1270: wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR');
1271: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
1272: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
1273: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
1274: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','STORE_ERECORD');
1275: --Diagnostics Start
1276: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1277: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
1274: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','STORE_ERECORD');
1275: --Diagnostics Start
1276: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1277: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
1278: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1279: FALSE
1280: );
1281: end if;
1282: --Diagnostics End
1285:
1286: -- Bug 3170251 : Start - Added following new exceptions for error handling
1287: when ERECORD_GEN_XSLFOMISS_ERR then
1288: ROLLBACK;
1289: Wf_Core.Context('EDR_PSIG_RULE', 'PSIG_RULE', x_event.getEventName(), p_subscription_guid);
1290: Wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR XSLFO MISSING');
1291: FND_MESSAGE.SET_NAME('EDR','EDR_EREC_XSLFO_MISSING_ERR');
1292: fnd_message.set_token( 'TEMPLATE_NAME',p_style_sheet);
1293: fnd_message.set_token( 'TEMPLATE_VER',p_style_sheet_ver);
1293: fnd_message.set_token( 'TEMPLATE_VER',p_style_sheet_ver);
1294: --Diagnostics Start
1295: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1296: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
1297: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1298: FALSE
1299: );
1300: end if;
1301: --Diagnostics End
1302: APP_EXCEPTION.RAISE_EXCEPTION;
1303:
1304: when ERECORD_GEN_FATALERR then
1305: ROLLBACK;
1306: Wf_Core.Context('EDR_PSIG_RULE', 'PSIG_RULE', x_event.getEventName(), p_subscription_guid);
1307: wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR');
1308:
1309: wf_log_pkg.string(5, 'EDR_PSIG_RULE.store_erecord','There is a fatal error during e-record creation using XDO API');
1310:
1305: ROLLBACK;
1306: Wf_Core.Context('EDR_PSIG_RULE', 'PSIG_RULE', x_event.getEventName(), p_subscription_guid);
1307: wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR');
1308:
1309: wf_log_pkg.string(5, 'EDR_PSIG_RULE.store_erecord','There is a fatal error during e-record creation using XDO API');
1310:
1311: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
1312: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
1313: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
1309: wf_log_pkg.string(5, 'EDR_PSIG_RULE.store_erecord','There is a fatal error during e-record creation using XDO API');
1310:
1311: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
1312: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
1313: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
1314: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','STORE_ERECORD');
1315:
1316: --Diagnostics Start
1317: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1315:
1316: --Diagnostics Start
1317: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1318: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR,
1319: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1320: FALSE
1321: );
1322: end if;
1323: --Diagnostics End
1324:
1325: APP_EXCEPTION.RAISE_EXCEPTION;
1326: when ERECORD_GEN_UNKNWN_ERR then
1327: ROLLBACK;
1328: Wf_Core.Context('EDR_PSIG_RULE', 'PSIG_RULE', x_event.getEventName(), p_subscription_guid);
1329: wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR');
1330: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
1331: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
1332: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
1328: Wf_Core.Context('EDR_PSIG_RULE', 'PSIG_RULE', x_event.getEventName(), p_subscription_guid);
1329: wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR');
1330: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
1331: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
1332: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
1333: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','STORE_ERECORD');
1334:
1335: --Diagnostics Start
1336: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1334:
1335: --Diagnostics Start
1336: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1337: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
1338: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1339: FALSE
1340: );
1341: end if;
1342: --Diagnostics End
1343:
1344: APP_EXCEPTION.RAISE_EXCEPTION;
1345: when ERECORD_GEN_XDOERR then
1346: ROLLBACK;
1347: Wf_Core.Context('EDR_PSIG_RULE', 'PSIG_RULE', x_event.getEventName(), p_subscription_guid);
1348: wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR IN XDO');
1349: FND_MESSAGE.SET_NAME('EDR','EDR_EREC_XDO_ERR');
1350: fnd_message.set_token( 'TEMPLATE_NAME',p_style_sheet);
1351: fnd_message.set_token( 'TEMPLATE_VER',p_style_sheet_ver);
1352:
1353: --Diagnostics Start
1354: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1355: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
1356: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1357: FALSE
1358: );
1359: end if;
1360: --Diagnostics End
1361:
1362: APP_EXCEPTION.RAISE_EXCEPTION;
1363: when ERECORD_UNKWN_TMPL_TYPE then
1364: ROLLBACK;
1365: Wf_Core.Context('EDR_PSIG_RULE', 'PSIG_RULE', x_event.getEventName(), p_subscription_guid);
1366: wf_event.setErrorInfo(x_event,SQLERRM || 'Unknown Template Type'|| l_style_sheet_type);
1367: FND_MESSAGE.SET_NAME('EDR','EDR_EREC_TMPL_TYPE_ERR');
1368: fnd_message.set_token( 'TEMPLATE_NAME',p_style_sheet);
1369: fnd_message.set_token( 'TEMPLATE_VER',p_style_sheet_ver);
1370:
1371: --Diagnostics Start
1372: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1373: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
1374: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1375: FALSE
1376: );
1377: end if;
1378: --Diagnostics End
1380: APP_EXCEPTION.RAISE_EXCEPTION;
1381:
1382: when ERECORD_GEN_JSPMSNG_ERR then
1383: ROLLBACK;
1384: Wf_Core.Context('EDR_PSIG_RULE', 'PSIG_RULE', x_event.getEventName(), p_subscription_guid);
1385: Wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR JSP MISSING');
1386: FND_MESSAGE.SET_NAME('EDR','EDR_EREC_JSP_MISSING_ERR');
1387:
1388: --Diagnostics Start
1387:
1388: --Diagnostics Start
1389: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1390: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
1391: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1392: FALSE
1393: );
1394: end if;
1395: --Diagnostics End
1396:
1397: APP_EXCEPTION.RAISE_EXCEPTION;
1398: when ERECORD_GEN_JSPRQFAIL_ERR then
1399: ROLLBACK;
1400: Wf_Core.Context('EDR_PSIG_RULE', 'PSIG_RULE', x_event.getEventName(), p_subscription_guid);
1401: Wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR JSP UTL_HTTP REQUEST FAILED');
1402: FND_MESSAGE.SET_NAME('EDR','EDR_EREC_JSPREQFAIL_ERR');
1403:
1404: --Diagnostics Start
1403:
1404: --Diagnostics Start
1405: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1406: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
1407: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1408: FALSE
1409: );
1410: end if;
1411: --Diagnostics End
1415:
1416: -- Bug 3390571 : Start
1417: when ERECORD_GEN_XSLT_ERR then
1418: ROLLBACK;
1419: wf_core.context('EDR_PSIG_RULE', 'PSIG_RULE', x_event.getEventName(), p_subscription_guid);
1420: Wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR : XSLT Transformation error');
1421: FND_MESSAGE.SET_NAME('EDR','EDR_EREC_XSLTTRANS_ERR');
1422: fnd_message.set_token( 'TEMPLATE_NAME',p_style_sheet);
1423: fnd_message.set_token( 'TEMPLATE_VER',p_style_sheet_ver);
1423: fnd_message.set_token( 'TEMPLATE_VER',p_style_sheet_ver);
1424: --Diagnostics Start
1425: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1426: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
1427: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1428: FALSE
1429: );
1430: end if;
1431: --Diagnostics End
1438: FND_MESSAGE.SET_NAME('EDR','EDR_MSCA_TMPL_ERR');
1439: --Diagnostics Start
1440: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1441: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
1442: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1443: FALSE
1444: );
1445: end if;
1446: APP_EXCEPTION.RAISE_EXCEPTION;
1449:
1450:
1451: when OTHERS then
1452: ROLLBACK;
1453: Wf_Core.Context('EDR_PSIG_RULE', 'PSIG_RULE', x_event.getEventName(), p_subscription_guid);
1454: wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR');
1455: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
1456: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
1457: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
1453: Wf_Core.Context('EDR_PSIG_RULE', 'PSIG_RULE', x_event.getEventName(), p_subscription_guid);
1454: wf_event.setErrorInfo(x_event,SQLERRM || 'ERROR');
1455: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
1456: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
1457: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
1458: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','STORE_ERECORD');
1459: --Diagnostics Start
1460: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1461: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
1458: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','STORE_ERECORD');
1459: --Diagnostics Start
1460: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1461: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
1462: 'edr.plsql.EDR_PSIG_RULE.STORE_ERECORD',
1463: FALSE
1464: );
1465: end if;
1466: --Diagnostics End
1524: l_transaction_audit_id NUMBER;
1525: l_document_id number;
1526: l_error number;
1527: l_error_msg varchar2(4000);
1528: l_params EDR_PSIG.params_table;
1529: l_source_application varchar2(240);
1530: l_requester varchar2(240);
1531: l_transaction_name varchar2(240);
1532:
1738: --Bug 5891879: Start
1739: --Read the source application type
1740: l_source_application_type := wf_event.getValueForParameter('#WF_SOURCE_APPLICATION_TYPE',p_event.Parameter_List);
1741: --Bug 5891879 : End
1742: wf_log_pkg.string(3, 'EDR_PSIG_RULE.psig_rule','Start of the rule function');
1743:
1744: --Bug 4150616: Start
1745: IF l_eres_profile_value = 'Y' OR l_force_erecord = 'Y' THEN
1746: --Bug 4150616: End
1754: l_ame_transaction_type := NVL(wf_event.getValueForParameter('EDR_AME_TRANSACTION_TYPE',p_event.Parameter_List),
1755: P_EVENT.getEventName());
1756: -- END IF;
1757:
1758: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','AME transaction Type :'||l_ame_transaction_type );
1759:
1760: --Diagnostics Start
1761: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1762: FND_MESSAGE.SET_NAME('EDR','EDR_FWKRULE_START_EVT');
1763: FND_MESSAGE.SET_TOKEN('EVENT_NAME',p_event.getEventName());
1764: FND_MESSAGE.SET_TOKEN('EVENT_KEY',p_event.getEventKey());
1765: FND_MESSAGE.SET_TOKEN('AME_TYPE',l_ame_transaction_type);
1766: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
1767: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
1768: FALSE
1769: );
1770: end if;
1771: --Diagnostics End
1773: --ER # 2966866 start
1774:
1775: --get the PARENT_EVENT_NAME parameter
1776: l_parent_event := wf_event.getValueForParameter(EDR_CONSTANTS_GRP.g_parent_event_name ,p_event.Parameter_List);
1777: wf_log_pkg.string(1, 'EDR_PSIG_rule.psig_rule','Parent Event Name:'||l_parent_event);
1778:
1779: --get the PARENT_EVENT_KEY parameter
1780: l_parent_key := wf_event.getValueForParameter(EDR_CONSTANTS_GRP.g_parent_event_key,p_event.Parameter_List);
1781:
1778:
1779: --get the PARENT_EVENT_KEY parameter
1780: l_parent_key := wf_event.getValueForParameter(EDR_CONSTANTS_GRP.g_parent_event_key,p_event.Parameter_List);
1781:
1782: wf_log_pkg.string(1, 'EDR_PSIG_rule.psig_rule','Parent Event Key:'||l_parent_key);
1783:
1784: --get the PARENT_ERECORD_ID parameter
1785: l_parent_erecord_id := wf_event.getValueForParameter(EDR_CONSTANTS_GRP.g_parent_erecord_id,p_event.Parameter_List);
1786:
1783:
1784: --get the PARENT_ERECORD_ID parameter
1785: l_parent_erecord_id := wf_event.getValueForParameter(EDR_CONSTANTS_GRP.g_parent_erecord_id,p_event.Parameter_List);
1786:
1787: wf_log_pkg.string(1, 'EDR_PSIG_rule.psig_rule','Parent eRecord ID:'||l_parent_erecord_id);
1788:
1789: --find out if the requisite parameters are passed in the payload so as
1790: --to make it an inter event. either the parent event name AND parent event
1791: --key have to be passed in the payload OR all three, to make this an inter
1805: l_inter_event_mode := 'N';
1806:
1807: END IF;
1808:
1809: wf_log_pkg.string(1, 'EDR_PSIG_rule.psig_rule','Inter Event Mode: '||l_inter_event_mode);
1810:
1811: if (l_inter_event_mode = 'Y') then
1812: --Diagnostics Start
1813: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
1817: FND_MESSAGE.SET_TOKEN('PARENT_NAME',nvl(l_parent_event,'NULL'));
1818: FND_MESSAGE.SET_TOKEN('PARENT_KEY',nvl(l_parent_key,'NULL'));
1819: FND_MESSAGE.SET_TOKEN('PARENT_EREC_ID',l_parent_erecord_id);
1820: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
1821: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
1822: FALSE
1823: );
1824: end if;
1825: --Diagnostics End
1842: select count(*) INTO l_no_enabled_eres_sub
1843: from wf_events a, wf_event_subscriptions b
1844: where a.GUID = b.EVENT_FILTER_GUID
1845: and a.name = l_parent_event
1846: and b.RULE_FUNCTION='EDR_PSIG_RULE.PSIG_RULE'
1847: --Bug No 4912782- Start
1848: and b.source_type = 'LOCAL'
1849: and b.system_guid = hextoraw(wf_core.translate('WF_SYSTEM_GUID')) ;
1850: --Bug No 4912782- End
1860: select count(*) INTO l_no_enabled_eres_sub
1861: from wf_events a, wf_event_subscriptions b
1862: where a.GUID = b.EVENT_FILTER_GUID
1863: and a.name = l_parent_event
1864: and b.RULE_FUNCTION='EDR_PSIG_RULE.PSIG_RULE'
1865: and b.STATUS = 'ENABLED'
1866: --Bug No 4912782- Start
1867: and b.source_type = 'LOCAL'
1868: and b.system_guid = hextoraw(wf_core.translate('WF_SYSTEM_GUID')) ;
1895: FND_MESSAGE.SET_TOKEN('CHILD_NAME',p_event.getEventName());
1896: FND_MESSAGE.SET_TOKEN('PARENT_EVENT',l_parent_event);
1897: FND_MESSAGE.SET_TOKEN('RELATION',l_relationship);
1898: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
1899: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
1900: FALSE
1901: );
1902: end if;
1903: --Diagnostics End
1901: );
1902: end if;
1903: --Diagnostics End
1904:
1905: wf_log_pkg.string(1, 'EDR_PSIG_rule.psig_rule','Relationship between parent and child:'||l_relationship);
1906:
1907: --l_relationship can have three possible values
1908: --EVALUATE_NORMAL, IGNORE_SIGNATURE, ERECORD_ONLY
1909: end if;
1917: select count(*) INTO l_no_enabled_eres_sub
1918: from wf_events a, wf_event_subscriptions b
1919: where a.GUID = b.EVENT_FILTER_GUID
1920: and a.name = p_event.event_name
1921: and b.RULE_FUNCTION='EDR_PSIG_RULE.PSIG_RULE'
1922: and b.STATUS = 'ENABLED'
1923: --Bug No 4912782- Start
1924: and b.source_type = 'LOCAL'
1925: and b.system_guid = hextoraw(wf_core.translate('WF_SYSTEM_GUID')) ;
1938: FROM FND_APPLICATION A, WF_EVENTS B
1939: WHERE A.APPLICATION_SHORT_NAME = B.OWNER_TAG
1940: AND B.NAME=P_EVENT.getEventName( );
1941:
1942: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Application_id :'||l_application_id );
1943: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','event key :'||P_EVENT.getEventKey( ));
1944: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Trans Type :'||NVL(l_ame_transaction_type,P_EVENT.getEventName( )) );
1945:
1946: /* AME Enhancement Code. Determine if singature is need or not and also get approvers */
1939: WHERE A.APPLICATION_SHORT_NAME = B.OWNER_TAG
1940: AND B.NAME=P_EVENT.getEventName( );
1941:
1942: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Application_id :'||l_application_id );
1943: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','event key :'||P_EVENT.getEventKey( ));
1944: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Trans Type :'||NVL(l_ame_transaction_type,P_EVENT.getEventName( )) );
1945:
1946: /* AME Enhancement Code. Determine if singature is need or not and also get approvers */
1947: -- if the inter event mode is on and the relationship is ERECORD_ONLY then
1940: AND B.NAME=P_EVENT.getEventName( );
1941:
1942: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Application_id :'||l_application_id );
1943: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','event key :'||P_EVENT.getEventKey( ));
1944: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Trans Type :'||NVL(l_ame_transaction_type,P_EVENT.getEventName( )) );
1945:
1946: /* AME Enhancement Code. Determine if singature is need or not and also get approvers */
1947: -- if the inter event mode is on and the relationship is ERECORD_ONLY then
1948: -- also we need to go to AME to get the transaction type
1977: FND_MESSAGE.SET_TOKEN('EVENT_NAME',p_event.getEventName());
1978: FND_MESSAGE.SET_TOKEN('EVENT_KEY',p_event.getEventKey());
1979: FND_MESSAGE.SET_TOKEN('DATA_SOURCE','VIEW OBJECT');
1980: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
1981: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
1982: FALSE
1983: );
1984: end if;
1985: --Diagnostics End
1990: delete edr_erecord_id_temp;
1991:
1992: SELECT EDR_ERECORDS_S.NEXTVAL into l_edr_Event_id from DUAL;
1993: INSERT into edr_erecord_id_temp (document_id) values (l_edr_Event_id);
1994: wf_log_pkg.string(3, 'EDR_PSIG_RULE.psig_rule','eRecord id: '||l_edr_Event_id||' will be sent to ECX');
1995:
1996: --Bug 3893101: Start
1997: --Obtain the value of transform xml parameter.
1998: l_transform_xml := NVL(wf_event.getValueForParameter('TRANSFORM_XML',p_event.Parameter_List),
2009: i_log_file => l_log_file,
2010: o_payload => l_erecord_data
2011: );
2012:
2013: wf_log_pkg.string(3, 'EDR_PSIG_RULE.psig_rule','ecx inbound trig called');
2014:
2015: --If it is set to 'N' then do not perform the XML to XML transformation.
2016: --Take the source XML as the target itself.
2017: elsif l_transform_xml = 'N' then
2018: --We need to recreate the event CLOB in another XML CLOB as
2019: --the CLOB obtained from the event definition cannot be modified.
2020: DBMS_LOB.CREATETEMPORARY(l_erecord_data, TRUE, DBMS_LOB.SESSION);
2021: DBMS_LOB.COPY(l_erecord_data,l_event_data,DBMS_LOB.GETLENGTH(l_event_data));
2022: l_attachment_string_details := wf_event.getValueForParameter('EDR_PSIG_ATTACHMENT',p_event.Parameter_List);
2023: if l_attachment_string_details is not null then
2024: EDR_ATTACHMENTS_GRP.ADD_ERP_ATTACH(p_attachment_string => l_attachment_string_details);
2025: end if;
2026:
2023: if l_attachment_string_details is not null then
2024: EDR_ATTACHMENTS_GRP.ADD_ERP_ATTACH(p_attachment_string => l_attachment_string_details);
2025: end if;
2026:
2027: wf_log_pkg.string(3, 'EDR_PSIG_RULE.psig_rule','no ecx transformation required');
2028: else
2029: raise TRANSFORM_XML_VAR_ERROR;
2030: end if;
2031: --Bug 3893101: End
2048: FND_MESSAGE.SET_TOKEN('EVENT_KEY',p_event.getEventKey());
2049: FND_MESSAGE.SET_TOKEN('XML_MAP_CODE',l_xml_map_code);
2050: FND_MESSAGE.SET_TOKEN('TRANS','XML TO XML');
2051: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
2052: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
2053: FALSE
2054: );
2055: end if;
2056: --Diagnostics End
2060: FND_MESSAGE.SET_NAME('EDR','EDR_FWKRULE_NO_XML_TRANS_EVT');
2061: FND_MESSAGE.SET_TOKEN('EVENT_NAME',p_event.getEventName());
2062: FND_MESSAGE.SET_TOKEN('EVENT_KEY',p_event.getEventKey());
2063: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
2064: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
2065: FALSE
2066: );
2067: end if;
2068: --Diagnostics End
2076: set event_xml = l_erecord_data
2077: where event_name = l_event_name
2078: and event_key = l_event_key;
2079:
2080: wf_log_pkg.string(3, 'EDR_PSIG_RULE.psig_rule','updated edr_final_xml_gt with the final xml');
2081: else
2082: --Diagnostics Start
2083: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2084: FND_MESSAGE.SET_NAME('EDR','EDR_FWKRULE_DATA_SOURCE_EVT');
2085: FND_MESSAGE.SET_TOKEN('EVENT_NAME',p_event.getEventName());
2086: FND_MESSAGE.SET_TOKEN('EVENT_KEY',p_event.getEventKey());
2087: FND_MESSAGE.SET_TOKEN('DATA_SOURCE','DATABASE');
2088: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
2089: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
2090: FALSE
2091: );
2092: end if;
2093: --Diagnostics End
2101:
2102: -- Bug 2674799 : start
2103: if (l_inter_event_mode = 'Y' and l_relationship = EDR_CONSTANTS_GRP.g_erecord_only) then
2104: l_trans_value_only := 'Y';
2105: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','no need to find out approvers form ame as interevent relationship forces erecord_only');
2106: else
2107: EDR_UTILITIES.GET_APPROVERS(P_APPLICATION_ID => l_application_id,
2108: P_TRANSACTION_ID => p_event.getEventKey(),
2109: P_TRANSACTION_TYPE => NVL(l_ame_transaction_type,p_event.getEventName()),
2109: P_TRANSACTION_TYPE => NVL(l_ame_transaction_type,p_event.getEventName()),
2110: X_approvers => approverList,
2111: X_rule_Ids => l_ruleids,
2112: X_rule_Descriptions => l_rulenames);
2113: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','called ame to get the approvers');
2114: END IF ;
2115: -- Bug 2674799: end
2116:
2117: -- Bug 4126932 : END
2118:
2119: --clean up temp table
2120: delete from EDR_FINAL_XML_GT where event_name = l_event_name and event_key=l_event_key;
2121:
2122: wf_log_pkg.string(3, 'EDR_PSIG_RULE.psig_rule','AME API Called. Total Approver '||approverlist.count);
2123:
2124: -- get the Application Name
2125: select ltrim(rtrim(application_name)) into l_application_name
2126: from ame_Calling_Apps
2145: FND_MESSAGE.SET_NAME('EDR','EDR_FWKRULE_NO_APPROVERS_EVT');
2146: FND_MESSAGE.SET_TOKEN('EVENT_NAME',p_event.getEventName());
2147: FND_MESSAGE.SET_TOKEN('EVENT_KEY',p_event.getEventKey());
2148: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
2149: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
2150: FALSE
2151: );
2152: end if;
2153: --Diagnostics End
2266: -- event1=ERECORD_ONLY then we need to capture eRecord unconditionaly
2267: -- by setting l_erecord_required = 'Y' we will achieve this.
2268: --
2269: l_erecord_required := 'Y';
2270: wf_log_pkg.string(3, 'EDR_PSIG_rule.psig_rule','Get Only the input variables at txn level');
2271: end if;
2272: --ER # 2966866 end
2273:
2274: for i in 1..l_ruleids.count loop
2279: else
2280: l_rule_id := l_ruleids(i);
2281: end if;
2282:
2283: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Rule_id: '||l_ruleids(i)||' Rule '||l_rulenames(i));
2284:
2285: -- Bug 3214495 : Start
2286:
2287: EDR_STANDARD.GET_AMERULE_INPUT_VARIABLES( transactiontypeid =>NVL(l_ame_transaction_type,P_EVENT.getEventName( )),
2290: ameruleinputvalues=>l_rulevalues);
2291:
2292: -- Bug 3214495 : End
2293:
2294: wf_log_pkg.string(3, 'EDR_PSIG_RULE.psig_rule','Total Input Values '||l_rulevalues.count );
2295: if l_rulevalues.count > 0 then
2296: for i in 1..l_rulevalues.count loop
2297: if l_rulevalues(i).input_name = 'ESIG_REQUIRED' then
2298: l_rule_esign_required:=upper(l_rulevalues(i).input_value);
2352: --Start Bug 5158772
2353: IF l_force_erecord = 'Y' then
2354: l_style_sheet := l_temp_style_sheet;
2355: l_style_sheet_ver := l_temp_style_sheet_ver;
2356: wf_log_pkg.string(3, 'EDR_PSIG_rule.psig_rule','Force Ereocrd setting style sheet and version');
2357: end if;
2358: --End Bug 5158772
2359: end loop;
2360:
2373: l_style_sheet := l_temp_style_sheet;
2374: l_style_sheet_ver := l_temp_style_sheet_ver;
2375: -- Bug : 3499326 - end
2376:
2377: wf_log_pkg.string(3, 'EDR_PSIG_rule.psig_rule','Inter Event Mode and No eSignature');
2378: end if;
2379: --ER # 2966866 end
2380:
2381:
2384: L_STYLE_SHEET_TYPE := UPPER(SUBSTR(L_STYLE_SHEET,LENGTH(L_STYLE_SHEET)-2,LENGTH(L_STYLE_SHEET)));
2385: -- Bug 3456399 : End
2386: --Bug: 3170251 : End
2387:
2388: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Signature Required :'||l_esign_required);
2389: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','eRecord Required :'||l_erecord_required);
2390: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Style Sheet :'||l_style_sheet);
2391: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','StyleSheet Version :'||l_style_sheet_ver);
2392: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','StyleSheet repository :'||l_style_sheet_repository);
2385: -- Bug 3456399 : End
2386: --Bug: 3170251 : End
2387:
2388: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Signature Required :'||l_esign_required);
2389: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','eRecord Required :'||l_erecord_required);
2390: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Style Sheet :'||l_style_sheet);
2391: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','StyleSheet Version :'||l_style_sheet_ver);
2392: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','StyleSheet repository :'||l_style_sheet_repository);
2393:
2386: --Bug: 3170251 : End
2387:
2388: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Signature Required :'||l_esign_required);
2389: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','eRecord Required :'||l_erecord_required);
2390: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Style Sheet :'||l_style_sheet);
2391: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','StyleSheet Version :'||l_style_sheet_ver);
2392: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','StyleSheet repository :'||l_style_sheet_repository);
2393:
2394: --Diagnostics Start
2387:
2388: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Signature Required :'||l_esign_required);
2389: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','eRecord Required :'||l_erecord_required);
2390: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Style Sheet :'||l_style_sheet);
2391: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','StyleSheet Version :'||l_style_sheet_ver);
2392: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','StyleSheet repository :'||l_style_sheet_repository);
2393:
2394: --Diagnostics Start
2395: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2388: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Signature Required :'||l_esign_required);
2389: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','eRecord Required :'||l_erecord_required);
2390: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Style Sheet :'||l_style_sheet);
2391: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','StyleSheet Version :'||l_style_sheet_ver);
2392: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','StyleSheet repository :'||l_style_sheet_repository);
2393:
2394: --Diagnostics Start
2395: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2396: FND_MESSAGE.SET_NAME('EDR','EDR_FWKRULE_PARAM_LIST_EVT');
2402: FND_MESSAGE.SET_TOKEN('STYLE_VER',l_style_sheet_ver);
2403: FND_MESSAGE.SET_TOKEN('STYLE_REP',l_style_sheet_repository);
2404: FND_MESSAGE.SET_TOKEN('XML_MAP_CODE',l_xml_map_code);
2405: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
2406: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
2407: FALSE
2408: );
2409: end if;
2410: --Diagnostics End
2432:
2433: l_audit_group := NVL(wf_event.getValueForParameter('EDR_AUDIT_GROUP',p_event.Parameter_List),
2434: P_EVENT.getEventName( ));
2435:
2436: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','XML Map Code :'||l_xml_map_code );
2437: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Audit Group :'||l_audit_group );
2438: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Setting ECX parameter');
2439:
2440: /* Set Additional Parameters required by Esignature */
2433: l_audit_group := NVL(wf_event.getValueForParameter('EDR_AUDIT_GROUP',p_event.Parameter_List),
2434: P_EVENT.getEventName( ));
2435:
2436: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','XML Map Code :'||l_xml_map_code );
2437: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Audit Group :'||l_audit_group );
2438: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Setting ECX parameter');
2439:
2440: /* Set Additional Parameters required by Esignature */
2441: /* wf_event.AddParameterToList('SUB_GUID', p_subscription_guid,p_event.Parameter_List); Subscription ID */
2434: P_EVENT.getEventName( ));
2435:
2436: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','XML Map Code :'||l_xml_map_code );
2437: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Audit Group :'||l_audit_group );
2438: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','Setting ECX parameter');
2439:
2440: /* Set Additional Parameters required by Esignature */
2441: /* wf_event.AddParameterToList('SUB_GUID', p_subscription_guid,p_event.Parameter_List); Subscription ID */
2442: wf_event.AddParameterToList('ECX_MAP_CODE', l_xml_map_code,p_event.Parameter_List); /* XML Map Code*/
2465:
2466: -- Bug 5158510 :start
2467: wf_event.AddParameterToList(EDR_CONSTANTS_GRP.G_SIGNATURE_MODE, l_signature_mode,p_event.Parameter_List);
2468: -- Bug 5158510 :end
2469: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','ECX Parameter set have been set' );
2470:
2471: /* Generate XML Document */
2472: wf_log_pkg.string(3, 'EDR_PSIG_RULE.psig_rule','Calling ECX Standard package to generate XML' );
2473: -- Bug 3960236 : Start
2468: -- Bug 5158510 :end
2469: wf_log_pkg.string(1, 'EDR_PSIG_RULE.psig_rule','ECX Parameter set have been set' );
2470:
2471: /* Generate XML Document */
2472: wf_log_pkg.string(3, 'EDR_PSIG_RULE.psig_rule','Calling ECX Standard package to generate XML' );
2473: -- Bug 3960236 : Start
2474: -- Fetch the payload parameter
2475: L_XML_GENERATION_API := wf_event.getValueForParameter('XML_GENERATION_API',p_event.Parameter_List);
2476:
2511:
2512: INSERT into edr_erecord_id_temp (document_id) values (l_edr_Event_id);
2513:
2514: --Obtain the attachment string parameter.
2515: l_attachment_string_details := wf_event.getValueForParameter('EDR_PSIG_ATTACHMENT',p_event.Parameter_List);
2516:
2517: --If the attachment string exists then call the attachment API to create the attachments.
2518: if l_attachment_string_details is not null then
2519: EDR_ATTACHMENTS_GRP.ADD_ERP_ATTACH(p_attachment_string => l_attachment_string_details);
2540: --Commenting changes made for red lining.
2541:
2542: if ( nvl(l_redline_required,'N') = 'Y') then
2543: l_snapstatus:= PRE_TX_SNAPSHOT(l_edr_Event_id,l_xml_map_code,P_EVENT.getEventKey());
2544: wf_log_pkg.string(3, 'EDR_PSIG_RULE.psig_rule','After Calling Snapshot to generate XML'||P_EVENT.getEventKey( ));
2545: END IF;
2546: --Bug 4306292: End
2547: -- Bug 3761813 : end
2548:
2546: --Bug 4306292: End
2547: -- Bug 3761813 : end
2548:
2549: INSERT into edr_erecord_id_temp (document_id) values (l_edr_Event_id);
2550: wf_log_pkg.string(3, 'EDR_PSIG_RULE.psig_rule','eRecord id: '||l_edr_Event_id||' has been sent to ECX');
2551:
2552: L_XML_DOCUMENT:=ECX_STANDARD.GENERATE(p_event_name => P_EVENT.getEventName(),
2553: p_event_key => P_EVENT.getEventKey(),
2554: p_parameter_list => p_event.Parameter_List);
2560: FND_MESSAGE.SET_TOKEN('EVENT_KEY',p_event.getEventKey());
2561: FND_MESSAGE.SET_TOKEN('XML_MAP_CODE',l_xml_map_code);
2562: FND_MESSAGE.SET_TOKEN('TRANS','DB TO XML');
2563: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
2564: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
2565: FALSE
2566: );
2567: end if;
2568: --Diagnostics End
2569:
2570: end if;
2571: --Bug 3667036 : End
2572:
2573: wf_log_pkg.string(3, 'EDR_PSIG_RULE.psig_rule','XML Document Generated' );
2574:
2575: --Bug 5724159 :Start
2576: --When the number of approvers is 0,Adhoc signer capability is ALL or ADHOC and the
2577: --Signature mode is SHORT,Error message needs to displayed. E-Record will not be captured in this scenario.
2627: end if;
2628: --Bug 4306292: End
2629: --Bug 3761813 : end
2630:
2631: wf_log_pkg.string(3, 'EDR_PSIG_RULE.psig_rule','XML Document Set to event Data' );
2632:
2633: /* GET Approver List.
2634: ame_api.getAllApprovers(applicationIdIn=>l_application_Id,
2635: transactionIdIn=>P_EVENT.getEventKey( ),
2642: FND_MESSAGE.SET_TOKEN('EVENT_NAME',p_event.getEventName());
2643: FND_MESSAGE.SET_TOKEN('EVENT_KEY',p_event.getEventKey());
2644: FND_MESSAGE.SET_TOKEN('COUNT',approverList.count);
2645: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
2646: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
2647: FALSE
2648: );
2649: end if;
2650: --Diagnostics End
2706: FND_MESSAGE.SET_NAME('EDR','EDR_EINITIALS_SIGN_MODE_EVT');
2707: FND_MESSAGE.SET_TOKEN('EVENT_NAME',p_event.getEventName());
2708: FND_MESSAGE.SET_TOKEN('EVENT_KEY',p_event.getEventKey());
2709: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
2710: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
2711: FALSE
2712: );
2713: end if;
2714: --Diagnostics End
2732: FND_MESSAGE.SET_TOKEN('EVENT_NAME',p_event.getEventName());
2733: FND_MESSAGE.SET_TOKEN('EVENT_KEY',p_event.getEventKey());
2734: FND_MESSAGE.SET_TOKEN('APPROVER_LIST',l_approver_list);
2735: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
2736: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
2737: FALSE
2738: );
2739: end if;
2740: --Diagnostics End
2774: FND_MESSAGE.SET_TOKEN('EVENT_NAME',p_event.getEventName());
2775: FND_MESSAGE.SET_TOKEN('EVENT_KEY',p_event.getEventKey());
2776: FND_MESSAGE.SET_TOKEN('APPROVER_COUNT',l_approver_count);
2777: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
2778: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
2779: FALSE
2780: );
2781: end if;
2782: --Diagnostics End
2827: FND_MESSAGE.SET_TOKEN('EVENT_NAME',p_event.getEventName());
2828: FND_MESSAGE.SET_TOKEN('EVENT_KEY',p_event.getEventKey());
2829: FND_MESSAGE.SET_TOKEN('DEFER_MODE',l_einitials_defer_mode);
2830: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
2831: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
2832: FALSE
2833: );
2834: end if;
2835: --Diagnostics End
2858: wf_event.AddParameterToList('#WF_PAGEFLOW_ITEMPROCESS', l_wfprocess,p_event.Parameter_List); /* Page Flow Workflow process*/
2859: wf_event.AddParameterToList('#WF_PAGEFLOW_ITEMKEY', l_edr_event_id,p_event.Parameter_List); /* Item Key*/
2860:
2861: /* CAll Page Flow Creation API */
2862: wf_log_pkg.string(3, 'EDR_PSIG_RULE.psig_rule','Calling Page Flow Creation Procedure');
2863:
2864: --Diagnostics Start
2865: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2866: FND_MESSAGE.SET_NAME('EDR','EDR_FWKRULE_WF_PARAMS_EVT');
2869: FND_MESSAGE.SET_TOKEN('ITEM_TYPE',l_wftype);
2870: FND_MESSAGE.SET_TOKEN('ITEM_KEY',l_edr_event_id);
2871: FND_MESSAGE.SET_TOKEN('PROCESS',l_wfprocess);
2872: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,
2873: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
2874: FALSE
2875: );
2876: end if;
2877: --Diagnostics End
2933: p_subscription_guid => p_subscription_guid,
2934: P_approverlist => approverList,
2935: P_ERR_CODE => l_error,
2936: P_ERR_MSG => l_error_msg);
2937: wf_log_pkg.string(3, 'EDR_PSIG_RULE.psig_rule','Page Flow Returned '||l_return_status);
2938:
2939: IF l_return_status = 'ERROR' OR L_ERROR is not null then
2940: raise PAGE_FLOW_FAILED;
2941: ELSE
2966: fnd_message.set_token( 'EVENT', l_error_event);
2967: --Diagnostics Start
2968: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2969: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
2970: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
2971: FALSE
2972: );
2973: end if;
2974: --Diagnostics End
2981:
2982: --Diagnostics Start
2983: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2984: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
2985: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
2986: FALSE
2987: );
2988: end if;
2989: --Diagnostics End
2996: fnd_message.set_token( 'EVENT',l_error_event);
2997: --Diagnostics Start
2998: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2999: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
3000: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
3001: FALSE
3002: );
3003: end if;
3004: --Diagnostics End
3006: APP_EXCEPTION.RAISE_EXCEPTION;
3007: return EDR_CONSTANTS_GRP.g_error_status;
3008:
3009: when PAGE_FLOW_FAILED then
3010: Wf_Core.Context('EDR_PSIG_RULE', 'PSIG_RULE', p_event.getEventName(), p_subscription_guid);
3011: wf_event.setErrorInfo(p_event,SQLERRM || 'ERROR');
3012: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
3013: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
3014: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
3010: Wf_Core.Context('EDR_PSIG_RULE', 'PSIG_RULE', p_event.getEventName(), p_subscription_guid);
3011: wf_event.setErrorInfo(p_event,SQLERRM || 'ERROR');
3012: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
3013: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
3014: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
3015: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','PSIG_RULE');
3016: --Diagnostics Start
3017: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
3018: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
3015: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','PSIG_RULE');
3016: --Diagnostics Start
3017: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
3018: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
3019: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
3020: FALSE
3021: );
3022: end if;
3023: --Diagnostics End
3032: FND_MESSAGE.SET_TOKEN('LOG',l_log_file);
3033: --Diagnostics Start
3034: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
3035: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
3036: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
3037: FALSE
3038: );
3039: end if;
3040: --Diagnostics End
3049: FND_MESSAGE.SET_TOKEN('EVENT_KEY',p_event.getEventKey());
3050: --Diagnostics Start
3051: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
3052: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
3053: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
3054: FALSE
3055: );
3056: end if;
3057: --Diagnostics End
3066: FND_MESSAGE.SET_TOKEN('EVENT_KEY',p_event.getEventKey());
3067: --Diagnostics Start
3068: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
3069: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
3070: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
3071: FALSE
3072: );
3073: end if;
3074: --Diagnostics End
3082: FND_MESSAGE.SET_TOKEN('APPROVER_NAMES',l_invalid_approvers);
3083: --Diagnostics Start
3084: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
3085: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
3086: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
3087: FALSE
3088: );
3089: end if;
3090: --Diagnostics End
3098: FND_MESSAGE.SET_TOKEN('STRING',l_approver_list);
3099: --Diagnostics Start
3100: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
3101: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
3102: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
3103: FALSE
3104: );
3105: end if;
3106: --Diagnostics End
3115:
3116: --Diagnostics Start
3117: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
3118: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
3119: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
3120: FALSE
3121: );
3122: end if;
3123: --Diagnostics End
3131:
3132: --Diagnostics Start
3133: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
3134: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
3135: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
3136: FALSE
3137: );
3138: end if;
3139: --Diagnostics End
3149: FND_MESSAGE.SET_TOKEN('APINAME',SQLERRM||': '||l_xml_generation_api);
3150: --Diagnostics Start
3151: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
3152: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
3153: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
3154: FALSE
3155: );
3156: end if;
3157: --Diagnostics End
3167: FND_MESSAGE.SET_TOKEN('APINAME',SQLERRM);
3168: --Diagnostics Start
3169: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
3170: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
3171: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
3172: FALSE
3173: );
3174: end if;
3175: --Diagnostics End
3186: FND_MESSAGE.SET_TOKEN('EVENT_KEY',p_event.getEventKey());
3187: --Diagnostics Start
3188: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
3189: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,
3190: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
3191: FALSE
3192: );
3193: end if;
3194: --Diagnostics End
3196: return EDR_CONSTANTS_GRP.g_error_status;
3197: --Bug 5724159 :End
3198:
3199: when others then
3200: Wf_Core.Context('EDR_PSIG_RULE', 'PSIG_RULE', p_event.getEventName(), p_subscription_guid);
3201: wf_event.setErrorInfo(p_event,SQLERRM || 'ERROR');
3202: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
3203: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
3204: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
3200: Wf_Core.Context('EDR_PSIG_RULE', 'PSIG_RULE', p_event.getEventName(), p_subscription_guid);
3201: wf_event.setErrorInfo(p_event,SQLERRM || 'ERROR');
3202: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
3203: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',nvl(l_error_msg,SQLERRM));
3204: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_RULE');
3205: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','PSIG_RULE');
3206: --Diagnostics Start
3207: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
3208: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
3205: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','PSIG_RULE');
3206: --Diagnostics Start
3207: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
3208: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
3209: 'edr.plsql.EDR_PSIG_RULE.PSIG_RULE',
3210: FALSE
3211: );
3212: end if;
3213: --Diagnostics End
3216: return EDR_CONSTANTS_GRP.g_error_status;
3217:
3218: end PSIG_RULE;
3219:
3220: end EDR_PSIG_RULE;