115: BEGIN
116:
117: l_api_name := 'initialize_attributes';
118:
119: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
120: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
121: 'Entered OKC_REP_SIGN_WF_PVT.initialize_attributes');
122: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
123: 'Item Type is: ' || itemtype);
116:
117: l_api_name := 'initialize_attributes';
118:
119: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
120: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
121: 'Entered OKC_REP_SIGN_WF_PVT.initialize_attributes');
122: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
123: 'Item Type is: ' || itemtype);
124: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
118:
119: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
120: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
121: 'Entered OKC_REP_SIGN_WF_PVT.initialize_attributes');
122: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
123: 'Item Type is: ' || itemtype);
124: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
125: 'Item Key is: ' || itemkey);
126: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
120: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
121: 'Entered OKC_REP_SIGN_WF_PVT.initialize_attributes');
122: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
123: 'Item Type is: ' || itemtype);
124: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
125: 'Item Key is: ' || itemkey);
126: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
127: 'actid is: ' || to_char(actid));
128: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
122: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
123: 'Item Type is: ' || itemtype);
124: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
125: 'Item Key is: ' || itemkey);
126: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
127: 'actid is: ' || to_char(actid));
128: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
129: 'Function mode is: ' || funcmode);
130: END IF;
124: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
125: 'Item Key is: ' || itemkey);
126: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
127: 'actid is: ' || to_char(actid));
128: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
129: 'Function mode is: ' || funcmode);
130: END IF;
131: IF (funcmode = 'RUN') THEN
132: l_contract_id := wf_engine.GetItemAttrNumber(
133: itemtype => itemtype,
134: itemkey => itemkey,
135: aname => 'CONTRACT_ID');
136:
137: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
138: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
139: 'Calling WF_ENGINE.getitemattrnumber for l_contract_id ' || l_contract_id);
140: END IF;
141:
134: itemkey => itemkey,
135: aname => 'CONTRACT_ID');
136:
137: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
138: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
139: 'Calling WF_ENGINE.getitemattrnumber for l_contract_id ' || l_contract_id);
140: END IF;
141:
142: -- Get contract attributes
145: IF(contract_csr%NOTFOUND) THEN
146: RAISE NO_DATA_FOUND;
147: END IF;
148:
149: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
150: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
151: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_TYPE ' || contract_rec.contract_type);
152: END IF;
153: WF_ENGINE.SetItemAttrText (
146: RAISE NO_DATA_FOUND;
147: END IF;
148:
149: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
150: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
151: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_TYPE ' || contract_rec.contract_type);
152: END IF;
153: WF_ENGINE.SetItemAttrText (
154: itemtype => itemtype,
158:
159:
160: l_resolved_token := OKC_API.resolve_hdr_token(contract_rec.contract_type);
161:
162: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
163: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
164: 'Calling WF_ENGINE.setitemattrtext for CONTRACT_HDR_TOKEN ' || l_resolved_token);
165: END IF;
166:
159:
160: l_resolved_token := OKC_API.resolve_hdr_token(contract_rec.contract_type);
161:
162: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
163: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
164: 'Calling WF_ENGINE.setitemattrtext for CONTRACT_HDR_TOKEN ' || l_resolved_token);
165: END IF;
166:
167:
171: aname => 'CONTRACT_HDR_TOKEN',
172: avalue => l_resolved_token);
173:
174:
175: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
176: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
177: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_NUMBER ' || contract_rec.contract_number);
178: END IF;
179:
172: avalue => l_resolved_token);
173:
174:
175: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
176: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
177: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_NUMBER ' || contract_rec.contract_number);
178: END IF;
179:
180: WF_ENGINE.SetItemAttrText (
183: aname => 'CONTRACT_NUMBER',
184: avalue => contract_rec.contract_number);
185:
186:
187: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
188: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
189: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_VERSION ' || contract_rec.contract_version_num);
190: END IF;
191:
184: avalue => contract_rec.contract_number);
185:
186:
187: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
188: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
189: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_VERSION ' || contract_rec.contract_version_num);
190: END IF;
191:
192: WF_ENGINE.SetItemAttrNumber (
194: itemkey => itemkey,
195: aname => 'CONTRACT_VERSION',
196: avalue => contract_rec.contract_version_num);
197:
198: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
199: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
200: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_NAME ' || contract_rec.contract_name);
201: END IF;
202:
195: aname => 'CONTRACT_VERSION',
196: avalue => contract_rec.contract_version_num);
197:
198: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
199: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
200: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_NAME ' || contract_rec.contract_name);
201: END IF;
202:
203: WF_ENGINE.SetItemAttrText (
205: itemkey => itemkey,
206: aname => 'CONTRACT_NAME',
207: avalue => contract_rec.contract_name);
208:
209: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
210: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
211: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_ATTACHMENTS');
212: END IF;
213:
206: aname => 'CONTRACT_NAME',
207: avalue => contract_rec.contract_name);
208:
209: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
210: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
211: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_ATTACHMENTS');
212: END IF;
213:
214: WF_ENGINE.SetItemAttrText (
222:
223: CLOSE contract_csr;
224:
225: resultout := 'COMPLETE:';
226: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
227: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
228: g_module || l_api_name ,
229: 'Leaving OKC_REP_SIGN_WF_PVT.initialize_attributes from funcmode=RUN');
230: END IF;
223: CLOSE contract_csr;
224:
225: resultout := 'COMPLETE:';
226: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
227: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
228: g_module || l_api_name ,
229: 'Leaving OKC_REP_SIGN_WF_PVT.initialize_attributes from funcmode=RUN');
230: END IF;
231: RETURN;
233:
234:
235: IF (funcmode = 'CANCEL') THEN
236: resultout := 'COMPLETE:';
237: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
238: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
239: g_module || l_api_name,
240: 'Leaving OKC_REP_SIGN_WF_PVT.initialize_attributes from funcmode=CANCEL');
241: END IF;
234:
235: IF (funcmode = 'CANCEL') THEN
236: resultout := 'COMPLETE:';
237: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
238: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
239: g_module || l_api_name,
240: 'Leaving OKC_REP_SIGN_WF_PVT.initialize_attributes from funcmode=CANCEL');
241: END IF;
242: RETURN;
243: END IF; -- (funcmode = 'CANCEL')
244:
245: IF (funcmode = 'TIMEOUT') THEN
246: resultout := 'COMPLETE:';
247: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
248: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
249: g_module || l_api_name,
250: 'Leaving OKC_REP_SIGN_WF_PVT.initialize_attributes from funcmode=TIMEOUT');
251: END IF;
244:
245: IF (funcmode = 'TIMEOUT') THEN
246: resultout := 'COMPLETE:';
247: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
248: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
249: g_module || l_api_name,
250: 'Leaving OKC_REP_SIGN_WF_PVT.initialize_attributes from funcmode=TIMEOUT');
251: END IF;
252: RETURN;
257: --close cursors
258: IF (contract_csr%ISOPEN) THEN
259: CLOSE contract_csr ;
260: END IF;
261: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
262: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
263: g_module || l_api_name,
264: 'Leaving OKC_REP_SIGN_WF_PVT.initialize_attributes with exceptions ' || sqlerrm);
265: END IF;
258: IF (contract_csr%ISOPEN) THEN
259: CLOSE contract_csr ;
260: END IF;
261: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
262: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
263: g_module || l_api_name,
264: 'Leaving OKC_REP_SIGN_WF_PVT.initialize_attributes with exceptions ' || sqlerrm);
265: END IF;
266: wf_core.context('OKC_REP_SIGN_WF_PVT',
396: l_contact_name varchar2(500);
397:
398: BEGIN
399:
400: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
401: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
402: 'Entered into procedure getNextSigner for contract_id '||p_contract_id );
403: END IF;
404:
397:
398: BEGIN
399:
400: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
401: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
402: 'Entered into procedure getNextSigner for contract_id '||p_contract_id );
403: END IF;
404:
405: /* to get the contract admin name */
455: p_next_signers(J).party_role_code:=i.party_role_code;
456: p_next_signers(J).seq:=i.SIGNATURE_SEQUENCE;
457: p_next_signers(J).subject:=l_subject;
458:
459: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
460: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
461: 'value of p_next_signers(J).name '||p_next_signers(J).name );
462: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
463: 'value of p_next_signers(J).contact_id '||p_next_signers(J).contact_id );
456: p_next_signers(J).seq:=i.SIGNATURE_SEQUENCE;
457: p_next_signers(J).subject:=l_subject;
458:
459: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
460: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
461: 'value of p_next_signers(J).name '||p_next_signers(J).name );
462: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
463: 'value of p_next_signers(J).contact_id '||p_next_signers(J).contact_id );
464: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
458:
459: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
460: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
461: 'value of p_next_signers(J).name '||p_next_signers(J).name );
462: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
463: 'value of p_next_signers(J).contact_id '||p_next_signers(J).contact_id );
464: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
465: 'value of p_next_signers(J).party_id '||p_next_signers(J).party_id );
466: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
460: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
461: 'value of p_next_signers(J).name '||p_next_signers(J).name );
462: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
463: 'value of p_next_signers(J).contact_id '||p_next_signers(J).contact_id );
464: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
465: 'value of p_next_signers(J).party_id '||p_next_signers(J).party_id );
466: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
467: 'value of p_next_signers(J).seq '||p_next_signers(J).seq );
468: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
462: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
463: 'value of p_next_signers(J).contact_id '||p_next_signers(J).contact_id );
464: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
465: 'value of p_next_signers(J).party_id '||p_next_signers(J).party_id );
466: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
467: 'value of p_next_signers(J).seq '||p_next_signers(J).seq );
468: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
469: 'value of p_next_signers(J).subject '||p_next_signers(J).subject );
470: END IF;
464: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
465: 'value of p_next_signers(J).party_id '||p_next_signers(J).party_id );
466: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
467: 'value of p_next_signers(J).seq '||p_next_signers(J).seq );
468: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
469: 'value of p_next_signers(J).subject '||p_next_signers(J).subject );
470: END IF;
471:
472: j:=j+1;
480: p_process_complete:='N';
481: END IF;
482:
483:
484: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
485: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
486: 'Leaving procedure getNextSigner for contract_id '||p_contract_id );
487: END IF;
488:
481: END IF;
482:
483:
484: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
485: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
486: 'Leaving procedure getNextSigner for contract_id '||p_contract_id );
487: END IF;
488:
489: END getNextSigner;
492:
493: l_api_name := 'has_next_signer';
494:
495:
496: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
497: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
498: 'Entered OKC_REP_SIGN_WF_PVT.has_next_signer');
499: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
500: 'Item Type is: ' || itemtype);
493: l_api_name := 'has_next_signer';
494:
495:
496: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
497: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
498: 'Entered OKC_REP_SIGN_WF_PVT.has_next_signer');
499: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
500: 'Item Type is: ' || itemtype);
501: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
495:
496: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
497: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
498: 'Entered OKC_REP_SIGN_WF_PVT.has_next_signer');
499: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
500: 'Item Type is: ' || itemtype);
501: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
502: 'Item Key is: ' || itemkey);
503: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
497: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
498: 'Entered OKC_REP_SIGN_WF_PVT.has_next_signer');
499: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
500: 'Item Type is: ' || itemtype);
501: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
502: 'Item Key is: ' || itemkey);
503: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
504: 'actid is: ' || to_char(actid));
505: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
499: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
500: 'Item Type is: ' || itemtype);
501: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
502: 'Item Key is: ' || itemkey);
503: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
504: 'actid is: ' || to_char(actid));
505: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
506: 'Function mode is: ' || funcmode);
507: END IF;
501: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
502: 'Item Key is: ' || itemkey);
503: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
504: 'actid is: ' || to_char(actid));
505: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
506: 'Function mode is: ' || funcmode);
507: END IF;
508: IF (funcmode = 'RUN') then
509: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
505: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
506: 'Function mode is: ' || funcmode);
507: END IF;
508: IF (funcmode = 'RUN') then
509: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
510: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
511: g_module || l_api_name,
512: 'Calling wf_engine.GetItemAttrNumber to get CONTRACT_ID');
513: END IF;
506: 'Function mode is: ' || funcmode);
507: END IF;
508: IF (funcmode = 'RUN') then
509: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
510: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
511: g_module || l_api_name,
512: 'Calling wf_engine.GetItemAttrNumber to get CONTRACT_ID');
513: END IF;
514:
516: itemtype => itemtype,
517: itemkey => itemkey,
518: aname => 'CONTRACT_ID');
519:
520: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
521: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
522: g_module || l_api_name,
523: 'Contract Id is: ' || to_char(l_contract_id));
524: END IF;
517: itemkey => itemkey,
518: aname => 'CONTRACT_ID');
519:
520: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
521: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
522: g_module || l_api_name,
523: 'Contract Id is: ' || to_char(l_contract_id));
524: END IF;
525:
526: IF l_next_signers.Count<>0 then
527: l_next_signers.DELETE;
528: END IF;
529:
530: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
531: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
532: g_module || l_api_name,
533: 'Calling getNextSigner to get the signers list ');
534: END IF;
527: l_next_signers.DELETE;
528: END IF;
529:
530: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
531: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
532: g_module || l_api_name,
533: 'Calling getNextSigner to get the signers list ');
534: END IF;
535:
539: p_process_complete=>l_process_complete_yn
540: );
541:
542:
543: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
544: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
545: g_module || l_api_name,
546: 'Number of signers : ' || to_char(l_next_signers.count));
547: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
540: );
541:
542:
543: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
544: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
545: g_module || l_api_name,
546: 'Number of signers : ' || to_char(l_next_signers.count));
547: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
548: g_module || l_api_name,
543: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
544: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
545: g_module || l_api_name,
546: 'Number of signers : ' || to_char(l_next_signers.count));
547: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
548: g_module || l_api_name,
549: 'l_process_complete_yn: ' || l_process_complete_yn);
550: END IF;
551:
594: FOR i IN l_next_signers.first..l_next_signers.last LOOP
595: IF l_next_signers.exists(i) THEN
596: l_user_name := l_next_signers(i).name;
597:
598: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
599: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
600: g_module || l_api_name,
601: 'User name for role is : ' || l_user_name);
602: END IF;
595: IF l_next_signers.exists(i) THEN
596: l_user_name := l_next_signers(i).name;
597:
598: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
599: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
600: g_module || l_api_name,
601: 'User name for role is : ' || l_user_name);
602: END IF;
603:
603:
604: l_notified_count := l_notified_count + 1;
605: l_item_key := itemkey || '_' || to_char(l_notified_count);
606:
607: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
608: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
609: 'Calling WF_ENGINE.createprocess for Notification');
610: END IF;
611:
604: l_notified_count := l_notified_count + 1;
605: l_item_key := itemkey || '_' || to_char(l_notified_count);
606:
607: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
608: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
609: 'Calling WF_ENGINE.createprocess for Notification');
610: END IF;
611:
612: WF_ENGINE.createprocess (
613: itemtype => itemtype,
614: itemkey => l_item_key,
615: process => G_SIGN_NOTIF_PROCESS);
616:
617: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
618: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
619: 'Calling WF_ENGINE.SetItemOwner for Notification Process '||l_owner);
620: END IF;
621:
614: itemkey => l_item_key,
615: process => G_SIGN_NOTIF_PROCESS);
616:
617: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
618: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
619: 'Calling WF_ENGINE.SetItemOwner for Notification Process '||l_owner);
620: END IF;
621:
622: WF_ENGINE.SetItemOwner (
623: itemtype => itemtype,
624: itemkey => l_item_key,
625: owner => l_owner);
626:
627: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
628: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
629: 'Setting Notification Process Signer to: ' || l_user_name);
630: END IF;
631:
624: itemkey => l_item_key,
625: owner => l_owner);
626:
627: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
628: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
629: 'Setting Notification Process Signer to: ' || l_user_name);
630: END IF;
631:
632: WF_ENGINE.SetItemAttrText (
634: itemkey => l_item_key,
635: aname => 'SIGNER',
636: avalue => l_user_name);
637:
638: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
639: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
640: 'Setting current sequence id to: ' || l_next_signers(i).seq );
641: END IF;
642:
635: aname => 'SIGNER',
636: avalue => l_user_name);
637:
638: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
639: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
640: 'Setting current sequence id to: ' || l_next_signers(i).seq );
641: END IF;
642:
643: wf_engine.SetItemAttrNumber(
645: itemkey => l_item_key,
646: aname => 'CURRENT_SEQUENCE_ID',
647: avalue => l_next_signers(i).seq);
648:
649: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
650: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
651: 'Setting current contact id: ' || l_next_signers(i).contact_id );
652: END IF;
653:
646: aname => 'CURRENT_SEQUENCE_ID',
647: avalue => l_next_signers(i).seq);
648:
649: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
650: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
651: 'Setting current contact id: ' || l_next_signers(i).contact_id );
652: END IF;
653:
654:
657: itemkey => l_item_key,
658: aname => 'CURRENT_CONTACT_ID',
659: avalue => l_next_signers(i).contact_id);
660:
661: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
662: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
663: 'Setting current party id: ' || l_next_signers(i).party_id );
664: END IF;
665:
658: aname => 'CURRENT_CONTACT_ID',
659: avalue => l_next_signers(i).contact_id);
660:
661: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
662: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
663: 'Setting current party id: ' || l_next_signers(i).party_id );
664: END IF;
665:
666:
669: itemkey => l_item_key,
670: aname => 'CURRENT_PARTY_ID',
671: avalue => l_next_signers(i).party_id);
672:
673: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
674: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
675: 'Setting current party role code : ' || l_next_signers(i).party_role_code );
676: END IF;
677:
670: aname => 'CURRENT_PARTY_ID',
671: avalue => l_next_signers(i).party_id);
672:
673: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
674: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
675: 'Setting current party role code : ' || l_next_signers(i).party_role_code );
676: END IF;
677:
678: wf_engine.SetItemAttrText(
681: aname => 'CURRENT_PARTY_ROLE_CODE',
682: avalue => l_next_signers(i).party_role_code);
683:
684:
685: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
686: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
687: 'Setting Notification Process Contract Id to: ' || l_contract_id);
688: END IF;
689:
682: avalue => l_next_signers(i).party_role_code);
683:
684:
685: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
686: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
687: 'Setting Notification Process Contract Id to: ' || l_contract_id);
688: END IF;
689:
690: WF_ENGINE.SetItemAttrNumber (
693: aname => 'CONTRACT_ID',
694: avalue => l_contract_id);
695:
696:
697: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
698: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
699: 'Setting Notification Process Contract Header Token to: ' || l_contract_hdr_token);
700: END IF;
701:
694: avalue => l_contract_id);
695:
696:
697: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
698: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
699: 'Setting Notification Process Contract Header Token to: ' || l_contract_hdr_token);
700: END IF;
701:
702: WF_ENGINE.SetItemAttrText (
705: aname => 'CONTRACT_HDR_TOKEN',
706: avalue => l_contract_hdr_token);
707:
708:
709: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
710: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
711: 'Setting Notification Process Contract Name: ' || l_contract_name);
712: END IF;
713:
706: avalue => l_contract_hdr_token);
707:
708:
709: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
710: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
711: 'Setting Notification Process Contract Name: ' || l_contract_name);
712: END IF;
713:
714: WF_ENGINE.SetItemAttrText (
716: itemkey => l_item_key,
717: aname => 'CONTRACT_NAME',
718: avalue => l_contract_name);
719:
720: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
721: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
722: 'Setting Notification Process Contract Version: ' || l_contract_version);
723: END IF;
724:
717: aname => 'CONTRACT_NAME',
718: avalue => l_contract_name);
719:
720: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
721: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
722: 'Setting Notification Process Contract Version: ' || l_contract_version);
723: END IF;
724:
725: WF_ENGINE.SetItemAttrNumber (
727: itemkey => l_item_key,
728: aname => 'CONTRACT_VERSION',
729: avalue => l_contract_version);
730:
731: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
732: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
733: 'Setting Notification Process Contract Type: ' || l_contract_type);
734: END IF;
735:
728: aname => 'CONTRACT_VERSION',
729: avalue => l_contract_version);
730:
731: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
732: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
733: 'Setting Notification Process Contract Type: ' || l_contract_type);
734: END IF;
735:
736: WF_ENGINE.SetItemAttrText (
738: itemkey => l_item_key,
739: aname => 'CONTRACT_TYPE',
740: avalue => l_contract_type);
741:
742: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
743: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
744: 'Setting Notification Process Contract Number: ' || l_contract_number);
745: END IF;
746:
739: aname => 'CONTRACT_TYPE',
740: avalue => l_contract_type);
741:
742: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
743: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
744: 'Setting Notification Process Contract Number: ' || l_contract_number);
745: END IF;
746:
747: WF_ENGINE.SetItemAttrText (
749: itemkey => l_item_key,
750: aname => 'CONTRACT_NUMBER',
751: avalue => l_contract_number);
752:
753: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
754: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
755: 'Setting Notification Process Requester: ' || l_requester);
756: END IF;
757:
750: aname => 'CONTRACT_NUMBER',
751: avalue => l_contract_number);
752:
753: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
754: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
755: 'Setting Notification Process Requester: ' || l_requester);
756: END IF;
757:
758: WF_ENGINE.SetItemAttrText (
760: itemkey => l_item_key,
761: aname => 'REQUESTER',
762: avalue => l_requester);
763:
764: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
765: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
766: 'Setting Notification Process Subject to : ' || l_next_signers(i).SUBJECT);
767: END IF;
768:
761: aname => 'REQUESTER',
762: avalue => l_requester);
763:
764: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
765: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
766: 'Setting Notification Process Subject to : ' || l_next_signers(i).SUBJECT);
767: END IF;
768:
769: WF_ENGINE.SetItemAttrText (
772: aname => 'SUBJECT',
773: avalue => l_next_signers(i).SUBJECT);
774:
775:
776: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
777: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
778: 'Setting Notification Process Contract Attachment');
779: END IF;
780:
773: avalue => l_next_signers(i).SUBJECT);
774:
775:
776: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
777: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
778: 'Setting Notification Process Contract Attachment');
779: END IF;
780:
781:
789: ||'&pk3name=BusinessDocumentVersion&pk3value=-99&categories=OKC_REPO_CONTRACT,OKC_REPO_APP_ABSTRACT');
790:
791:
792:
793: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
794: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
795: 'Setting Notification Process Master Item Key to: ' || itemkey);
796: END IF;
797:
790:
791:
792:
793: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
794: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
795: 'Setting Notification Process Master Item Key to: ' || itemkey);
796: END IF;
797:
798: WF_ENGINE.SetItemAttrText (
800: itemkey => l_item_key,
801: aname => 'MASTER_ITEM_KEY',
802: avalue => itemkey);
803:
804: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
805: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
806: 'Starting Notification Process with item type '||itemtype ||'itemkey '||l_item_key );
807: END IF;
808:
801: aname => 'MASTER_ITEM_KEY',
802: avalue => itemkey);
803:
804: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
805: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
806: 'Starting Notification Process with item type '||itemtype ||'itemkey '||l_item_key );
807: END IF;
808:
809: wf_engine.startProcess(
812: END IF; -- l_next_signers.exists(i)
813:
814: END LOOP;
815:
816: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
817: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
818: 'Calling WF_ENGINE.setitemattrnumber for SIGNER_COUNTER: ' || l_notified_count);
819: END IF;
820:
813:
814: END LOOP;
815:
816: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
817: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
818: 'Calling WF_ENGINE.setitemattrnumber for SIGNER_COUNTER: ' || l_notified_count);
819: END IF;
820:
821:
826: avalue => l_notified_count);
827:
828: END IF; -- (l_next_signer.count > 0)
829:
830: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
831: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
832: g_module || l_api_name,
833: 'Leaving OKC_REP_SIGN_WF_PVT.has_next_signer from funcmode=RUN');
834: END IF;
827:
828: END IF; -- (l_next_signer.count > 0)
829:
830: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
831: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
832: g_module || l_api_name,
833: 'Leaving OKC_REP_SIGN_WF_PVT.has_next_signer from funcmode=RUN');
834: END IF;
835: RETURN;
837:
838:
839: IF (funcmode = 'CANCEL') THEN
840: resultout := 'COMPLETE:';
841: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
842: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
843: g_module || l_api_name,
844: 'Leaving OKC_REP_SIGN_WF_PVT.has_next_signer from funcmode=CANCEL');
845: END IF;
838:
839: IF (funcmode = 'CANCEL') THEN
840: resultout := 'COMPLETE:';
841: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
842: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
843: g_module || l_api_name,
844: 'Leaving OKC_REP_SIGN_WF_PVT.has_next_signer from funcmode=CANCEL');
845: END IF;
846: RETURN;
847: END IF; -- (funcmode = 'CANCEL')
848:
849: IF (funcmode = 'TIMEOUT') THEN
850: resultout := 'COMPLETE:';
851: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
852: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
853: g_module || l_api_name,
854: 'Leaving OKC_REP_SIGN_WF_PVT.has_next_signer from funcmode=TIMEOUT');
855: END IF;
848:
849: IF (funcmode = 'TIMEOUT') THEN
850: resultout := 'COMPLETE:';
851: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
852: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
853: g_module || l_api_name,
854: 'Leaving OKC_REP_SIGN_WF_PVT.has_next_signer from funcmode=TIMEOUT');
855: END IF;
856: RETURN;
857: END IF; -- (funcmode = 'TIMEOUT')
858:
859: EXCEPTION
860: WHEN others THEN
861: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
862: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
863: g_module || l_api_name,
864: 'Leaving OKC_REP_SIGN_WF_PVT.has_next_signer with exceptions ' || sqlerrm);
865: END IF;
858:
859: EXCEPTION
860: WHEN others THEN
861: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
862: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
863: g_module || l_api_name,
864: 'Leaving OKC_REP_SIGN_WF_PVT.has_next_signer with exceptions ' || sqlerrm);
865: END IF;
866: wf_core.context('OKC_REP_SIGN_WF_PVT',
954: BEGIN
955:
956: l_api_name := 'update_hist_status_detailed';
957:
958: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
959: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
960: 'Entered OKC_REP_SIGN_WF_PVT.update_hist_status_detailed');
961: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
962: 'Item Type is: ' || itemtype);
955:
956: l_api_name := 'update_hist_status_detailed';
957:
958: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
959: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
960: 'Entered OKC_REP_SIGN_WF_PVT.update_hist_status_detailed');
961: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
962: 'Item Type is: ' || itemtype);
963: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
957:
958: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
959: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
960: 'Entered OKC_REP_SIGN_WF_PVT.update_hist_status_detailed');
961: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
962: 'Item Type is: ' || itemtype);
963: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
964: 'Item Key is: ' || itemkey);
965: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
959: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
960: 'Entered OKC_REP_SIGN_WF_PVT.update_hist_status_detailed');
961: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
962: 'Item Type is: ' || itemtype);
963: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
964: 'Item Key is: ' || itemkey);
965: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
966: 'actid is: ' || to_char(actid));
967: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
961: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
962: 'Item Type is: ' || itemtype);
963: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
964: 'Item Key is: ' || itemkey);
965: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
966: 'actid is: ' || to_char(actid));
967: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
968: 'Function mode is: ' || funcmode);
969: END IF;
963: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
964: 'Item Key is: ' || itemkey);
965: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
966: 'actid is: ' || to_char(actid));
967: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
968: 'Function mode is: ' || funcmode);
969: END IF;
970:
971: -- Get contract id and version Fs
1048: END If; --l_contract_type = 'REP_SBCR'
1049:
1050: IF(l_upd_cont_num_suc_yn = 'Y') THEN
1051:
1052: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1053: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1054: g_module || l_api_name,
1055: 'Contract Id is: ' || to_char(l_contract_id));
1056: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1049:
1050: IF(l_upd_cont_num_suc_yn = 'Y') THEN
1051:
1052: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1053: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1054: g_module || l_api_name,
1055: 'Contract Id is: ' || to_char(l_contract_id));
1056: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1057: g_module || l_api_name,
1052: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1053: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1054: g_module || l_api_name,
1055: 'Contract Id is: ' || to_char(l_contract_id));
1056: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1057: g_module || l_api_name,
1058: 'Contract Version is: ' || to_char(l_contract_version));
1059: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1060: g_module || l_api_name,
1055: 'Contract Id is: ' || to_char(l_contract_id));
1056: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1057: g_module || l_api_name,
1058: 'Contract Version is: ' || to_char(l_contract_version));
1059: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1060: g_module || l_api_name,
1061: 'Signer Notes : ' || l_wf_note);
1062: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1063: g_module || l_api_name,
1058: 'Contract Version is: ' || to_char(l_contract_version));
1059: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1060: g_module || l_api_name,
1061: 'Signer Notes : ' || l_wf_note);
1062: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1063: g_module || l_api_name,
1064: 'Signer action is : ' || l_sign_status);
1065: END IF;
1066:
1072: IF(notif_csr%NOTFOUND) THEN
1073: RAISE NO_DATA_FOUND;
1074: END IF;
1075:
1076: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1077: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1078: g_module || l_api_name,
1079: 'Signer Name is : ' || notif_rec.user_name);
1080: END IF;
1073: RAISE NO_DATA_FOUND;
1074: END IF;
1075:
1076: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1077: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1078: g_module || l_api_name,
1079: 'Signer Name is : ' || notif_rec.user_name);
1080: END IF;
1081:
1083: -- FUNCTION MODE IS RESPOND.
1084: IF (funcmode = 'RESPOND') THEN
1085: -- CURRENT Signer signed THE CONTRACTS
1086: IF (l_sign_status = G_WF_STATUS_SIGNED) THEN
1087: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1088: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1089: g_module || l_api_name,
1090: 'Signer action is : ' || G_WF_STATUS_SIGNED);
1091: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1084: IF (funcmode = 'RESPOND') THEN
1085: -- CURRENT Signer signed THE CONTRACTS
1086: IF (l_sign_status = G_WF_STATUS_SIGNED) THEN
1087: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1088: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1089: g_module || l_api_name,
1090: 'Signer action is : ' || G_WF_STATUS_SIGNED);
1091: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1092: g_module || l_api_name,
1087: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1088: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1089: g_module || l_api_name,
1090: 'Signer action is : ' || G_WF_STATUS_SIGNED);
1091: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1092: g_module || l_api_name,
1093: 'Calling OKC_REP_UTIL_PVT.add_signature_hist_record');
1094: END IF;
1095: OKC_REP_UTIL_PVT.add_signature_hist_record(
1106: p_note => l_wf_note,
1107: x_msg_data => l_msg_data,
1108: x_msg_count => l_msg_count,
1109: x_return_status => l_return_status);
1110: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1111: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1112: g_module || l_api_name,
1113: 'Completed OKC_REP_UTIL_PVT.add_signature_hist_record with return status: ' || l_return_status);
1114: END IF;
1107: x_msg_data => l_msg_data,
1108: x_msg_count => l_msg_count,
1109: x_return_status => l_return_status);
1110: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1111: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1112: g_module || l_api_name,
1113: 'Completed OKC_REP_UTIL_PVT.add_signature_hist_record with return status: ' || l_return_status);
1114: END IF;
1115:
1124:
1125: -- CURRENT Signer rejected THE CONTRACTS
1126: ELSIF (l_sign_status = G_WF_STATUS_REJECTED) THEN
1127:
1128: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1129: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1130: g_module || l_api_name,
1131: 'Signer action is : ' || G_WF_STATUS_REJECTED);
1132: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1125: -- CURRENT Signer rejected THE CONTRACTS
1126: ELSIF (l_sign_status = G_WF_STATUS_REJECTED) THEN
1127:
1128: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1129: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1130: g_module || l_api_name,
1131: 'Signer action is : ' || G_WF_STATUS_REJECTED);
1132: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1133: g_module || l_api_name,
1128: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1129: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1130: g_module || l_api_name,
1131: 'Signer action is : ' || G_WF_STATUS_REJECTED);
1132: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1133: g_module || l_api_name,
1134: 'Calling OKC_REP_UTIL_PVT.add_signature_hist_record');
1135: END IF;
1136: OKC_REP_UTIL_PVT.add_signature_hist_record(
1147: p_note => l_wf_note,
1148: x_msg_data => l_msg_data,
1149: x_msg_count => l_msg_count,
1150: x_return_status => l_return_status);
1151: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1152: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1153: g_module || l_api_name,
1154: 'Completed OKC_REP_UTIL_PVT.add_signature_hist_record with return status: ' || l_return_status);
1155: END IF;
1148: x_msg_data => l_msg_data,
1149: x_msg_count => l_msg_count,
1150: x_return_status => l_return_status);
1151: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1152: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1153: g_module || l_api_name,
1154: 'Completed OKC_REP_UTIL_PVT.add_signature_hist_record with return status: ' || l_return_status);
1155: END IF;
1156: -------------------------------------------------------
1167: l_master_key := wf_engine.GetItemAttrText(
1168: itemtype => itemtype,
1169: itemkey => itemkey,
1170: aname => 'MASTER_ITEM_KEY');
1171: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1172: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1173: g_module || l_api_name,
1174: 'Master Item Key is: ' || l_master_key);
1175: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1168: itemtype => itemtype,
1169: itemkey => itemkey,
1170: aname => 'MASTER_ITEM_KEY');
1171: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1172: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1173: g_module || l_api_name,
1174: 'Master Item Key is: ' || l_master_key);
1175: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1176: 'Completing master process waiting activity');
1171: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1172: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1173: g_module || l_api_name,
1174: 'Master Item Key is: ' || l_master_key);
1175: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1176: 'Completing master process waiting activity');
1177: END IF;
1178:
1179: --set attribute contract number to the changed number
1178:
1179: --set attribute contract number to the changed number
1180: IF(l_control_number IS NOT NULL) THEN
1181:
1182: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1183: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1184: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_NUMBER ' || l_control_number);
1185: END IF;
1186:
1179: --set attribute contract number to the changed number
1180: IF(l_control_number IS NOT NULL) THEN
1181:
1182: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1183: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1184: 'Calling WF_ENGINE.setitemattrnumber for CONTRACT_NUMBER ' || l_control_number);
1185: END IF;
1186:
1187: WF_ENGINE.SetItemAttrText (
1206:
1207:
1208: IF l_sign_status = G_WF_STATUS_REJECTED THEN
1209:
1210: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1211: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1212: g_module || l_api_name,
1213: 'Complete the activity WAIT_FOR_SIGNER_RESPONSE with l_sign_status : ' || l_sign_status);
1214: END IF;
1207:
1208: IF l_sign_status = G_WF_STATUS_REJECTED THEN
1209:
1210: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1211: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1212: g_module || l_api_name,
1213: 'Complete the activity WAIT_FOR_SIGNER_RESPONSE with l_sign_status : ' || l_sign_status);
1214: END IF;
1215:
1221: END IF;
1222:
1223: ELSE
1224:
1225: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1226: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1227: g_module || l_api_name,
1228: 'Complete the activity WAIT_FOR_SIGNER_RESPONSE with l_sign_status : ' || l_sign_status);
1229: END IF;
1222:
1223: ELSE
1224:
1225: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1226: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1227: g_module || l_api_name,
1228: 'Complete the activity WAIT_FOR_SIGNER_RESPONSE with l_sign_status : ' || l_sign_status);
1229: END IF;
1230:
1251: ELSIF (l_sign_status = G_WF_STATUS_MORE_APPROVERS) THEN
1252: resultout := 'COMPLETE:' || G_WF_STATUS_MORE_APPROVERS;
1253: ELSE resultout := 'COMPLETE:';
1254: END IF;
1255: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1256: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1257: g_module || l_api_name,
1258: 'Leaving OKC_REP_SIGN_WF_PVT.update_hist_status_detailed from funcmode=RUN');
1259: END IF;
1252: resultout := 'COMPLETE:' || G_WF_STATUS_MORE_APPROVERS;
1253: ELSE resultout := 'COMPLETE:';
1254: END IF;
1255: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1256: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1257: g_module || l_api_name,
1258: 'Leaving OKC_REP_SIGN_WF_PVT.update_hist_status_detailed from funcmode=RUN');
1259: END IF;
1260: CLOSE notif_csr;
1261: --RETURN;
1262: END IF; -- (funcmode = 'RUN')
1263:
1264: IF (funcmode = 'TIMEOUT') THEN
1265: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1266: fnd_log.string(FND_LOG.LEVEL_PROCEDURE, g_module || l_api_name,
1267: 'In OKC_REP_SIGN_WF_PVT.update_hist_status_detailed funcmode=TIMEOUT');
1268: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,g_module || l_api_name,
1269: 'Calling OKC_REP_UTIL_PVT.add_signature_hist_record');
1262: END IF; -- (funcmode = 'RUN')
1263:
1264: IF (funcmode = 'TIMEOUT') THEN
1265: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1266: fnd_log.string(FND_LOG.LEVEL_PROCEDURE, g_module || l_api_name,
1267: 'In OKC_REP_SIGN_WF_PVT.update_hist_status_detailed funcmode=TIMEOUT');
1268: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,g_module || l_api_name,
1269: 'Calling OKC_REP_UTIL_PVT.add_signature_hist_record');
1270: END IF;
1264: IF (funcmode = 'TIMEOUT') THEN
1265: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1266: fnd_log.string(FND_LOG.LEVEL_PROCEDURE, g_module || l_api_name,
1267: 'In OKC_REP_SIGN_WF_PVT.update_hist_status_detailed funcmode=TIMEOUT');
1268: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,g_module || l_api_name,
1269: 'Calling OKC_REP_UTIL_PVT.add_signature_hist_record');
1270: END IF;
1271: OKC_REP_UTIL_PVT.add_signature_hist_record(
1272: p_api_version => 1.0,
1283: x_msg_data => l_msg_data,
1284: x_msg_count => l_msg_count,
1285: x_return_status => l_return_status);
1286:
1287: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1288: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1289: g_module || l_api_name,
1290: 'Completed OKC_REP_UTIL_PVT.add_signature_hist_record with return status: ' || l_return_status);
1291: END IF;
1284: x_msg_count => l_msg_count,
1285: x_return_status => l_return_status);
1286:
1287: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1288: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1289: g_module || l_api_name,
1290: 'Completed OKC_REP_UTIL_PVT.add_signature_hist_record with return status: ' || l_return_status);
1291: END IF;
1292: -------------------------------------------------------
1303: END IF; -- (funcmode = 'TIMEOUT')
1304:
1305: END IF; --l_upd_cont_num_suc_yn = 'Y'
1306:
1307: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1308: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1309: g_module || l_api_name,
1310: 'Leaving OKC_REP_SIGN_WF_PVT.update_hist_status_detailed');
1311: END IF;
1304:
1305: END IF; --l_upd_cont_num_suc_yn = 'Y'
1306:
1307: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1308: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1309: g_module || l_api_name,
1310: 'Leaving OKC_REP_SIGN_WF_PVT.update_hist_status_detailed');
1311: END IF;
1312:
1313:
1314: EXCEPTION
1315:
1316: when others then
1317: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1318: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1319: g_module || l_api_name,
1320: '618: Leaving OKC_REP_SIGN_WF_PVT.update_hist_status_detailed with exceptions ' || sqlerrm);
1321: END IF;
1314: EXCEPTION
1315:
1316: when others then
1317: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1318: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1319: g_module || l_api_name,
1320: '618: Leaving OKC_REP_SIGN_WF_PVT.update_hist_status_detailed with exceptions ' || sqlerrm);
1321: END IF;
1322: --close cursors
1393: BEGIN
1394:
1395: l_api_name := 'sign_contract';
1396:
1397: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1398: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1399: 'Entered OKC_REP_SIGN_WF_PVT.sign_contract');
1400: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1401: 'Item Type is: ' || itemtype);
1394:
1395: l_api_name := 'sign_contract';
1396:
1397: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1398: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1399: 'Entered OKC_REP_SIGN_WF_PVT.sign_contract');
1400: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1401: 'Item Type is: ' || itemtype);
1402: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1396:
1397: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1398: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1399: 'Entered OKC_REP_SIGN_WF_PVT.sign_contract');
1400: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1401: 'Item Type is: ' || itemtype);
1402: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1403: 'Item Key is: ' || itemkey);
1404: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1398: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1399: 'Entered OKC_REP_SIGN_WF_PVT.sign_contract');
1400: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1401: 'Item Type is: ' || itemtype);
1402: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1403: 'Item Key is: ' || itemkey);
1404: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1405: 'actid is: ' || to_char(actid));
1406: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1400: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1401: 'Item Type is: ' || itemtype);
1402: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1403: 'Item Key is: ' || itemkey);
1404: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1405: 'actid is: ' || to_char(actid));
1406: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1407: 'Function mode is: ' || funcmode);
1408: END IF;
1402: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1403: 'Item Key is: ' || itemkey);
1404: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1405: 'actid is: ' || to_char(actid));
1406: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1407: 'Function mode is: ' || funcmode);
1408: END IF;
1409: IF (funcmode = 'RUN') THEN
1410: l_contract_id := wf_engine.GetItemAttrNumber(
1414: l_contract_version := wf_engine.GetItemAttrNumber(
1415: itemtype => itemtype,
1416: itemkey => itemkey,
1417: aname => 'CONTRACT_VERSION');
1418: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1419: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1420: g_module || l_api_name,
1421: 'Contract Id is: ' || to_char(l_contract_id));
1422: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1415: itemtype => itemtype,
1416: itemkey => itemkey,
1417: aname => 'CONTRACT_VERSION');
1418: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1419: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1420: g_module || l_api_name,
1421: 'Contract Id is: ' || to_char(l_contract_id));
1422: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1423: g_module || l_api_name,
1418: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1419: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1420: g_module || l_api_name,
1421: 'Contract Id is: ' || to_char(l_contract_id));
1422: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1423: g_module || l_api_name,
1424: 'Contract Version is: ' || to_char(l_contract_version));
1425: END IF;
1426: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1422: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1423: g_module || l_api_name,
1424: 'Contract Version is: ' || to_char(l_contract_version));
1425: END IF;
1426: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1427: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1428: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
1429: END IF;
1430: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
1423: g_module || l_api_name,
1424: 'Contract Version is: ' || to_char(l_contract_version));
1425: END IF;
1426: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1427: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1428: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
1429: END IF;
1430: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
1431: OKC_REP_UTIL_PVT.change_contract_status(
1438: p_note => NULL,
1439: x_msg_data => l_msg_data,
1440: x_msg_count => l_msg_count,
1441: x_return_status => l_return_status);
1442: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1443: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1444: g_module || l_api_name,
1445: 'Completed OKC_REP_UTIL_PVT.change_contract_status with return status: ' || l_return_status);
1446: END IF;
1439: x_msg_data => l_msg_data,
1440: x_msg_count => l_msg_count,
1441: x_return_status => l_return_status);
1442: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1443: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1444: g_module || l_api_name,
1445: 'Completed OKC_REP_UTIL_PVT.change_contract_status with return status: ' || l_return_status);
1446: END IF;
1447: -----------------------------------------------------
1456: OPEN contract_csr(l_contract_id);
1457: FETCH contract_csr INTO contract_rec;
1458:
1459: -- We need to first version the deliverables
1460: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1461: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1462: 'Calling OKC_DELIVERABLE_PROCESS_PVT.version_deliverables');
1463: END IF;
1464: OKC_DELIVERABLE_PROCESS_PVT.version_deliverables (
1457: FETCH contract_csr INTO contract_rec;
1458:
1459: -- We need to first version the deliverables
1460: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1461: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1462: 'Calling OKC_DELIVERABLE_PROCESS_PVT.version_deliverables');
1463: END IF;
1464: OKC_DELIVERABLE_PROCESS_PVT.version_deliverables (
1465: p_api_version => 1.0,
1470: x_return_status => l_return_status,
1471: x_msg_count => l_msg_count,
1472: x_msg_data => l_msg_data
1473: );
1474: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1475: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1476: 'OKC_DELIVERABLE_PROCESS_PVT.version_deliverables return status is : '
1477: || l_return_status);
1478: END IF;
1471: x_msg_count => l_msg_count,
1472: x_msg_data => l_msg_data
1473: );
1474: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1475: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1476: 'OKC_DELIVERABLE_PROCESS_PVT.version_deliverables return status is : '
1477: || l_return_status);
1478: END IF;
1479: -----------------------------------------------------
1483: RAISE OKC_API.G_EXCEPTION_ERROR;
1484: END IF;
1485: --------------------------------------------------------
1486:
1487: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1488: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1489: 'Latest signed version number is : '
1490: || contract_rec.latest_signed_ver_number);
1491: END IF;
1484: END IF;
1485: --------------------------------------------------------
1486:
1487: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1488: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1489: 'Latest signed version number is : '
1490: || contract_rec.latest_signed_ver_number);
1491: END IF;
1492: -- Now we need to activate deliverables
1495: ELSE
1496: l_sync_flag := FND_API.G_TRUE;
1497: END IF;
1498:
1499: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1500: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1501: 'l_sync_flag is : ' || l_sync_flag);
1502: END IF;
1503: l_activate_event_tbl(1).event_code := G_CONTRACT_EXPIRE_EVENT;
1496: l_sync_flag := FND_API.G_TRUE;
1497: END IF;
1498:
1499: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1500: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1501: 'l_sync_flag is : ' || l_sync_flag);
1502: END IF;
1503: l_activate_event_tbl(1).event_code := G_CONTRACT_EXPIRE_EVENT;
1504: l_activate_event_tbl(1).event_date := contract_rec.contract_expiration_date;
1502: END IF;
1503: l_activate_event_tbl(1).event_code := G_CONTRACT_EXPIRE_EVENT;
1504: l_activate_event_tbl(1).event_date := contract_rec.contract_expiration_date;
1505:
1506: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1507: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1508: 'Calling OKC_MANAGE_DELIVERABLES_GRP.activateDeliverables');
1509: END IF;
1510:
1503: l_activate_event_tbl(1).event_code := G_CONTRACT_EXPIRE_EVENT;
1504: l_activate_event_tbl(1).event_date := contract_rec.contract_expiration_date;
1505:
1506: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1507: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1508: 'Calling OKC_MANAGE_DELIVERABLES_GRP.activateDeliverables');
1509: END IF;
1510:
1511: OKC_MANAGE_DELIVERABLES_GRP.activateDeliverables (
1522: x_msg_data => l_msg_data,
1523: x_msg_count => l_msg_count,
1524: x_return_status => l_return_status);
1525:
1526: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1527: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1528: 'OKC_DELIVERABLE_PROCESS_PVT.activateDeliverables return status is : '
1529: || l_return_status);
1530: END IF;
1523: x_msg_count => l_msg_count,
1524: x_return_status => l_return_status);
1525:
1526: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1527: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1528: 'OKC_DELIVERABLE_PROCESS_PVT.activateDeliverables return status is : '
1529: || l_return_status);
1530: END IF;
1531: -----------------------------------------------------
1542: -- Get effective dates and version of the contract.
1543: OPEN arch_contract_csr(contract_rec.latest_signed_ver_number,l_contract_id);
1544: FETCH arch_contract_csr INTO arch_contract_rec;
1545: IF(contract_csr%NOTFOUND) THEN
1546: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1547: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1548: G_MODULE||l_api_name,
1549: 'Invalid Contract Id: '|| l_contract_id);
1550: END IF;
1543: OPEN arch_contract_csr(contract_rec.latest_signed_ver_number,l_contract_id);
1544: FETCH arch_contract_csr INTO arch_contract_rec;
1545: IF(contract_csr%NOTFOUND) THEN
1546: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1547: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1548: G_MODULE||l_api_name,
1549: 'Invalid Contract Id: '|| l_contract_id);
1550: END IF;
1551: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1558: l_prev_signed_effective_date := arch_contract_rec.contract_effective_date;
1559: l_prev_signed_expiration_date := arch_contract_rec.contract_expiration_date;
1560:
1561: CLOSE arch_contract_csr;
1562: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1563: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1564: 'Before checking if we need to call updateDeliverable and disableDeliverable()');
1565: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1566: 'Prev signed expiration date: ' || trunc(l_prev_signed_expiration_date));
1559: l_prev_signed_expiration_date := arch_contract_rec.contract_expiration_date;
1560:
1561: CLOSE arch_contract_csr;
1562: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1563: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1564: 'Before checking if we need to call updateDeliverable and disableDeliverable()');
1565: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1566: 'Prev signed expiration date: ' || trunc(l_prev_signed_expiration_date));
1567: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1561: CLOSE arch_contract_csr;
1562: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1563: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1564: 'Before checking if we need to call updateDeliverable and disableDeliverable()');
1565: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1566: 'Prev signed expiration date: ' || trunc(l_prev_signed_expiration_date));
1567: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1568: 'Current version expiration date: ' || trunc(contract_rec.contract_expiration_date));
1569: END IF;
1563: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1564: 'Before checking if we need to call updateDeliverable and disableDeliverable()');
1565: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1566: 'Prev signed expiration date: ' || trunc(l_prev_signed_expiration_date));
1567: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1568: 'Current version expiration date: ' || trunc(contract_rec.contract_expiration_date));
1569: END IF;
1570: l_update_event_tbl(1).event_code := G_CONTRACT_EFFECTIVE_EVENT;
1571: l_update_event_tbl(1).event_date := contract_rec.contract_effective_date;
1582: l_effective_date_matches_flag := FND_API.G_TRUE;
1583: END IF;
1584:
1585: IF ((l_expiration_date_matches_flag = FND_API.G_FALSE ) OR (l_effective_date_matches_flag = FND_API.G_FALSE)) THEN
1586: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1587: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1588: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables');
1589: END IF;
1590: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (
1583: END IF;
1584:
1585: IF ((l_expiration_date_matches_flag = FND_API.G_FALSE ) OR (l_effective_date_matches_flag = FND_API.G_FALSE)) THEN
1586: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1587: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1588: 'Calling OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables');
1589: END IF;
1590: OKC_MANAGE_DELIVERABLES_GRP.updateDeliverables (
1591: p_api_version => 1.0,
1598: x_msg_data => l_msg_data,
1599: x_msg_count => l_msg_count,
1600: x_return_status => l_return_status);
1601:
1602: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1603: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1604: 'OKC_DELIVERABLE_PROCESS_PVT.updateDeliverables return status is : '
1605: || l_return_status);
1606: END IF;
1599: x_msg_count => l_msg_count,
1600: x_return_status => l_return_status);
1601:
1602: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1603: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1604: 'OKC_DELIVERABLE_PROCESS_PVT.updateDeliverables return status is : '
1605: || l_return_status);
1606: END IF;
1607: -----------------------------------------------------
1612: END IF;
1613: --------------------------------------------------------
1614: END IF; -- expiration date comparision
1615: -- Disable prev. version deliverables
1616: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1617: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1618: 'Calling OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables');
1619: END IF;
1620: OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables (
1613: --------------------------------------------------------
1614: END IF; -- expiration date comparision
1615: -- Disable prev. version deliverables
1616: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1617: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1618: 'Calling OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables');
1619: END IF;
1620: OKC_MANAGE_DELIVERABLES_GRP.disableDeliverables (
1621: p_api_version => 1.0,
1627: x_msg_data => l_msg_data,
1628: x_msg_count => l_msg_count,
1629: x_return_status => l_return_status);
1630:
1631: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1632: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1633: 'OKC_DELIVERABLE_PROCESS_PVT.disableDeliverables return status is : '
1634: || l_return_status);
1635: END IF;
1628: x_msg_count => l_msg_count,
1629: x_return_status => l_return_status);
1630:
1631: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1632: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1633: 'OKC_DELIVERABLE_PROCESS_PVT.disableDeliverables return status is : '
1634: || l_return_status);
1635: END IF;
1636: -----------------------------------------------------
1640: RAISE OKC_API.G_EXCEPTION_ERROR;
1641: END IF;
1642: --------------------------------------------------------
1643: END IF; -- (l_sync_flag = 'Y')
1644: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1645: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1646: 'Updating latest_signed_ver_number column');
1647: END IF;
1648: UPDATE okc_rep_contracts_all
1641: END IF;
1642: --------------------------------------------------------
1643: END IF; -- (l_sync_flag = 'Y')
1644: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1645: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1646: 'Updating latest_signed_ver_number column');
1647: END IF;
1648: UPDATE okc_rep_contracts_all
1649: SET latest_signed_ver_number = contract_rec.contract_version_num
1651: CLOSE contract_csr;
1652:
1653:
1654: resultout := 'COMPLETE:';
1655: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1656: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1657: g_module || l_api_name,
1658: 'Leaving OKC_REP_sign_WF_PVT.sign_contract');
1659: END IF;
1652:
1653:
1654: resultout := 'COMPLETE:';
1655: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1656: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1657: g_module || l_api_name,
1658: 'Leaving OKC_REP_sign_WF_PVT.sign_contract');
1659: END IF;
1660: RETURN;
1661: END IF; -- (funcmode = 'RUN')
1662:
1663: EXCEPTION
1664: WHEN others THEN
1665: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1666: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1667: g_module || l_api_name,
1668: 'Leaving OKC_REP_sign_WF_PVT.sign_contract with exceptions ' || sqlerrm);
1669: END IF;
1662:
1663: EXCEPTION
1664: WHEN others THEN
1665: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1666: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1667: g_module || l_api_name,
1668: 'Leaving OKC_REP_sign_WF_PVT.sign_contract with exceptions ' || sqlerrm);
1669: END IF;
1670: wf_core.context('OKC_REP_SIGN_WF_PVT',
1713: BEGIN
1714:
1715: l_api_name := 'reject_contract';
1716:
1717: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1718: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1719: 'Entered OKC_REP_SIGN_WF_PVT.reject_contract');
1720: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1721: 'Item Type is: ' || itemtype);
1714:
1715: l_api_name := 'reject_contract';
1716:
1717: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1718: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1719: 'Entered OKC_REP_SIGN_WF_PVT.reject_contract');
1720: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1721: 'Item Type is: ' || itemtype);
1722: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1716:
1717: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1718: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1719: 'Entered OKC_REP_SIGN_WF_PVT.reject_contract');
1720: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1721: 'Item Type is: ' || itemtype);
1722: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1723: 'Item Key is: ' || itemkey);
1724: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1718: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1719: 'Entered OKC_REP_SIGN_WF_PVT.reject_contract');
1720: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1721: 'Item Type is: ' || itemtype);
1722: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1723: 'Item Key is: ' || itemkey);
1724: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1725: 'actid is: ' || to_char(actid));
1726: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1720: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1721: 'Item Type is: ' || itemtype);
1722: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1723: 'Item Key is: ' || itemkey);
1724: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1725: 'actid is: ' || to_char(actid));
1726: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1727: 'Function mode is: ' || funcmode);
1728: END IF;
1722: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1723: 'Item Key is: ' || itemkey);
1724: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1725: 'actid is: ' || to_char(actid));
1726: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1727: 'Function mode is: ' || funcmode);
1728: END IF;
1729: if (funcmode = 'RUN') then
1730: l_contract_id := wf_engine.GetItemAttrNumber(
1734: l_contract_version := wf_engine.GetItemAttrNumber(
1735: itemtype => itemtype,
1736: itemkey => itemkey,
1737: aname => 'CONTRACT_VERSION');
1738: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1739: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1740: g_module || l_api_name,
1741: 'Contract Id is: ' || to_char(l_contract_id));
1742: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1735: itemtype => itemtype,
1736: itemkey => itemkey,
1737: aname => 'CONTRACT_VERSION');
1738: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1739: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1740: g_module || l_api_name,
1741: 'Contract Id is: ' || to_char(l_contract_id));
1742: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1743: g_module || l_api_name,
1738: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1739: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1740: g_module || l_api_name,
1741: 'Contract Id is: ' || to_char(l_contract_id));
1742: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1743: g_module || l_api_name,
1744: 'Contract Version is: ' || to_char(l_contract_version));
1745: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1746: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
1741: 'Contract Id is: ' || to_char(l_contract_id));
1742: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1743: g_module || l_api_name,
1744: 'Contract Version is: ' || to_char(l_contract_version));
1745: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1746: 'Calling OKC_REP_UTIL_PVT.change_contract_status');
1747: END IF;
1748:
1749: -- Update the contract status and add a record in OKC_REP_CON_STATUS_HIST table.
1757: p_note => NULL,
1758: x_msg_data => l_msg_data,
1759: x_msg_count => l_msg_count,
1760: x_return_status => l_return_status);
1761: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1762: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1763: g_module || l_api_name,
1764: 'Completed OKC_REP_UTIL_PVT.change_contract_status with return status: ' || l_return_status);
1765: END IF;
1758: x_msg_data => l_msg_data,
1759: x_msg_count => l_msg_count,
1760: x_return_status => l_return_status);
1761: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1762: fnd_log.string(FND_LOG.LEVEL_STATEMENT,
1763: g_module || l_api_name,
1764: 'Completed OKC_REP_UTIL_PVT.change_contract_status with return status: ' || l_return_status);
1765: END IF;
1766: -----------------------------------------------------
1771: END IF;
1772: --------------------------------------------------------
1773:
1774: resultout := 'COMPLETE:';
1775: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1776: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1777: g_module || l_api_name,
1778: 'Leaving OKC_REP_SIGN_WF_PVT.reject_contract');
1779: END IF;
1772: --------------------------------------------------------
1773:
1774: resultout := 'COMPLETE:';
1775: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1776: fnd_log.string(FND_LOG.LEVEL_PROCEDURE,
1777: g_module || l_api_name,
1778: 'Leaving OKC_REP_SIGN_WF_PVT.reject_contract');
1779: END IF;
1780: RETURN;
1780: RETURN;
1781: END IF; -- (funcmode = 'RUN')
1782: EXCEPTION
1783: WHEN others THEN
1784: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1785: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1786: g_module || l_api_name,
1787: 'Leaving OKC_REP_SIGN_WF_PVT.reject_contract with exceptions ' || sqlerrm);
1788: END IF;
1781: END IF; -- (funcmode = 'RUN')
1782: EXCEPTION
1783: WHEN others THEN
1784: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1785: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1786: g_module || l_api_name,
1787: 'Leaving OKC_REP_SIGN_WF_PVT.reject_contract with exceptions ' || sqlerrm);
1788: END IF;
1789: wf_core.context('OKC_REP_SIGN_WF_PVT',
1837: BEGIN
1838:
1839: l_api_name := 'con_has_terms';
1840:
1841: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1842: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1843: 'Entered OKC_REP_SIGN_WF_PVT.complete_notification');
1844: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1845: 'Item Type is: ' || itemtype);
1838:
1839: l_api_name := 'con_has_terms';
1840:
1841: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1842: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1843: 'Entered OKC_REP_SIGN_WF_PVT.complete_notification');
1844: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1845: 'Item Type is: ' || itemtype);
1846: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1840:
1841: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1842: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1843: 'Entered OKC_REP_SIGN_WF_PVT.complete_notification');
1844: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1845: 'Item Type is: ' || itemtype);
1846: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1847: 'Item Key is: ' || itemkey);
1848: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1842: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1843: 'Entered OKC_REP_SIGN_WF_PVT.complete_notification');
1844: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1845: 'Item Type is: ' || itemtype);
1846: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1847: 'Item Key is: ' || itemkey);
1848: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1849: 'actid is: ' || to_char(actid));
1850: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1844: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1845: 'Item Type is: ' || itemtype);
1846: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1847: 'Item Key is: ' || itemkey);
1848: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1849: 'actid is: ' || to_char(actid));
1850: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1851: 'Function mode is: ' || funcmode);
1852: END IF;
1846: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1847: 'Item Key is: ' || itemkey);
1848: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1849: 'actid is: ' || to_char(actid));
1850: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1851: 'Function mode is: ' || funcmode);
1852: END IF;
1853:
1854: IF (funcmode = 'RUN') THEN
1872: END IF; -- RUN
1873:
1874: EXCEPTION
1875: WHEN others THEN
1876: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1877: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1878: g_module || l_api_name,
1879: 'Leaving OKC_REP_SIGN_WF_PVT.con_has_terms with exceptions ' || sqlerrm);
1880: END IF;
1873:
1874: EXCEPTION
1875: WHEN others THEN
1876: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1877: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1878: g_module || l_api_name,
1879: 'Leaving OKC_REP_SIGN_WF_PVT.con_has_terms with exceptions ' || sqlerrm);
1880: END IF;
1881: wf_core.context('OKC_REP_SIGN_WF_PVT',
1936: BEGIN
1937:
1938: l_api_name := 'con_attach_generated_yn';
1939:
1940: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1941: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1942: 'Entered OKC_REP_SIGN_WF_PVT.complete_notification');
1943: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1944: 'Item Type is: ' || itemtype);
1937:
1938: l_api_name := 'con_attach_generated_yn';
1939:
1940: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1941: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1942: 'Entered OKC_REP_SIGN_WF_PVT.complete_notification');
1943: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1944: 'Item Type is: ' || itemtype);
1945: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1939:
1940: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1941: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1942: 'Entered OKC_REP_SIGN_WF_PVT.complete_notification');
1943: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1944: 'Item Type is: ' || itemtype);
1945: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1946: 'Item Key is: ' || itemkey);
1947: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1941: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1942: 'Entered OKC_REP_SIGN_WF_PVT.complete_notification');
1943: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1944: 'Item Type is: ' || itemtype);
1945: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1946: 'Item Key is: ' || itemkey);
1947: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1948: 'actid is: ' || to_char(actid));
1949: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1943: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1944: 'Item Type is: ' || itemtype);
1945: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1946: 'Item Key is: ' || itemkey);
1947: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1948: 'actid is: ' || to_char(actid));
1949: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1950: 'Function mode is: ' || funcmode);
1951: END IF;
1945: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1946: 'Item Key is: ' || itemkey);
1947: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1948: 'actid is: ' || to_char(actid));
1949: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1950: 'Function mode is: ' || funcmode);
1951: END IF;
1952:
1953: IF (funcmode = 'RUN') THEN
1965: itemtype => itemtype,
1966: itemkey => itemkey,
1967: aname => 'CONC_REQUEST_ID' );
1968:
1969: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1970: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1810: Entering con_attach_generated_yn');
1971: END IF;
1972:
1973: OPEN contract_attachment_exists(l_contract_id, l_contract_type, l_con_req_id) ;
1966: itemkey => itemkey,
1967: aname => 'CONC_REQUEST_ID' );
1968:
1969: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1970: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'1810: Entering con_attach_generated_yn');
1971: END IF;
1972:
1973: OPEN contract_attachment_exists(l_contract_id, l_contract_type, l_con_req_id) ;
1974: FETCH contract_attachment_exists into l_value;
1982:
1983: END IF; -- RUN
1984: EXCEPTION
1985: WHEN others THEN
1986: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1987: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1988: g_module || l_api_name,
1989: 'Leaving OKC_REP_SIGN_WF_PVT.con_attach_generated_yn with exceptions ' || sqlerrm);
1990: END IF;
1983: END IF; -- RUN
1984: EXCEPTION
1985: WHEN others THEN
1986: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1987: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
1988: g_module || l_api_name,
1989: 'Leaving OKC_REP_SIGN_WF_PVT.con_attach_generated_yn with exceptions ' || sqlerrm);
1990: END IF;
1991: wf_core.context('OKC_REP_SIGN_WF_PVT',
2031: BEGIN
2032:
2033: l_api_name := 'contract_preview_yn';
2034:
2035: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2036: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2037: 'Entered OKC_REP_SIGN_WF_PVT.contract_preview_yn');
2038: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2039: 'Item Type is: ' || itemtype);
2032:
2033: l_api_name := 'contract_preview_yn';
2034:
2035: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2036: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2037: 'Entered OKC_REP_SIGN_WF_PVT.contract_preview_yn');
2038: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2039: 'Item Type is: ' || itemtype);
2040: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2034:
2035: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2036: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2037: 'Entered OKC_REP_SIGN_WF_PVT.contract_preview_yn');
2038: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2039: 'Item Type is: ' || itemtype);
2040: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2041: 'Item Key is: ' || itemkey);
2042: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2036: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2037: 'Entered OKC_REP_SIGN_WF_PVT.contract_preview_yn');
2038: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2039: 'Item Type is: ' || itemtype);
2040: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2041: 'Item Key is: ' || itemkey);
2042: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2043: 'actid is: ' || to_char(actid));
2044: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2038: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2039: 'Item Type is: ' || itemtype);
2040: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2041: 'Item Key is: ' || itemkey);
2042: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2043: 'actid is: ' || to_char(actid));
2044: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2045: 'Function mode is: ' || funcmode);
2046: END IF;
2040: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2041: 'Item Key is: ' || itemkey);
2042: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2043: 'actid is: ' || to_char(actid));
2044: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2045: 'Function mode is: ' || funcmode);
2046: END IF;
2047:
2048: IF (funcmode = 'RUN') THEN
2068:
2069: END IF; -- RUN
2070: EXCEPTION
2071: WHEN others THEN
2072: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2073: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2074: g_module || l_api_name,
2075: 'Leaving OKC_REP_SIGN_WF_PVT.contract_preview_yn with exceptions ' || sqlerrm);
2076: END IF;
2069: END IF; -- RUN
2070: EXCEPTION
2071: WHEN others THEN
2072: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2073: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2074: g_module || l_api_name,
2075: 'Leaving OKC_REP_SIGN_WF_PVT.contract_preview_yn with exceptions ' || sqlerrm);
2076: END IF;
2077: wf_core.context('OKC_REP_SIGN_WF_PVT',
2105: BEGIN
2106:
2107: l_api_name := 'Apps_initialize';
2108:
2109: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2110: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2111: 'Entered OKC_REP_WF_PVT.Apps_initialize');
2112: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2113: 'Item Type is: ' || itemtype);
2106:
2107: l_api_name := 'Apps_initialize';
2108:
2109: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2110: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2111: 'Entered OKC_REP_WF_PVT.Apps_initialize');
2112: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2113: 'Item Type is: ' || itemtype);
2114: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2108:
2109: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2110: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2111: 'Entered OKC_REP_WF_PVT.Apps_initialize');
2112: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2113: 'Item Type is: ' || itemtype);
2114: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2115: 'Item Key is: ' || itemkey);
2116: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2110: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2111: 'Entered OKC_REP_WF_PVT.Apps_initialize');
2112: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2113: 'Item Type is: ' || itemtype);
2114: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2115: 'Item Key is: ' || itemkey);
2116: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2117: 'actid is: ' || to_char(actid));
2118: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2112: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2113: 'Item Type is: ' || itemtype);
2114: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2115: 'Item Key is: ' || itemkey);
2116: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2117: 'actid is: ' || to_char(actid));
2118: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2119: 'Function mode is: ' || funcmode);
2120: END IF;
2114: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2115: 'Item Key is: ' || itemkey);
2116: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2117: 'actid is: ' || to_char(actid));
2118: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2119: 'Function mode is: ' || funcmode);
2120: END IF;
2121:
2122: IF (funcmode = 'RUN') THEN
2161: END IF; -- RUN
2162:
2163: EXCEPTION
2164: WHEN others THEN
2165: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2166: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2167: g_module || l_api_name,
2168: 'Leaving OKC_REP_WF_PVT.Apps_initialize with exceptions ' || sqlerrm);
2169: END IF;
2162:
2163: EXCEPTION
2164: WHEN others THEN
2165: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2166: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,
2167: g_module || l_api_name,
2168: 'Leaving OKC_REP_WF_PVT.Apps_initialize with exceptions ' || sqlerrm);
2169: END IF;
2170: wf_core.context('OKC_REP_WF_PVT',