APPS.EDR_PSIG_MSCA_PAGE_FLOW dependencies on EDR_PSIG

Line 1: PACKAGE BODY EDR_PSIG_MSCA_PAGE_FLOW AS

1: PACKAGE BODY EDR_PSIG_MSCA_PAGE_FLOW AS
2: /* $Header: EDRVMPFB.pls 120.1.12000000.1 2007/01/18 05:56:26 appldev ship $ */
3:
4:
5: --Process the signature response

Line 27: l_param_table EDR_PSIG.params_table;

23: l_count NUMBER;
24: l_error_num NUMBER;
25: l_error_msg VARCHAR2(1000);
26: l_sig_id NUMBER;
27: l_param_table EDR_PSIG.params_table;
28: POST_SIGNATURE_ERROR EXCEPTION;
29: EDR_PSIG_DOC_ERR EXCEPTION;
30: EDR_PSIG_OUT_OF_SEQUENCE EXCEPTION;
31: l_status VARCHAR2(20);

Line 29: EDR_PSIG_DOC_ERR EXCEPTION;

25: l_error_msg VARCHAR2(1000);
26: l_sig_id NUMBER;
27: l_param_table EDR_PSIG.params_table;
28: POST_SIGNATURE_ERROR EXCEPTION;
29: EDR_PSIG_DOC_ERR EXCEPTION;
30: EDR_PSIG_OUT_OF_SEQUENCE EXCEPTION;
31: l_status VARCHAR2(20);
32:
33: pragma AUTONOMOUS_TRANSACTION;

Line 30: EDR_PSIG_OUT_OF_SEQUENCE EXCEPTION;

26: l_sig_id NUMBER;
27: l_param_table EDR_PSIG.params_table;
28: POST_SIGNATURE_ERROR EXCEPTION;
29: EDR_PSIG_DOC_ERR EXCEPTION;
30: EDR_PSIG_OUT_OF_SEQUENCE EXCEPTION;
31: l_status VARCHAR2(20);
32:
33: pragma AUTONOMOUS_TRANSACTION;
34:

Line 45: raise EDR_PSIG_OUT_OF_SEQUENCE;

41: and SIGNATURE_STATUS = 'PENDING';
42:
43: --If the sequence is out of order, then raise an error.
44: IF l_sign_sequence <> p_sign_sequence THEN
45: raise EDR_PSIG_OUT_OF_SEQUENCE;
46: END IF;
47:
48: --Loop through each signature parameter.
49: FOR i IN p_signature_param_names.first..p_signature_param_names.last LOOP

Line 92: EDR_PSIG.postSignature(P_DOCUMENT_ID =>p_erecord_id,

88: --Post the signature details into the evidence store for the e-record.
89: -- Bug 4190358 : Start
90: -- The Evidence store id should be passed as Null as this is not the document id we maintain.
91:
92: EDR_PSIG.postSignature(P_DOCUMENT_ID =>p_erecord_id,
93: P_EVIDENCE_STORE_ID => null,
94: P_USER_NAME => p_user_name,
95: P_USER_RESPONSE => p_action_meaning,
96: P_SIGNATURE_ID => l_sig_id,

Line 110: EDR_PSIG.postSignatureParameter(P_SIGNATURE_ID => l_sig_id,

106:
107: --Post the signature parameters to the evidence store.
108: --The signature parameters would contain the signer meaning
109: --and the signining reason meaning.
110: EDR_PSIG.postSignatureParameter(P_SIGNATURE_ID => l_sig_id,
111: P_PARAMETERS => l_param_table,
112: P_ERROR => l_error_num,
113: P_ERROR_MSG => l_error_msg);
114:

Line 121: EDR_PSIG.changeDocumentStatus(P_DOCUMENT_ID => p_erecord_id,

117: end if;
118:
119: --Update the document status in evidence store based on the action code.
120: IF (p_erecord_id IS NOT NULL AND p_action_code = 'REJECTED') THEN
121: EDR_PSIG.changeDocumentStatus(P_DOCUMENT_ID => p_erecord_id,
122: P_STATUS => p_action_code,
123: P_ERROR => l_error_num,
124: P_ERROR_MSG => l_error_msg);
125: IF l_ERROR_NUM IS NOT NULL THEN

Line 126: RAISE EDR_PSIG_DOC_ERR;

122: P_STATUS => p_action_code,
123: P_ERROR => l_error_num,
124: P_ERROR_MSG => l_error_msg);
125: IF l_ERROR_NUM IS NOT NULL THEN
126: RAISE EDR_PSIG_DOC_ERR;
127: END IF;
128:
129: END IF;
130:

Line 134: WHEN EDR_PSIG_OUT_OF_SEQUENCE THEN

130:
131: COMMIT;
132:
133: EXCEPTION
134: WHEN EDR_PSIG_OUT_OF_SEQUENCE THEN
135: ROLLBACK;
136: x_error_code := SQLCODE;
137: FND_MESSAGE.SET_NAME('EDR','EDR_MSCA_SIG_OUT_OF_SEQUENCE');
138: x_error_msg := FND_MESSAGE.get;

Line 161: EDR_PSIG.changeDocumentStatus( P_DOCUMENT_ID => p_erecord_id,

157:
158: BEGIN
159:
160: --Update the document status in evidence store for the e-record.
161: EDR_PSIG.changeDocumentStatus( P_DOCUMENT_ID => p_erecord_id,
162: P_STATUS => 'CANCEL' ,
163: P_ERROR => x_error_code,
164: P_ERROR_MSG => x_error_msg);
165:

Line 196: EDR_PSIG.changeDocumentStatus( P_DOCUMENT_ID => p_erecord_id,

192:
193: BEGIN
194:
195: --Update the evidence store document status to 'PENDING'
196: EDR_PSIG.changeDocumentStatus( P_DOCUMENT_ID => p_erecord_id,
197: P_STATUS => 'PENDING' ,
198: P_ERROR => x_error_code,
199: P_ERROR_MSG => x_error_msg);
200:

Line 242: --Wrapper procedure over EDR_PSIG.CLOSEDOCUMENT

238:
239: END PROCESS_MSCA_BLOCKED_ACTIVITY;
240:
241:
242: --Wrapper procedure over EDR_PSIG.CLOSEDOCUMENT
243: PROCEDURE CLOSE_DOCUMENT(P_DOCUMENT_ID IN NUMBER,
244: X_ERROR OUT NOCOPY NUMBER,
245: X_ERROR_MSG OUT NOCOPY VARCHAR2
246: )

Line 254: EDR_PSIG.ClOSEDOCUMENT(P_DOCUMENT_ID => P_DOCUMENT_ID,

250: pragma AUTONOMOUS_TRANSACTION;
251:
252: BEGIN
253:
254: EDR_PSIG.ClOSEDOCUMENT(P_DOCUMENT_ID => P_DOCUMENT_ID,
255: P_ERROR => X_ERROR,
256: P_ERROR_MSG => X_ERROR_MSG
257: );
258: COMMIT;

Line 269: END EDR_PSIG_MSCA_PAGE_FLOW;

265: APP_EXCEPTION.RAISE_EXCEPTION;
266:
267: END CLOSE_DOCUMENT;
268:
269: END EDR_PSIG_MSCA_PAGE_FLOW;