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.13.12020000.3 2013/02/21 02:55:19 qzeng 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 884: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',

880: -- if they are differnt then only call find wf ntf recipients API.
881:
882: IF( l_user_name = WF_ENGINE.CONTEXT_USER) THEN
883:
884: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',
885: p_itemtype,p_itemkey,
886: FND_MESSAGE.GET_STRING('EDR','EDR_EREC_REASSIGN_ERR'));
887: raise_application_error(-20003,FND_MESSAGE.GET_STRING('EDR','EDR_EREC_REASSIGN_ERR'));
888: END IF;

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

894:
895: l_SIGNER_TYPE := GET_NOTIF_ITEM_ATTR_TEXT(wf_engine.context_nid,'WF_SIGNER_TYPE');
896: l_signer_reason := GET_NOTIF_ITEM_ATTR_TEXT(wf_engine.context_nid,'REASON_CODE');
897: IF l_signer_reason IS null OR l_SIGNER_TYPE IS NULL THEN
898: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
899: 'Signer Comment and Signing Reason code can not be null.');
900: raise EDR_PSIG_NOT_NULL;
901: END IF;
902:

Line 900: raise EDR_PSIG_NOT_NULL;

896: l_signer_reason := GET_NOTIF_ITEM_ATTR_TEXT(wf_engine.context_nid,'REASON_CODE');
897: IF l_signer_reason IS null OR l_SIGNER_TYPE IS NULL THEN
898: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
899: 'Signer Comment and Signing Reason code can not be null.');
900: raise EDR_PSIG_NOT_NULL;
901: END IF;
902:
903: -- Bug 3170251 : Check if user has selected yes for reading the attached eRecord
904: OPEN GET_USER_RESPONSE_RESULT;

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

910: -- attribute is not found for previous notificaitons backward compitability.
911: L_RESPONSE_READ := GET_NOTIF_ITEM_ATTR_TEXT(wf_engine.context_nid, 'READ_RESPONSE');
912: -- End Bug 3847779
913: IF (L_RESPONSE_READ = 'N') THEN
914: WF_CORE.CONTEXT('EDR_PSIG_PAGE_FLOW', 'UPDATE_NOTIF_RESPONSE',p_itemtype, p_itemkey,
915: FND_MESSAGE.GET_STRING('EDR','EDR_EREC_NOT_REVIEWED_ERR'));
916: raise_application_error(-20002,FND_MESSAGE.GET_STRING('EDR','EDR_EREC_NOT_REVIEWED_ERR'));
917: END IF;
918: END IF;

Line 965: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,l_error_num,L_ERROR_MESG);

961: EXCEPTION WHEN NO_DATA_FOUND THEN
962: -- If there are No notifications to be cancelled, then nothing is to be cancelled. Hence No action needed.
963: null;
964: WHEN OTHERS THEN
965: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,l_error_num,L_ERROR_MESG);
966: raise;
967: END;
968:
969: if lp_notification_id is not null and lp_notification_id > 0 then

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

1002: */
1003: --Bug 2674799 : End
1004:
1005: /* Following statements are to store data in PSIG evidance store */
1006: l_doc_id := GET_WF_ITEM_ATTRIBUTE_NUMBER(l_item_type, l_item_key,'EDR_PSIG_DOC_ID');
1007: IF l_doc_id is null THEN
1008: l_psig_event := wf_engine.getItemAttrEvent(p_itemtype, p_itemkey,'#PSIG_EVENT');
1009: l_event_xml := l_psig_event.getEventData();
1010: l_event_name := l_psig_event.getEventName();

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

1022: -- Bug 3474765 : End
1023: end if;
1024: /* END of PDF fix */
1025:
1026: EDR_PSIG.updateDocument(P_PSIG_XML => l_event_xml,
1027: P_PSIG_DOCUMENT => l_event_xml,
1028: P_PSIG_DOCUMENTFORMAT => l_doc_format,
1029: P_PSIG_REQUESTER => GET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'#WF_SIGN_REQUESTER'),
1030: P_PSIG_SOURCE => GET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'#WF_SOURCE_APPLICATION_TYPE'),

Line 1038: RAISE EDR_PSIG_DOC_ERR;

1034: P_DOCUMENT_ID => l_doc_id,
1035: P_ERROR => l_error_num,
1036: P_ERROR_MSG => L_ERROR_MESG);
1037: IF l_ERROR_NUM IS NOT NULL THEN
1038: RAISE EDR_PSIG_DOC_ERR;
1039: ELSE
1040: SET_WF_ITEM_ATTRIBUTE_NUMBER(l_item_type, l_item_key,'EDR_PSIG_DOC_ID',l_doc_id);
1041: l_paramlist:=l_psig_event.Parameter_List;
1042: IF (l_paramlist is not null) THEN

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

1036: P_ERROR_MSG => L_ERROR_MESG);
1037: IF l_ERROR_NUM IS NOT NULL THEN
1038: RAISE EDR_PSIG_DOC_ERR;
1039: ELSE
1040: SET_WF_ITEM_ATTRIBUTE_NUMBER(l_item_type, l_item_key,'EDR_PSIG_DOC_ID',l_doc_id);
1041: l_paramlist:=l_psig_event.Parameter_List;
1042: IF (l_paramlist is not null) THEN
1043: FOR i IN l_paramlist.first .. l_paramlist.last LOOP
1044:

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

1046: l_doc_params(i).param_value:=l_paramlist(i).GetValue;
1047: l_doc_params(i).param_displayname:=l_paramlist(i).GetName;
1048: END LOOP;
1049:
1050: EDR_PSIG.POSTDOCUMENTPARAMETER( P_DOCUMENT_ID =>l_doc_id,
1051: P_PARAMETERS =>l_doc_params,
1052: P_ERROR =>l_error_num,
1053: P_ERROR_MSG =>l_error_mesg);
1054: IF l_ERROR_NUM IS NOT NULL THEN

Line 1055: RAISE EDR_PSIG_DOC_ERR;

1051: P_PARAMETERS =>l_doc_params,
1052: P_ERROR =>l_error_num,
1053: P_ERROR_MSG =>l_error_mesg);
1054: IF l_ERROR_NUM IS NOT NULL THEN
1055: RAISE EDR_PSIG_DOC_ERR;
1056: END IF;
1057: END IF; -- Param List Error
1058: END IF; -- Doc Error
1059: END IF; -- First Time

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

1063: IF GET_USER_RESPONSE_RESULT%FOUND THEN
1064: IF GET_USER_RESPONSE_RESULT_REC.LOOKUP_CODE <> '#SIG_CANCEL' THEN
1065: --Bug 3214398: Start
1066: --We need to get the user_name and pass the overriding details for user_name
1067: --to edr_psig.postSignature to avoid partial routing rules in GQ
1068: --In postSignature the overriding comments are appended so if there is no change
1069: --after the signer process has started there will be no impact
1070: --and if the routing has changed GQ will be populated with correct results
1071: /*

Line 1098: RAISE EDR_PSIG_DOC_ERR;

1094: END IF;
1095: -- Bug 3902969 : End
1096:
1097: IF (l_ERROR_NUM > 0 ) THEN
1098: RAISE EDR_PSIG_DOC_ERR;
1099: END IF;
1100:
1101: -- Bug 4190367 : Modifying to make use of wf_notification.getattrtext to populate Evidence store id.
1102: /*

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

1099: END IF;
1100:
1101: -- Bug 4190367 : Modifying to make use of wf_notification.getattrtext to populate Evidence store id.
1102: /*
1103: EDR_PSIG.postSignature(P_DOCUMENT_ID => l_doc_id,
1104: P_EVIDENCE_STORE_ID => wf_notification.getattrtext(wf_engine.context_nid,'#WF_SIG_ID'),
1105: P_USER_NAME => WF_ENGINE.context_text,
1106: P_USER_RESPONSE => GET_USER_RESPONSE_RESULT_REC.MEANING,
1107: P_SIGNATURE_ID => l_SIGNATURE_id,

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

1110: P_ERROR_MSG => L_ERROR_MESG);
1111: */
1112:
1113:
1114: EDR_PSIG.postSignature(P_DOCUMENT_ID => l_doc_id,
1115: P_EVIDENCE_STORE_ID => wf_notification.getattrtext(wf_engine.context_nid,'#WF_SIG_ID'),
1116: P_USER_NAME => WF_ENGINE.context_text,
1117: P_USER_RESPONSE => GET_USER_RESPONSE_RESULT_REC.MEANING,
1118: P_SIGNATURE_ID => l_SIGNATURE_id,

Line 1128: RAISE EDR_PSIG_DOC_ERR;

1124: -- Bug 4190367 : End
1125: --Bug 3214398: end
1126:
1127: IF l_ERROR_NUM IS NOT NULL THEN
1128: RAISE EDR_PSIG_DOC_ERR;
1129: END IF;
1130: i := 0;
1131: OPEN GET_RESPONSE_ATTR;
1132: LOOP

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

1147: END LOOP;
1148: CLOSE GET_RESPONSE_ATTR;
1149:
1150: IF i > 0 THEN
1151: EDR_PSIG.postSignatureParameter(P_SIGNATURE_ID => l_SIGNATURE_id,
1152: P_PARAMETERS => l_sign_params,
1153: P_ERROR => l_error_num,
1154: P_ERROR_MSG => L_ERROR_MESG);
1155: IF l_ERROR_NUM IS NOT NULL THEN

Line 1156: RAISE EDR_PSIG_DOC_ERR;

1152: P_PARAMETERS => l_sign_params,
1153: P_ERROR => l_error_num,
1154: P_ERROR_MSG => L_ERROR_MESG);
1155: IF l_ERROR_NUM IS NOT NULL THEN
1156: RAISE EDR_PSIG_DOC_ERR;
1157: END IF;
1158: END IF;
1159: END IF;
1160: END IF;

Line 1236: EXCEPTION WHEN EDR_PSIG_NOT_NULL THEN

1232: 'NTF_RESPONDER',
1233: L_NTF_RESPOND_ROLE);
1234: END IF;
1235:
1236: EXCEPTION WHEN EDR_PSIG_NOT_NULL THEN
1237: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1238: 'Signer Comment and Signing Reason code can not be null.');
1239: raise;
1240: WHEN EDR_PSIG_DOC_ERR THEN

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

1233: L_NTF_RESPOND_ROLE);
1234: END IF;
1235:
1236: EXCEPTION WHEN EDR_PSIG_NOT_NULL THEN
1237: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1238: 'Signer Comment and Signing Reason code can not be null.');
1239: raise;
1240: WHEN EDR_PSIG_DOC_ERR THEN
1241: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,

Line 1240: WHEN EDR_PSIG_DOC_ERR THEN

1236: EXCEPTION WHEN EDR_PSIG_NOT_NULL THEN
1237: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1238: 'Signer Comment and Signing Reason code can not be null.');
1239: raise;
1240: WHEN EDR_PSIG_DOC_ERR THEN
1241: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1242: l_error_num,L_ERROR_MESG);
1243: raise;
1244: WHEN EDR_PSIG_NOT_READ THEN

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

1237: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1238: 'Signer Comment and Signing Reason code can not be null.');
1239: raise;
1240: WHEN EDR_PSIG_DOC_ERR THEN
1241: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1242: l_error_num,L_ERROR_MESG);
1243: raise;
1244: WHEN EDR_PSIG_NOT_READ THEN
1245: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,

Line 1244: WHEN EDR_PSIG_NOT_READ THEN

1240: WHEN EDR_PSIG_DOC_ERR THEN
1241: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1242: l_error_num,L_ERROR_MESG);
1243: raise;
1244: WHEN EDR_PSIG_NOT_READ THEN
1245: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1246: FND_MESSAGE.GET_STRING('EDR','EDR_EREC_NOT_REVIEWED_ERR'));
1247: raise;
1248: WHEN OTHERS THEN

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

1241: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1242: l_error_num,L_ERROR_MESG);
1243: raise;
1244: WHEN EDR_PSIG_NOT_READ THEN
1245: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1246: FND_MESSAGE.GET_STRING('EDR','EDR_EREC_NOT_REVIEWED_ERR'));
1247: raise;
1248: WHEN OTHERS THEN
1249: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,

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

1245: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1246: FND_MESSAGE.GET_STRING('EDR','EDR_EREC_NOT_REVIEWED_ERR'));
1247: raise;
1248: WHEN OTHERS THEN
1249: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','UPDATE_NOTIF_RESPONSE',p_itemtype,p_itemkey,
1250: l_error_num,L_ERROR_MESG);
1251: raise;
1252: END UPDATE_NOTIF_RESPONSE;
1253:

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

1596:
1597: SET_WF_ITEM_ATTRIBUTE_TEXT(l_itemtype, l_item_key,'PSIG_DOCUMENT_ID',
1598: GET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'PSIG_DOCUMENT_ID'));
1599:
1600: SET_WF_ITEM_ATTRIBUTE_NUMBER(l_itemtype, l_item_key,'EDR_PSIG_DOC_ID',
1601: GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype, p_itemkey,'EDR_PSIG_DOC_ID'));
1602:
1603: SET_WF_ITEM_ATTRIBUTE_TEXT(l_itemtype,l_item_key,
1604: '#WF_SIGNER_ROLE' ,

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

1597: SET_WF_ITEM_ATTRIBUTE_TEXT(l_itemtype, l_item_key,'PSIG_DOCUMENT_ID',
1598: GET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'PSIG_DOCUMENT_ID'));
1599:
1600: SET_WF_ITEM_ATTRIBUTE_NUMBER(l_itemtype, l_item_key,'EDR_PSIG_DOC_ID',
1601: GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype, p_itemkey,'EDR_PSIG_DOC_ID'));
1602:
1603: SET_WF_ITEM_ATTRIBUTE_TEXT(l_itemtype,l_item_key,
1604: '#WF_SIGNER_ROLE' ,
1605: SIGNER_LIST_REC.USER_NAME);

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

1672: CLOSE CURR_LIST_SIGNERS;
1673: end if;
1674: EXCEPTION
1675: WHEN OTHERS THEN
1676: WF_CORE.CONTEXT ('EDR_PSIG_PAGE_FLOW','SPWAN_OFFLINE_PROCESS',l_itemtype,l_item_key,'Initial' );
1677: CLOSE CURR_LIST_SIGNERS;
1678: raise;
1679: END SPWAN_OFFLINE_PROCESS;
1680:

Line 1714: l_document_rec edr_psig_documents%ROWTYPE;

1710: l_message VARCHAR2(2000);
1711: l_return_status VARCHAR2(1);
1712: l_msg_count NUMBER;
1713: l_msg_data VARCHAR2(240);
1714: l_document_rec edr_psig_documents%ROWTYPE;
1715: l_doc_param_tbl EDR_EvidenceStore_PUB.Params_tbl_type;
1716: l_sig_tbl EDR_EvidenceStore_PUB.Signature_tbl_type;
1717: l_erec_template_type varchar2(256);
1718: --Bug 4160412: Start

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

1725:
1726: --Bug: 3499311 Start - Specify Number Format in TO_NUMBER
1727: --Bug: 3903471 : Start
1728: --Old versions do not use #ERECORD_ID parameter.
1729: --Hence for backward compatibility we should verify with EDR_PSIG_DOC_ID attribute.
1730: --If the attribute does not exist, then #ERECORD_ID should be used.
1731: L_DOCUMENT_ID := nvl(GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype, p_itemkey,'EDR_PSIG_DOC_ID'),
1732: TO_NUMBER(GET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'#ERECORD_ID'),'999999999999.999999'));
1733: --Bug 3903471 : End

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

1727: --Bug: 3903471 : Start
1728: --Old versions do not use #ERECORD_ID parameter.
1729: --Hence for backward compatibility we should verify with EDR_PSIG_DOC_ID attribute.
1730: --If the attribute does not exist, then #ERECORD_ID should be used.
1731: L_DOCUMENT_ID := nvl(GET_WF_ITEM_ATTRIBUTE_NUMBER(p_itemtype, p_itemkey,'EDR_PSIG_DOC_ID'),
1732: TO_NUMBER(GET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype, p_itemkey,'#ERECORD_ID'),'999999999999.999999'));
1733: --Bug 3903471 : End
1734:
1735: l_wf_timeout := TO_NUMBER(FND_PROFILE.VALUE('EDR_WF_TIMEOUT'),'999999999999.999999');

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

1844: p_itemkey,
1845: 'TIMEOUT_RESEND_COUNT',
1846: l_wf_timeout_interval);
1847:
1848: l_message := FND_MESSAGE.GET_STRING('EDR','EDR_PSIG_PROCESS_ABORTED');
1849:
1850: SET_WF_ITEM_ATTRIBUTE_TEXT(p_itemtype,
1851: p_itemkey,
1852: '#WF_PAGEFLOW_MESSAGE',

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

2161: ROLLBACK;
2162: --Diagnostics Start
2163: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
2164: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
2165: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_PAGE_FLOW');
2166: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','MOVE_WF_ACTIVITY');
2167: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2168: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
2169: 'edr.plsql.EDR_PSIG_PAGE_FLOW.MOVE_WF_ACTIVITY',

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

2165: FND_MESSAGE.SET_TOKEN('PKG_NAME','EDR_PSIG_PAGE_FLOW');
2166: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','MOVE_WF_ACTIVITY');
2167: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2168: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,
2169: 'edr.plsql.EDR_PSIG_PAGE_FLOW.MOVE_WF_ACTIVITY',
2170: FALSE
2171: );
2172: end if;
2173: --Diagnostics End

Line 2177: END EDR_PSIG_PAGE_FLOW;

2173: --Diagnostics End
2174: APP_EXCEPTION.RAISE_EXCEPTION;
2175: END MOVE_WF_ACTIVITY;
2176: -- Bug 5166723 : End
2177: END EDR_PSIG_PAGE_FLOW;