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.EDR_PSIG_PAGE_FLOW dependencies on EDR_PSIG

Line 1: PACKAGE BODY EDR_PSIG_PAGE_FLOW AS

1: PACKAGE BODY EDR_PSIG_PAGE_FLOW AS
2: /* $Header: EDRESGPB.pls 120.11.12000000.1 2007/01/18 05:52:51 appldev ship $ */
3:
4: --global variables
5: G_YES CONSTANT varchar2(15) := 'COMPLETE:Y';

Line 128: l_eRecord_id := GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype,p_itemkey,'EDR_PSIG_DOC_ID');

124: -- Bug #3368868 : Starts
125: -- Get the transaction status
126:
127: -- Bug 3903471 : Start
128: l_eRecord_id := GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype,p_itemkey,'EDR_PSIG_DOC_ID');
129:
130: if l_eRecord_id is NULL THEN
131: l_eRecord_id := TO_NUMBER(GET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'#ERECORD_ID'),'999999999999.999999');
132: end if;

Line 139: EDR_PSIG_PAGE_FLOW.SIGNATURE_STATUS := p_result;

135: -- Bug 3903471 : End
136:
137: -- Bug #3368868 : Ends
138:
139: EDR_PSIG_PAGE_FLOW.SIGNATURE_STATUS := p_result;
140: EDR_STANDARD_PUB.G_SIGNATURE_STATUS := p_result;
141: -- Bug #3368868 : Starts
142: -- If transaction status is ERROR do not call post_op_api
143: IF l_trans_status <> 'ERROR' THEN

Line 162: EDR_PSIG_PAGE_FLOW.SIGNATURE_STATUS := null;

158: END IF;
159:
160: -- Bug 3411859 : Start
161: -- Signature status should be set to null in all cases .
162: EDR_PSIG_PAGE_FLOW.SIGNATURE_STATUS := null;
163: EDR_STANDARD_PUB.G_SIGNATURE_STATUS := null;
164: -- Bug 3411859 : End
165:
166: EXCEPTION

Line 168: EDR_PSIG_PAGE_FLOW.SIGNATURE_STATUS := null;

164: -- Bug 3411859 : End
165:
166: EXCEPTION
167: WHEN OTHERS THEN
168: EDR_PSIG_PAGE_FLOW.SIGNATURE_STATUS := null;
169: EDR_STANDARD_PUB.G_SIGNATURE_STATUS := null;
170: WF_CORE.CONTEXT('EDR_PSIG_PAGE_FLOW','Post Operation Proc Excution',p_itemtype,p_itemkey,l_SQL);
171: raise;
172: END;

Line 170: WF_CORE.CONTEXT('EDR_PSIG_PAGE_FLOW','Post Operation Proc Excution',p_itemtype,p_itemkey,l_SQL);

166: EXCEPTION
167: WHEN OTHERS THEN
168: EDR_PSIG_PAGE_FLOW.SIGNATURE_STATUS := null;
169: EDR_STANDARD_PUB.G_SIGNATURE_STATUS := null;
170: WF_CORE.CONTEXT('EDR_PSIG_PAGE_FLOW','Post Operation Proc Excution',p_itemtype,p_itemkey,l_SQL);
171: raise;
172: END;
173:
174:

Line 192: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','Get_event_disp_name',p_event_id);

188: from wf_events_vl
189: where name = l_event_name;
190: return(L_event_disp_name);
191: EXCEPTION WHEN OTHERS THEN
192: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','Get_event_disp_name',p_event_id);
193: raise;
194: END;
195:
196:

Line 332: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','AUTHENTICATE_RESPONSE',p_itemtype,p_itemkey,'Notified');

328: p_resultout := 'COMPLETE:';
329: END IF;
330: EXCEPTION
331: WHEN OTHERS THEN
332: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','AUTHENTICATE_RESPONSE',p_itemtype,p_itemkey,'Notified');
333: raise;
334: END;
335: /*******************************************************************************************
336: ***** Update record status to cancel assuming EVENT_ID and Workflow ITEM_KEY is Same ***

Line 348: EDR_PSIG_DOC_ERR EXCEPTION;

344: p_resultout OUT NOCOPY VARCHAR2
345: )
346: IS
347: L_doc_id NUMBER;
348: EDR_PSIG_DOC_ERR EXCEPTION;
349: l_error_num NUMBER;
350: l_ERROR_MESG VARCHAR(2000);
351: --Bug 3634954 : Start
352: --A new variable to hold the erecord id in varchar2 format

Line 366: --#ERECORD_ID workflow parameter instead of EDR_PSIG_DOC_ID parameter.

362: WHERE EVENT_ID = P_itemkey;
363:
364: --Bug 3634954 : Start
365: --The following line is commented, as from now on erecord id will be fetched from the
366: --#ERECORD_ID workflow parameter instead of EDR_PSIG_DOC_ID parameter.
367:
368: --Bug 3903471 : Start
369: --However #ERECORD_ID parameter is not used in older versions. Hence to
370: --support backward compatibility a conditional check would be provided.

Line 372: l_doc_id := GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype, p_itemkey,'EDR_PSIG_DOC_ID');

368: --Bug 3903471 : Start
369: --However #ERECORD_ID parameter is not used in older versions. Hence to
370: --support backward compatibility a conditional check would be provided.
371:
372: l_doc_id := GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype, p_itemkey,'EDR_PSIG_DOC_ID');
373:
374: if l_doc_id is NULL THEN
375:
376: l_erecord_id := GET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype,p_itemkey,'#ERECORD_ID');

Line 390: EDR_PSIG.changeDocumentStatus( P_DOCUMENT_ID => l_doc_id,

386: --Bug 3634954 : End
387:
388:
389: IF l_doc_id IS NOT NULL THEN
390: EDR_PSIG.changeDocumentStatus( P_DOCUMENT_ID => l_doc_id,
391: P_STATUS => 'CANCEL',
392: P_ERROR => l_error_num,
393: P_ERROR_MSG => l_error_mesg);
394: --Bug 3207385: Start

Line 401: RAISE EDR_PSIG_DOC_ERR;

397: aname => EDR_CONSTANTS_GRP.G_FINAL_DOCUMENT_STATUS,
398: text_value => EDR_CONSTANTS_GRP.G_CANCEL_STATUS);
399: --Bug 3207385: End
400: IF l_ERROR_NUM IS NOT NULL THEN
401: RAISE EDR_PSIG_DOC_ERR;
402: END IF;
403: END IF;
404: -- Bug Fix: 3178035
405: -- Modified Page flow status to 'ERROR'

Line 413: WHEN EDR_PSIG_DOC_ERR THEN

409: SET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'#WF_PAGEFLOW_STATUS','ERROR');
410: p_resultout := 'COMPLETE:';
411: END IF;
412: EXCEPTION
413: WHEN EDR_PSIG_DOC_ERR THEN
414: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','CANCEL_RESPONSE',p_itemtype,p_itemkey,
415: l_error_num,L_ERROR_MESG);
416: raise;
417: WHEN OTHERS THEN

Line 414: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','CANCEL_RESPONSE',p_itemtype,p_itemkey,

410: p_resultout := 'COMPLETE:';
411: END IF;
412: EXCEPTION
413: WHEN EDR_PSIG_DOC_ERR THEN
414: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','CANCEL_RESPONSE',p_itemtype,p_itemkey,
415: l_error_num,L_ERROR_MESG);
416: raise;
417: WHEN OTHERS THEN
418: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','CANCEL_RESPONSE',p_itemtype,p_itemkey,'OK');

Line 418: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','CANCEL_RESPONSE',p_itemtype,p_itemkey,'OK');

414: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','CANCEL_RESPONSE',p_itemtype,p_itemkey,
415: l_error_num,L_ERROR_MESG);
416: raise;
417: WHEN OTHERS THEN
418: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','CANCEL_RESPONSE',p_itemtype,p_itemkey,'OK');
419: raise;
420: END;
421: /******************************************************************************************
422: *** This is the main procedure which controls total offline flow and response to done ***

Line 443: EDR_PSIG_DOC_ERR EXCEPTION;

439: l_EVENT_ID NUMBER;
440:
441: L_SIGNATURE_STATUS VARCHAR2(30);
442: L_doc_id NUMBER;
443: EDR_PSIG_DOC_ERR EXCEPTION;
444: l_error_num NUMBER;
445: l_ERROR_MESG VARCHAR(2000);
446: l_ERROR_MSG VARCHAR(4000);
447:

Line 457: Select original_recipient from edr_psig_details

453: l_esign_id VARCHAR2(100);
454: l_value VARCHAR2(100);
455:
456: CURSOR C1(l_document_id NUMBER) IS
457: Select original_recipient from edr_psig_details
458: where document_id = l_document_id and USER_RESPONSE is null;
459: -- Bug 4213923 : End
460:
461: --Bug 4577122: Start

Line 493: l_doc_id := GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype, p_itemkey,'EDR_PSIG_DOC_ID');

489: --Bug 4577122: End
490:
491: IF L_SIGNATURE_STATUS in ('SUCCESS','REJECTED','TIMEDOUT') THEN
492:
493: l_doc_id := GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype, p_itemkey,'EDR_PSIG_DOC_ID');
494:
495: --Bug 4577122: Start
496: --clear out the status etc fields of edr_psig_details IFF voting regime is F
497: if (l_voting_regime = ame_util.firstApproverVoting) then

Line 496: --clear out the status etc fields of edr_psig_details IFF voting regime is F

492:
493: l_doc_id := GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype, p_itemkey,'EDR_PSIG_DOC_ID');
494:
495: --Bug 4577122: Start
496: --clear out the status etc fields of edr_psig_details IFF voting regime is F
497: if (l_voting_regime = ame_util.firstApproverVoting) then
498: edr_psig.clear_pending_signatures(l_doc_id);
499: end if;
500: --Bug 4577122: End

Line 498: edr_psig.clear_pending_signatures(l_doc_id);

494:
495: --Bug 4577122: Start
496: --clear out the status etc fields of edr_psig_details IFF voting regime is F
497: if (l_voting_regime = ame_util.firstApproverVoting) then
498: edr_psig.clear_pending_signatures(l_doc_id);
499: end if;
500: --Bug 4577122: End
501:
502: UPDATE EDR_ERECORDS

Line 509: EDR_PSIG.closeDocument( P_DOCUMENT_ID => l_doc_id,

505:
506:
507: IF L_SIGNATURE_STATUS = 'SUCCESS' THEN
508:
509: EDR_PSIG.closeDocument( P_DOCUMENT_ID => l_doc_id,
510: P_ERROR => l_error_num,
511: P_ERROR_MSG => l_error_mesg);
512:
513: --Bug 3207385: Start

Line 521: RAISE EDR_PSIG_DOC_ERR;

517: text_value => EDR_CONSTANTS_GRP.G_COMPLETE_STATUS);
518: --Bug 3207385: End
519:
520: IF l_ERROR_NUM IS NOT NULL THEN
521: RAISE EDR_PSIG_DOC_ERR;
522: END IF;
523: ELSIF L_SIGNATURE_STATUS ='REJECTED' THEN
524: EDR_PSIG.changeDocumentStatus( P_DOCUMENT_ID => l_doc_id,
525: P_STATUS => 'REJECTED',

Line 524: EDR_PSIG.changeDocumentStatus( P_DOCUMENT_ID => l_doc_id,

520: IF l_ERROR_NUM IS NOT NULL THEN
521: RAISE EDR_PSIG_DOC_ERR;
522: END IF;
523: ELSIF L_SIGNATURE_STATUS ='REJECTED' THEN
524: EDR_PSIG.changeDocumentStatus( P_DOCUMENT_ID => l_doc_id,
525: P_STATUS => 'REJECTED',
526: P_ERROR => l_error_num,
527: P_ERROR_MSG => l_error_mesg);
528: --Bug 3207385: Start

Line 535: RAISE EDR_PSIG_DOC_ERR;

531: aname => EDR_CONSTANTS_GRP.G_FINAL_DOCUMENT_STATUS,
532: text_value => L_SIGNATURE_STATUS);
533: --Bug 3207385: End
534: IF l_ERROR_NUM IS NOT NULL THEN
535: RAISE EDR_PSIG_DOC_ERR;
536: END IF;
537:
538: ELSIF L_SIGNATURE_STATUS ='TIMEDOUT' THEN
539: /* Check for the first person timeout. In this case doc_id might be null.

Line 546: EDR_PSIG.changeDocumentStatus( P_DOCUMENT_ID => l_doc_id,

542: l_doc_id := GET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'PSIG_DOCUMENT_ID');
543: END IF;
544:
545:
546: EDR_PSIG.changeDocumentStatus( P_DOCUMENT_ID => l_doc_id,
547: P_STATUS => 'TIMEDOUT',
548: P_ERROR => l_error_num,
549: P_ERROR_MSG => l_error_mesg);
550: --Bug 3207385: Start

Line 558: RAISE EDR_PSIG_DOC_ERR;

554: text_value => L_SIGNATURE_STATUS);
555: --Bug 3207385: End
556:
557: IF l_ERROR_NUM IS NOT NULL THEN
558: RAISE EDR_PSIG_DOC_ERR;
559: END IF;
560:
561: END IF;
562:

Line 605: --update the edr_psig_details table for correct evidence store

601: P_NTF_ROUTING_COMMENTS => l_overriding_comments,
602: P_ERR_CODE => l_error_num,
603: P_ERR_MSG => l_error_mesg);
604:
605: --update the edr_psig_details table for correct evidence store
606: --information
607: UPDATE EDR_PSIG_DETAILS
608: SET USER_NAME=nvl(l_overriding_approver,l_username),
609: SIGNATURE_OVERRIDING_COMMENTS = l_overriding_comments

Line 607: UPDATE EDR_PSIG_DETAILS

603: P_ERR_MSG => l_error_mesg);
604:
605: --update the edr_psig_details table for correct evidence store
606: --information
607: UPDATE EDR_PSIG_DETAILS
608: SET USER_NAME=nvl(l_overriding_approver,l_username),
609: SIGNATURE_OVERRIDING_COMMENTS = l_overriding_comments
610: where document_id = l_doc_id
611: and user_response is null

Line 633: EDR_PSIG.changeDocumentStatus( P_DOCUMENT_ID => l_doc_id,

629:
630: p_resultout := 'COMPLETE:PSIG_INCOMPLETE';
631: SET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'#WF_PAGEFLOW_STATUS','FAILURE');
632: IF l_doc_id IS NOT NULL THEN
633: EDR_PSIG.changeDocumentStatus( P_DOCUMENT_ID => l_doc_id,
634: P_STATUS => 'ERROR',
635: P_ERROR => l_error_num,
636: P_ERROR_MSG => l_error_mesg);
637: IF l_ERROR_NUM IS NOT NULL THEN

Line 638: RAISE EDR_PSIG_DOC_ERR;

634: P_STATUS => 'ERROR',
635: P_ERROR => l_error_num,
636: P_ERROR_MSG => l_error_mesg);
637: IF l_ERROR_NUM IS NOT NULL THEN
638: RAISE EDR_PSIG_DOC_ERR;
639: END IF;
640: END IF;
641: ELSE
642: SET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'#WF_CURRENT_MODE','OFFLINE');

Line 650: EDR_PSIG.changeDocumentStatus( P_DOCUMENT_ID => l_doc_id,

646: SET ERECORD_SIGNATURE_STATUS = 'PENDING'
647: WHERE EVENT_ID = p_itemkey;
648:
649: IF l_doc_id IS NOT NULL THEN
650: EDR_PSIG.changeDocumentStatus( P_DOCUMENT_ID => l_doc_id,
651: P_STATUS => 'PENDING',
652: P_ERROR => l_error_num,
653: P_ERROR_MSG => l_error_mesg);
654: IF l_ERROR_NUM IS NOT NULL THEN

Line 655: RAISE EDR_PSIG_DOC_ERR;

651: P_STATUS => 'PENDING',
652: P_ERROR => l_error_num,
653: P_ERROR_MSG => l_error_mesg);
654: IF l_ERROR_NUM IS NOT NULL THEN
655: RAISE EDR_PSIG_DOC_ERR;
656: END IF;
657: END IF;
658:
659: p_resultout := 'COMPLETE:RESP_DONE_OFFLINE';

Line 667: WHEN EDR_PSIG_DOC_ERR THEN

663:
664: END IF; -- end if Run Mode
665:
666: EXCEPTION
667: WHEN EDR_PSIG_DOC_ERR THEN
668: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','PROCESS_RESPONSE',p_itemtype,p_itemkey,
669: l_error_num,l_error_msg||L_ERROR_MESG);
670: raise;
671: WHEN OTHERS THEN

Line 668: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','PROCESS_RESPONSE',p_itemtype,p_itemkey,

664: END IF; -- end if Run Mode
665:
666: EXCEPTION
667: WHEN EDR_PSIG_DOC_ERR THEN
668: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','PROCESS_RESPONSE',p_itemtype,p_itemkey,
669: l_error_num,l_error_msg||L_ERROR_MESG);
670: raise;
671: WHEN OTHERS THEN
672: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','PROCESS_RESPONSE',p_itemtype,p_itemkey,L_ERROR_MSG);

Line 672: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','PROCESS_RESPONSE',p_itemtype,p_itemkey,L_ERROR_MSG);

668: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','PROCESS_RESPONSE',p_itemtype,p_itemkey,
669: l_error_num,l_error_msg||L_ERROR_MESG);
670: raise;
671: WHEN OTHERS THEN
672: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','PROCESS_RESPONSE',p_itemtype,p_itemkey,L_ERROR_MSG);
673: raise;
674: END;
675:
676: /****************************************************************

Line 691: EDR_PSIG_NOT_NULL EXCEPTION;

687: )
688: IS
689: l_SIGNER_TYPE VARCHAR2(30);
690: l_signer_reason VARCHAR2(32);
691: EDR_PSIG_NOT_NULL EXCEPTION;
692: EDR_PSIG_DOC_ERR EXCEPTION;
693: EDR_PSIG_NOT_READ EXCEPTION;
694:
695: L_doc_id NUMBER;

Line 692: EDR_PSIG_DOC_ERR EXCEPTION;

688: IS
689: l_SIGNER_TYPE VARCHAR2(30);
690: l_signer_reason VARCHAR2(32);
691: EDR_PSIG_NOT_NULL EXCEPTION;
692: EDR_PSIG_DOC_ERR EXCEPTION;
693: EDR_PSIG_NOT_READ EXCEPTION;
694:
695: L_doc_id NUMBER;
696: L_signature_id NUMBER;

Line 693: EDR_PSIG_NOT_READ EXCEPTION;

689: l_SIGNER_TYPE VARCHAR2(30);
690: l_signer_reason VARCHAR2(32);
691: EDR_PSIG_NOT_NULL EXCEPTION;
692: EDR_PSIG_DOC_ERR EXCEPTION;
693: EDR_PSIG_NOT_READ EXCEPTION;
694:
695: L_doc_id NUMBER;
696: L_signature_id NUMBER;
697: l_error_num NUMBER;

Line 703: l_doc_params EDR_PSIG.params_table;

699:
700: l_doc_format VARCHAR2(30);
701: l_psig_event WF_EVENT_T;
702: l_paramlist WF_PARAMETER_LIST_T;
703: l_doc_params EDR_PSIG.params_table;
704: l_sign_params EDR_PSIG.params_table;
705: i INTEGER;
706:
707: l_event_xml CLOB ;

Line 704: l_sign_params EDR_PSIG.params_table;

700: l_doc_format VARCHAR2(30);
701: l_psig_event WF_EVENT_T;
702: l_paramlist WF_PARAMETER_LIST_T;
703: l_doc_params EDR_PSIG.params_table;
704: l_sign_params EDR_PSIG.params_table;
705: i INTEGER;
706:
707: l_event_xml CLOB ;
708: l_event_text CLOB ;

Line 873: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,

869: l_ignore_wfattr_notfound);
870: --Bug 4577122: End
871: -- Bug 5120197 : start
872: IF(p_funcmode = 'TRANSFER' OR p_funcmode = 'FORWARD') THEN
873: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
874: FND_MESSAGE.GET_STRING('EDR','EDR_EREC_REASSIGN_ERR'));
875: raise_application_error(-20003,FND_MESSAGE.GET_STRING('EDR','EDR_EREC_REASSIGN_ERR'));
876: END IF;
877:

Line 885: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,

881:
882: l_SIGNER_TYPE := GET_NOTIF_ITEM_ATTR_TEXT(wf_engine.context_nid,'WF_SIGNER_TYPE');
883: l_signer_reason := GET_NOTIF_ITEM_ATTR_TEXT(wf_engine.context_nid,'REASON_CODE');
884: IF l_signer_reason IS null OR l_SIGNER_TYPE IS NULL THEN
885: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
886: 'Signer Comment and Signing Reason code can not be null.');
887: raise EDR_PSIG_NOT_NULL;
888: END IF;
889:

Line 887: raise EDR_PSIG_NOT_NULL;

883: l_signer_reason := GET_NOTIF_ITEM_ATTR_TEXT(wf_engine.context_nid,'REASON_CODE');
884: IF l_signer_reason IS null OR l_SIGNER_TYPE IS NULL THEN
885: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
886: 'Signer Comment and Signing Reason code can not be null.');
887: raise EDR_PSIG_NOT_NULL;
888: END IF;
889:
890: -- Bug 3170251 : Check if user has selected yes for reading the attached eRecord
891: OPEN GET_USER_RESPONSE_RESULT;

Line 901: WF_CORE.CONTEXT('EDR_PSIG_PAGE_FLOW', 'UPDATE_NOTIF_RESPONSE',p_itemtype, p_itemkey,

897: -- attribute is not found for previous notificaitons backward compitability.
898: L_RESPONSE_READ := GET_NOTIF_ITEM_ATTR_TEXT(wf_engine.context_nid, 'READ_RESPONSE');
899: -- End Bug 3847779
900: IF (L_RESPONSE_READ = 'N') THEN
901: WF_CORE.CONTEXT('EDR_PSIG_PAGE_FLOW', 'UPDATE_NOTIF_RESPONSE',p_itemtype, p_itemkey,
902: FND_MESSAGE.GET_STRING('EDR','EDR_EREC_NOT_REVIEWED_ERR'));
903: raise_application_error(-20002,FND_MESSAGE.GET_STRING('EDR','EDR_EREC_NOT_REVIEWED_ERR'));
904: END IF;
905: END IF;

Line 985: l_doc_id := GET_WF_ITEM_ATTRIBUTE_NUMBER(l_item_type, l_item_key,'EDR_PSIG_DOC_ID');

981: */
982: --Bug 2674799 : End
983:
984: /* Following statements are to store data in PSIG evidance store */
985: l_doc_id := GET_WF_ITEM_ATTRIBUTE_NUMBER(l_item_type, l_item_key,'EDR_PSIG_DOC_ID');
986: IF l_doc_id is null THEN
987: l_psig_event := wf_engine.getItemAttrEvent(p_itemtype, p_itemkey,'#PSIG_EVENT');
988: l_event_xml := l_psig_event.getEventData();
989: l_event_name := l_psig_event.getEventName();

Line 1005: EDR_PSIG.updateDocument(P_PSIG_XML => l_event_xml,

1001: -- Bug 3474765 : End
1002: end if;
1003: /* END of PDF fix */
1004:
1005: EDR_PSIG.updateDocument(P_PSIG_XML => l_event_xml,
1006: P_PSIG_DOCUMENT => l_event_xml,
1007: P_PSIG_DOCUMENTFORMAT => l_doc_format,
1008: P_PSIG_REQUESTER => GET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'#WF_SIGN_REQUESTER'),
1009: P_PSIG_SOURCE => GET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'#WF_SOURCE_APPLICATION_TYPE'),

Line 1017: RAISE EDR_PSIG_DOC_ERR;

1013: P_DOCUMENT_ID => l_doc_id,
1014: P_ERROR => l_error_num,
1015: P_ERROR_MSG => L_ERROR_MESG);
1016: IF l_ERROR_NUM IS NOT NULL THEN
1017: RAISE EDR_PSIG_DOC_ERR;
1018: ELSE
1019: SET_WF_ITEM_ATTRIBUTE_NUMBER(l_item_type, l_item_key,'EDR_PSIG_DOC_ID',l_doc_id);
1020: l_paramlist:=l_psig_event.Parameter_List;
1021: IF (l_paramlist is not null) THEN

Line 1019: SET_WF_ITEM_ATTRIBUTE_NUMBER(l_item_type, l_item_key,'EDR_PSIG_DOC_ID',l_doc_id);

1015: P_ERROR_MSG => L_ERROR_MESG);
1016: IF l_ERROR_NUM IS NOT NULL THEN
1017: RAISE EDR_PSIG_DOC_ERR;
1018: ELSE
1019: SET_WF_ITEM_ATTRIBUTE_NUMBER(l_item_type, l_item_key,'EDR_PSIG_DOC_ID',l_doc_id);
1020: l_paramlist:=l_psig_event.Parameter_List;
1021: IF (l_paramlist is not null) THEN
1022: FOR i IN l_paramlist.first .. l_paramlist.last LOOP
1023:

Line 1029: EDR_PSIG.POSTDOCUMENTPARAMETER( P_DOCUMENT_ID =>l_doc_id,

1025: l_doc_params(i).param_value:=l_paramlist(i).GetValue;
1026: l_doc_params(i).param_displayname:=l_paramlist(i).GetName;
1027: END LOOP;
1028:
1029: EDR_PSIG.POSTDOCUMENTPARAMETER( P_DOCUMENT_ID =>l_doc_id,
1030: P_PARAMETERS =>l_doc_params,
1031: P_ERROR =>l_error_num,
1032: P_ERROR_MSG =>l_error_mesg);
1033: IF l_ERROR_NUM IS NOT NULL THEN

Line 1034: RAISE EDR_PSIG_DOC_ERR;

1030: P_PARAMETERS =>l_doc_params,
1031: P_ERROR =>l_error_num,
1032: P_ERROR_MSG =>l_error_mesg);
1033: IF l_ERROR_NUM IS NOT NULL THEN
1034: RAISE EDR_PSIG_DOC_ERR;
1035: END IF;
1036: END IF; -- Param List Error
1037: END IF; -- Doc Error
1038: END IF; -- First Time

Line 1046: --to edr_psig.postSignature to avoid partial routing rules in GQ

1042: IF GET_USER_RESPONSE_RESULT%FOUND THEN
1043: IF GET_USER_RESPONSE_RESULT_REC.LOOKUP_CODE <> '#SIG_CANCEL' THEN
1044: --Bug 3214398: Start
1045: --We need to get the user_name and pass the overriding details for user_name
1046: --to edr_psig.postSignature to avoid partial routing rules in GQ
1047: --In postSignature the overriding comments are appended so if there is no change
1048: --after the signer process has started there will be no impact
1049: --and if the routing has changed GQ will be populated with correct results
1050: /*

Line 1077: RAISE EDR_PSIG_DOC_ERR;

1073: END IF;
1074: -- Bug 3902969 : End
1075:
1076: IF (l_ERROR_NUM > 0 ) THEN
1077: RAISE EDR_PSIG_DOC_ERR;
1078: END IF;
1079:
1080: -- Bug 4190367 : Modifying to make use of wf_notification.getattrtext to populate Evidence store id.
1081: /*

Line 1082: EDR_PSIG.postSignature(P_DOCUMENT_ID => l_doc_id,

1078: END IF;
1079:
1080: -- Bug 4190367 : Modifying to make use of wf_notification.getattrtext to populate Evidence store id.
1081: /*
1082: EDR_PSIG.postSignature(P_DOCUMENT_ID => l_doc_id,
1083: P_EVIDENCE_STORE_ID => wf_notification.getattrtext(wf_engine.context_nid,'#WF_SIG_ID'),
1084: P_USER_NAME => WF_ENGINE.context_text,
1085: P_USER_RESPONSE => GET_USER_RESPONSE_RESULT_REC.MEANING,
1086: P_SIGNATURE_ID => l_SIGNATURE_id,

Line 1093: EDR_PSIG.postSignature(P_DOCUMENT_ID => l_doc_id,

1089: P_ERROR_MSG => L_ERROR_MESG);
1090: */
1091:
1092:
1093: EDR_PSIG.postSignature(P_DOCUMENT_ID => l_doc_id,
1094: P_EVIDENCE_STORE_ID => wf_notification.getattrtext(wf_engine.context_nid,'#WF_SIG_ID'),
1095: P_USER_NAME => WF_ENGINE.context_text,
1096: P_USER_RESPONSE => GET_USER_RESPONSE_RESULT_REC.MEANING,
1097: P_SIGNATURE_ID => l_SIGNATURE_id,

Line 1107: RAISE EDR_PSIG_DOC_ERR;

1103: -- Bug 4190367 : End
1104: --Bug 3214398: end
1105:
1106: IF l_ERROR_NUM IS NOT NULL THEN
1107: RAISE EDR_PSIG_DOC_ERR;
1108: END IF;
1109: i := 0;
1110: OPEN GET_RESPONSE_ATTR;
1111: LOOP

Line 1130: EDR_PSIG.postSignatureParameter(P_SIGNATURE_ID => l_SIGNATURE_id,

1126: END LOOP;
1127: CLOSE GET_RESPONSE_ATTR;
1128:
1129: IF i > 0 THEN
1130: EDR_PSIG.postSignatureParameter(P_SIGNATURE_ID => l_SIGNATURE_id,
1131: P_PARAMETERS => l_sign_params,
1132: P_ERROR => l_error_num,
1133: P_ERROR_MSG => L_ERROR_MESG);
1134: IF l_ERROR_NUM IS NOT NULL THEN

Line 1135: RAISE EDR_PSIG_DOC_ERR;

1131: P_PARAMETERS => l_sign_params,
1132: P_ERROR => l_error_num,
1133: P_ERROR_MSG => L_ERROR_MESG);
1134: IF l_ERROR_NUM IS NOT NULL THEN
1135: RAISE EDR_PSIG_DOC_ERR;
1136: END IF;
1137: END IF;
1138: END IF;
1139: END IF;

Line 1214: EXCEPTION WHEN EDR_PSIG_NOT_NULL THEN

1210: 'NTF_RESPONDER',
1211: L_NTF_RESPOND_ROLE);
1212: END IF;
1213:
1214: EXCEPTION WHEN EDR_PSIG_NOT_NULL THEN
1215: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1216: 'Signer Comment and Signing Reason code can not be null.');
1217: raise;
1218: WHEN EDR_PSIG_DOC_ERR THEN

Line 1215: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,

1211: L_NTF_RESPOND_ROLE);
1212: END IF;
1213:
1214: EXCEPTION WHEN EDR_PSIG_NOT_NULL THEN
1215: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1216: 'Signer Comment and Signing Reason code can not be null.');
1217: raise;
1218: WHEN EDR_PSIG_DOC_ERR THEN
1219: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,

Line 1218: WHEN EDR_PSIG_DOC_ERR THEN

1214: EXCEPTION WHEN EDR_PSIG_NOT_NULL THEN
1215: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1216: 'Signer Comment and Signing Reason code can not be null.');
1217: raise;
1218: WHEN EDR_PSIG_DOC_ERR THEN
1219: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1220: l_error_num,L_ERROR_MESG);
1221: raise;
1222: WHEN EDR_PSIG_NOT_READ THEN

Line 1219: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,

1215: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1216: 'Signer Comment and Signing Reason code can not be null.');
1217: raise;
1218: WHEN EDR_PSIG_DOC_ERR THEN
1219: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1220: l_error_num,L_ERROR_MESG);
1221: raise;
1222: WHEN EDR_PSIG_NOT_READ THEN
1223: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,

Line 1222: WHEN EDR_PSIG_NOT_READ THEN

1218: WHEN EDR_PSIG_DOC_ERR THEN
1219: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1220: l_error_num,L_ERROR_MESG);
1221: raise;
1222: WHEN EDR_PSIG_NOT_READ THEN
1223: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1224: FND_MESSAGE.GET_STRING('EDR','EDR_EREC_NOT_REVIEWED_ERR'));
1225: raise;
1226: WHEN OTHERS THEN

Line 1223: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,

1219: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1220: l_error_num,L_ERROR_MESG);
1221: raise;
1222: WHEN EDR_PSIG_NOT_READ THEN
1223: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1224: FND_MESSAGE.GET_STRING('EDR','EDR_EREC_NOT_REVIEWED_ERR'));
1225: raise;
1226: WHEN OTHERS THEN
1227: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,

Line 1227: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,

1223: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1224: FND_MESSAGE.GET_STRING('EDR','EDR_EREC_NOT_REVIEWED_ERR'));
1225: raise;
1226: WHEN OTHERS THEN
1227: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1228: l_error_num,L_ERROR_MESG);
1229: raise;
1230: END UPDATE_NOTIF_RESPONSE;
1231:

Line 1577: SET_WF_ITEM_ATTRIBUTE_NUMBER(l_itemtype, l_item_key,'EDR_PSIG_DOC_ID',

1573:
1574: SET_WF_ITEM_ATTRIBUTE_TEXT(l_itemtype, l_item_key,'PSIG_DOCUMENT_ID',
1575: GET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'PSIG_DOCUMENT_ID'));
1576:
1577: SET_WF_ITEM_ATTRIBUTE_NUMBER(l_itemtype, l_item_key,'EDR_PSIG_DOC_ID',
1578: GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype, p_itemkey,'EDR_PSIG_DOC_ID'));
1579:
1580: SET_WF_ITEM_ATTRIBUTE_TEXT(l_itemtype,l_item_key,
1581: '#WF_SIGNER_ROLE' ,

Line 1578: GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype, p_itemkey,'EDR_PSIG_DOC_ID'));

1574: SET_WF_ITEM_ATTRIBUTE_TEXT(l_itemtype, l_item_key,'PSIG_DOCUMENT_ID',
1575: GET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'PSIG_DOCUMENT_ID'));
1576:
1577: SET_WF_ITEM_ATTRIBUTE_NUMBER(l_itemtype, l_item_key,'EDR_PSIG_DOC_ID',
1578: GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype, p_itemkey,'EDR_PSIG_DOC_ID'));
1579:
1580: SET_WF_ITEM_ATTRIBUTE_TEXT(l_itemtype,l_item_key,
1581: '#WF_SIGNER_ROLE' ,
1582: SIGNER_LIST_REC.USER_NAME);

Line 1653: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','SPWAN_OFFLINE_PROCESS',l_itemtype,l_item_key,'Initial' );

1649: CLOSE CURR_LIST_SIGNERS;
1650: end if;
1651: EXCEPTION
1652: WHEN OTHERS THEN
1653: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','SPWAN_OFFLINE_PROCESS',l_itemtype,l_item_key,'Initial' );
1654: CLOSE CURR_LIST_SIGNERS;
1655: raise;
1656: END SPWAN_OFFLINE_PROCESS;
1657:

Line 1691: l_document_rec edr_psig_documents%ROWTYPE;

1687: l_message VARCHAR2(2000);
1688: l_return_status VARCHAR2(1);
1689: l_msg_count NUMBER;
1690: l_msg_data VARCHAR2(240);
1691: l_document_rec edr_psig_documents%ROWTYPE;
1692: l_doc_param_tbl EDR_EvidenceStore_PUB.Params_tbl_type;
1693: l_sig_tbl EDR_EvidenceStore_PUB.Signature_tbl_type;
1694: l_erec_template_type varchar2(256);
1695: --Bug 4160412: Start

Line 1706: --Hence for backward compatibility we should verify with EDR_PSIG_DOC_ID attribute.

1702:
1703: --Bug: 3499311 Start - Specify Number Format in TO_NUMBER
1704: --Bug: 3903471 : Start
1705: --Old versions do not use #ERECORD_ID parameter.
1706: --Hence for backward compatibility we should verify with EDR_PSIG_DOC_ID attribute.
1707: --If the attribute does not exist, then #ERECORD_ID should be used.
1708: L_DOCUMENT_ID := nvl(GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype, p_itemkey,'EDR_PSIG_DOC_ID'),
1709: TO_NUMBER(GET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'#ERECORD_ID'),'999999999999.999999'));
1710: --Bug 3903471 : End

Line 1708: L_DOCUMENT_ID := nvl(GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype, p_itemkey,'EDR_PSIG_DOC_ID'),

1704: --Bug: 3903471 : Start
1705: --Old versions do not use #ERECORD_ID parameter.
1706: --Hence for backward compatibility we should verify with EDR_PSIG_DOC_ID attribute.
1707: --If the attribute does not exist, then #ERECORD_ID should be used.
1708: L_DOCUMENT_ID := nvl(GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype, p_itemkey,'EDR_PSIG_DOC_ID'),
1709: TO_NUMBER(GET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'#ERECORD_ID'),'999999999999.999999'));
1710: --Bug 3903471 : End
1711:
1712: l_wf_timeout := TO_NUMBER(FND_PROFILE.VALUE('EDR_WF_TIMEOUT'),'999999999999.999999');

Line 1825: l_message := FND_MESSAGE.GET_STRING('EDR','EDR_PSIG_PROCESS_ABORTED');

1821: p_itemkey,
1822: 'TIMEOUT_RESEND_COUNT',
1823: l_wf_timeout_interval);
1824:
1825: l_message := FND_MESSAGE.GET_STRING('EDR','EDR_PSIG_PROCESS_ABORTED');
1826:
1827: SET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype,
1828: p_itemkey,
1829: '#WF_PAGEFLOW_MESSAGE',

Line 2140: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_PAGE_FLOW');

2136: ROLLBACK;
2137: --Diagnostics Start
2138: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
2139: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
2140: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_PAGE_FLOW');
2141: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','MOVE_WF_ACTIVITY');
2142: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2143: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
2144: 'edr.plsql.EDR_PSIG_PAGE_FLOW.MOVE_WF_ACTIVITY',

Line 2144: 'edr.plsql.EDR_PSIG_PAGE_FLOW.MOVE_WF_ACTIVITY',

2140: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_PAGE_FLOW');
2141: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','MOVE_WF_ACTIVITY');
2142: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2143: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
2144: 'edr.plsql.EDR_PSIG_PAGE_FLOW.MOVE_WF_ACTIVITY',
2145: FALSE
2146: );
2147: end if;
2148: --Diagnostics End

Line 2152: END EDR_PSIG_PAGE_FLOW;

2148: --Diagnostics End
2149: APP_EXCEPTION.RAISE_EXCEPTION;
2150: END MOVE_WF_ACTIVITY;
2151: -- Bug 5166723 : End
2152: END EDR_PSIG_PAGE_FLOW;