DBA Data[Home] [Help]

APPS.PO_CHANGEORDERWF_PVT dependencies on PO_CHANGEORDERWF_PVT

Line 1: PACKAGE BODY PO_ChangeOrderWF_PVT AS

1: PACKAGE BODY PO_ChangeOrderWF_PVT AS
2: /* $Header: POXVSCWB.pls 120.36.12010000.5 2008/11/15 03:37:51 vchiran ship $ */
3:
4:
5: g_pkg_name CONSTANT VARCHAR2(50) := 'PO_ChangeOrderWF_PVT';

Line 5: g_pkg_name CONSTANT VARCHAR2(50) := 'PO_ChangeOrderWF_PVT';

1: PACKAGE BODY PO_ChangeOrderWF_PVT AS
2: /* $Header: POXVSCWB.pls 120.36.12010000.5 2008/11/15 03:37:51 vchiran ship $ */
3:
4:
5: g_pkg_name CONSTANT VARCHAR2(50) := 'PO_ChangeOrderWF_PVT';
6: g_module_prefix CONSTANT VARCHAR2(50) := 'po.plsql.' || g_pkg_name || '.';
7: g_fnd_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
8: g_po_wf_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('PO_SET_DEBUG_WORKFLOW_ON'),'N');
9:

Line 146: t_varval(2) := 'PLSQLCLOB:PO_ChangeOrderWF_PVT.GEN_NTF_FOR_REQ_SUP_CHN/'||

142:
143: t_varname(1) := 'FROM_SUPPLIER';
144: t_varval(1) := l_supplier_username;
145: t_varname(2) := 'NTF_FOR_REQ_SUP_CHN';
146: t_varval(2) := 'PLSQLCLOB:PO_ChangeOrderWF_PVT.GEN_NTF_FOR_REQ_SUP_CHN/'||
147: '@' ||p_header_id||'#'
148: ||p_release_id||'$'
149: ||p_chg_req_grp_id||'%'
150: ||p_requestor_id||'^';

Line 153: t_varval(3) := 'PLSQL:PO_ChangeOrderWF_PVT.GEN_NTF_FOR_REQ_SUBJECT/'||l_item_key;

149: ||p_chg_req_grp_id||'%'
150: ||p_requestor_id||'^';
151:
152: t_varname(3) := 'NTF_FOR_REQ_SUBJECT';
153: t_varval(3) := 'PLSQL:PO_ChangeOrderWF_PVT.GEN_NTF_FOR_REQ_SUBJECT/'||l_item_key;
154: t_varname(4) := 'PREPARER_USERNAME';
155: t_varval(4) := l_requestor_username;
156:
157:

Line 242: t_varval(2) := 'PLSQLCLOB:PO_ChangeOrderWF_PVT.GEN_NTF_FOR_PLAN_SUP_CHN/'||

238:
239: t_varname(1) := 'FROM_SUPPLIER';
240: t_varval(1) := l_supplier_username;
241: t_varname(2) := 'NTF_FOR_PLAN_SUP_CHN';
242: t_varval(2) := 'PLSQLCLOB:PO_ChangeOrderWF_PVT.GEN_NTF_FOR_PLAN_SUP_CHN/'||
243: '@' ||p_header_id||'#'
244: ||p_release_id||'$'
245: ||p_chg_req_grp_id||'%'
246: ||p_planner_id||'^';

Line 249: t_varval(3) := 'PLSQL:PO_ChangeOrderWF_PVT.GEN_NTF_FOR_PLAN_SUBJECT/'||l_item_key;

245: ||p_chg_req_grp_id||'%'
246: ||p_planner_id||'^';
247:
248: t_varname(3) := 'NTF_FOR_PLAN_SUBJECT';
249: t_varval(3) := 'PLSQL:PO_ChangeOrderWF_PVT.GEN_NTF_FOR_PLAN_SUBJECT/'||l_item_key;
250: t_varname(4) := 'PLANNER_USERNAME';
251: t_varval(4) := l_planner_username;
252:
253:

Line 453: wf_core.context('PO_ChangeOrderWF_PVT',

449:
450: commit;
451: EXCEPTION
452: WHEN OTHERS THEN
453: wf_core.context('PO_ChangeOrderWF_PVT',
454: 'InsertActionHist'||sqlerrm,x_progress);
455: raise;
456:
457: END InsertActionHist;

Line 985: *New version will call PO_ChangeOrderWF_PVT.IS_PO_HDR_REJECTED followed by PO_ChangeOrderWF_PVT.Register_rejection.

981: /*
982: *taken from PO_REQAPPROVAL_INIT1
983: *PO_REQAPPROVAL_INIT1.Register_rejection will be updated to support older version of poxwfpoa.wft
984: *In other words, initial version of poxwfpoa.wft only calls PO_REQ_APPROVAL_INIT1.Register_rejection.
985: *New version will call PO_ChangeOrderWF_PVT.IS_PO_HDR_REJECTED followed by PO_ChangeOrderWF_PVT.Register_rejection.
986: *In order for older version of workflow to have the new functionality, PO_REQ_APPROVAL_INIT1.Register_rejection will
987: *need to include the logic of PO_ChangeOrderWF_PVT.IS_PO_HDR_REJECTED within.
988: */
989: procedure Register_rejection ( itemtype in varchar2,

Line 987: *need to include the logic of PO_ChangeOrderWF_PVT.IS_PO_HDR_REJECTED within.

983: *PO_REQAPPROVAL_INIT1.Register_rejection will be updated to support older version of poxwfpoa.wft
984: *In other words, initial version of poxwfpoa.wft only calls PO_REQ_APPROVAL_INIT1.Register_rejection.
985: *New version will call PO_ChangeOrderWF_PVT.IS_PO_HDR_REJECTED followed by PO_ChangeOrderWF_PVT.Register_rejection.
986: *In order for older version of workflow to have the new functionality, PO_REQ_APPROVAL_INIT1.Register_rejection will
987: *need to include the logic of PO_ChangeOrderWF_PVT.IS_PO_HDR_REJECTED within.
988: */
989: procedure Register_rejection ( itemtype in varchar2,
990: itemkey in varchar2,
991: actid in number,

Line 1123: x_supp_user_name := PO_ChangeOrderWF_PVT.getEmailResponderUserName

1119: end if;
1120:
1121: if (substr(x_supp_user_name, 1, 6) = 'email:') then
1122: --Get the username and store that in the supplier_user_name.
1123: x_supp_user_name := PO_ChangeOrderWF_PVT.getEmailResponderUserName
1124: (x_supp_user_name, l_ntf_role_name);
1125:
1126:
1127: end if;

Line 1143: wf_core.context('PO_ChangeOrderWF_PVT','Register_rejection',l_progress);

1139: IF g_fnd_debug = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1140: FND_LOG.string(FND_LOG.level_unexpected, g_module_prefix ||
1141: l_api_name || '.others_exception', sqlerrm);
1142: END IF;
1143: wf_core.context('PO_ChangeOrderWF_PVT','Register_rejection',l_progress);
1144: raise;
1145: end;
1146:
1147: /*

Line 1390: wf_core.context('PO_ChangeOrderWF_PVT','IS_PO_HDR_REJECTED',x_progress);

1386: l_revision_num,
1387: resultout);
1388: end if;
1389: exception when others then
1390: wf_core.context('PO_ChangeOrderWF_PVT','IS_PO_HDR_REJECTED',x_progress);
1391: raise;
1392: END IS_PO_HDR_REJECTED;
1393:
1394: /*

Line 1457: wf_core.context('PO_ChangeOrderWF_PVT','IsPOHeaderRejected','000');

1453: x_result_code := 'N';
1454: end if;
1455: end if;
1456: exception when others then
1457: wf_core.context('PO_ChangeOrderWF_PVT','IsPOHeaderRejected','000');
1458: raise;
1459: END IsPOHeaderRejected;
1460:
1461: PROCEDURE GEN_NTF_FOR_REQ_SUP_CHN( p_code IN varchar2,

Line 5761: wf_core.context('PO_ChangeOrderWF_PVT','IS_PRORATE_NEEDED',x_progress);

5757: avalue => '');
5758:
5759: end if;
5760: exception when others then
5761: wf_core.context('PO_ChangeOrderWF_PVT','IS_PRORATE_NEEDED',x_progress);
5762: raise;
5763: END IS_PRORATE_NEEDED;
5764:
5765: /*

Line 5894: wf_core.context('PO_ChangeOrderWF_PVT','CHG_STATUS_TO_APPROVED',x_progress);

5890:
5891: end if;
5892:
5893: exception when others then
5894: wf_core.context('PO_ChangeOrderWF_PVT','CHG_STATUS_TO_APPROVED',x_progress);
5895: raise;
5896: END CHG_STATUS_TO_APPROVED;
5897:
5898:

Line 5954: wf_core.context('PO_ChangeOrderWF_PVT','CARRY_SUP_ACK_TO_NEW_REV',x_progress);

5950: x_progress := '003';
5951: raise l_carryover_exception;
5952: end if;
5953: exception when others then
5954: wf_core.context('PO_ChangeOrderWF_PVT','CARRY_SUP_ACK_TO_NEW_REV',x_progress);
5955: raise;
5956: END CARRY_SUP_ACK_TO_NEW_REV;
5957:
5958: /*

Line 5997: wf_core.context('PO_ChangeOrderWF_PVT','DOES_PO_REQ_SUP_ACK',x_progress);

5993: resultout := 'N';
5994: END if;
5995:
5996: exception when others then
5997: wf_core.context('PO_ChangeOrderWF_PVT','DOES_PO_REQ_SUP_ACK',x_progress);
5998: raise;
5999: END DOES_PO_REQ_SUP_ACK;
6000:
6001: /*

Line 6539: t_varval(1) := 'PLSQL:PO_ChangeOrderWF_PVT.GEN_NTF_FOR_SUP_SUBJECT/'||itemkey;

6535: END IF;
6536: end if;
6537:
6538: t_varname(1) := 'NTF_FOR_SUP_SUBJECT';
6539: t_varval(1) := 'PLSQL:PO_ChangeOrderWF_PVT.GEN_NTF_FOR_SUP_SUBJECT/'||itemkey;
6540: t_varname(2) := 'NTF_FOR_SUP_BUY_RP';
6541: -- RDP set the item Attribute to point to the notifications page
6542: t_varval(2) := 'JSP:/OA_HTML/OA.jsp?page=/oracle/apps/pos/notifications/webui/PosNotificationsRN'||
6543: '&L_CHG_REQ_GRP_ID=-&CHANGE_REQUEST_GROUP_ID-&L_PO_HEADER_ID=-&PO_HEADER_ID-&L_PO_RELEASE_ID=-&PO_RELEASE_ID-'||

Line 6558: wf_core.context('PO_ChangeOrderWF_PVT','is_po_approved_by_hie',x_progress);

6554:
6555: Wf_Engine.SetItemAttrTextArray(itemtype, itemkey,t_varname,t_varval);
6556:
6557: exception when others then
6558: wf_core.context('PO_ChangeOrderWF_PVT','is_po_approved_by_hie',x_progress);
6559: raise;
6560: END is_po_approved_by_hie;
6561:
6562:

Line 6600: wf_core.context('PO_ChangeOrderWF_PVT','set_data_sup_chn_evt',x_progress);

6596: avalue => l_item_key );
6597:
6598:
6599: exception when others then
6600: wf_core.context('PO_ChangeOrderWF_PVT','set_data_sup_chn_evt',x_progress);
6601: raise;
6602: END set_data_sup_chn_evt;
6603:
6604:

Line 6698: wf_core.context('PO_ChangeOrderWF_PVT','ANY_NEW_SUP_CHN',x_progress);

6694: p_note => null,
6695: p_path_id => null);
6696: end if;
6697: exception when others then
6698: wf_core.context('PO_ChangeOrderWF_PVT','ANY_NEW_SUP_CHN',x_progress);
6699: raise;
6700: END ANY_NEW_SUP_CHN;
6701:
6702: procedure any_supplier_change( itemtype in varchar2,

Line 6824: wf_core.context('PO_ChangeOrderWF_PVT','any_supplier_change','010');

6820: resultout := 'N';
6821: end if;
6822:
6823: exception when no_data_found then
6824: wf_core.context('PO_ChangeOrderWF_PVT','any_supplier_change','010');
6825: raise;
6826: when others then
6827: wf_core.context('PO_ChangeOrderWF_PVT','any_supplier_change',x_progress);
6828: raise;

Line 6827: wf_core.context('PO_ChangeOrderWF_PVT','any_supplier_change',x_progress);

6823: exception when no_data_found then
6824: wf_core.context('PO_ChangeOrderWF_PVT','any_supplier_change','010');
6825: raise;
6826: when others then
6827: wf_core.context('PO_ChangeOrderWF_PVT','any_supplier_change',x_progress);
6828: raise;
6829: END any_supplier_change;
6830:
6831:

Line 7008: t_varval(2) := 'PLSQLCLOB:PO_ChangeOrderWF_PVT.GEN_NTF_FOR_SUP_BUY_RP/'|| p_chg_req_grp_id; */

7004:
7005: t_varname(1) := 'SUPPLIER_USERNAME';
7006: t_varval(1) := l_supplier_username;
7007: /* t_varname(2) := 'NTF_FOR_SUP_BUY_RP';
7008: t_varval(2) := 'PLSQLCLOB:PO_ChangeOrderWF_PVT.GEN_NTF_FOR_SUP_BUY_RP/'|| p_chg_req_grp_id; */
7009:
7010: t_varname(2) := 'NTF_FOR_SUP_BUY_RP'; -- RDP changing to point to the notifications Page
7011: t_varval(2) := 'JSP:/OA_HTML/OA.jsp?page=/oracle/apps/pos/notifications/webui/PosNotificationsRN'||
7012: '&L_CHG_REQ_GRP_ID=-&CHANGE_REQUEST_GROUP_ID-&L_PO_HEADER_ID=-&PO_HEADER_ID-&L_PO_RELEASE_ID=-&PO_RELEASE_ID-'||

Line 7015: t_varval(3) := 'PLSQL:PO_ChangeOrderWF_PVT.GEN_NTF_FOR_SUP_SUBJECT/'||l_item_key;

7011: t_varval(2) := 'JSP:/OA_HTML/OA.jsp?page=/oracle/apps/pos/notifications/webui/PosNotificationsRN'||
7012: '&L_CHG_REQ_GRP_ID=-&CHANGE_REQUEST_GROUP_ID-&L_PO_HEADER_ID=-&PO_HEADER_ID-&L_PO_RELEASE_ID=-&PO_RELEASE_ID-'||
7013: '&L_PO_ACC_REQ_FLAG=-&ACKNOWLEDGE_REQ_FLAG-&L_NOTIF_USAGE=-&NOTIF_USAGE-&L_EXPLAIN_FYI=-&EXPLAIN_FYI-&L_STYLE_PARAM=-&PO_STYLE_TYPE-';
7014: t_varname(3) := 'NTF_FOR_SUP_SUBJECT';
7015: t_varval(3) := 'PLSQL:PO_ChangeOrderWF_PVT.GEN_NTF_FOR_SUP_SUBJECT/'||l_item_key;
7016: t_varname(4) := 'FROM_BUYER';
7017: t_varval(4) := l_buyer_username;
7018: t_varname(5) := 'NOTIF_USAGE';
7019: t_varval(5) := 'BUYER_RESP';

Line 7542: wf_core.context('PO_ChangeOrderWF_PVT','NOTIFY_REQ_PLAN',l_progress);

7538: end loop;
7539: close l_planners_csr;
7540:
7541: exception when others then
7542: wf_core.context('PO_ChangeOrderWF_PVT','NOTIFY_REQ_PLAN',l_progress);
7543: raise;
7544: END NOTIFY_REQ_PLAN ;
7545:
7546: procedure PROCESS_RESPONSE ( itemtype in varchar2,

Line 7582: wf_core.context('PO_ChangeOrderWF_PVT','PROCESS_RESPONSE',x_progress);

7578: l_revision_num, l_chg_req_grp_id, fnd_global.user_id, l_err_msg,
7579: l_return_code,l_doc_check_rec_type, 'Y', 'Y');
7580:
7581: exception when others then
7582: wf_core.context('PO_ChangeOrderWF_PVT','PROCESS_RESPONSE',x_progress);
7583: raise;
7584: END PROCESS_RESPONSE;
7585:
7586: procedure BUYER_ACCEPT_CHANGE ( itemtype in varchar2,

Line 7621: wf_core.context('PO_ChangeOrderWF_PVT','BUYER_ACCEPT_CHANGE','000');

7617: where change_request_group_id = l_chg_req_grp_id
7618: and request_status in ('PENDING','REQ_APP'); -- RDP ( Update records lying in REQ_APP status too)
7619:
7620: exception when others then
7621: wf_core.context('PO_ChangeOrderWF_PVT','BUYER_ACCEPT_CHANGE','000');
7622: raise;
7623: end BUYER_ACCEPT_CHANGE;
7624:
7625: procedure BUYER_REJECT_CHANGE ( itemtype in varchar2,

Line 7691: wf_core.context('PO_ChangeOrderWF_PVT','BUYER_REJECT_CHANGE','000');

7687: response_date = sysdate
7688: where change_request_group_id = l_chg_req_grp_id
7689: and request_status in ('PENDING','REQ_APP'); -- RDP ( Update records lying in REQ_APP status too)
7690: exception when others then
7691: wf_core.context('PO_ChangeOrderWF_PVT','BUYER_REJECT_CHANGE','000');
7692: raise;
7693: end BUYER_REJECT_CHANGE;
7694:
7695: /*

Line 7845: t_varval(1) := 'PLSQL:PO_ChangeOrderWF_PVT.GEN_NTF_FOR_BUYER_SUBJECT/'||l_item_key;

7841: n_varname(4) := 'CHANGE_REQUEST_GROUP_ID';
7842: n_varval(4) := p_chg_req_grp_id;
7843:
7844: t_varname(1) := 'NTF_FOR_BUYER_SUBJECT';
7845: t_varval(1) := 'PLSQL:PO_ChangeOrderWF_PVT.GEN_NTF_FOR_BUYER_SUBJECT/'||l_item_key;
7846: t_varname(2) := 'NOTIF_FOR_BUYER_SUP_CHG'; -- RDP set the item Attibute value to the Notifications Page
7847: t_varval(2) := 'JSP:/OA_HTML/OA.jsp?page=/oracle/apps/pos/notifications/webui/PosNotificationsRN'||
7848: '&L_CHG_REQ_GRP_ID=-&CHANGE_REQUEST_GROUP_ID-&L_PO_HEADER_ID=-&PO_HEADER_ID-&L_PO_RELEASE_ID=-&PO_RELEASE_ID-'||
7849: '&L_PO_ACC_REQ_FLAG=-&ACKNOWLEDGE_REQ_FLAG-&L_NOTIF_USAGE=-&NOTIF_USAGE-&L_EXPLAIN_FYI=-&EXPLAIN_FYI-&L_STYLE_PARAM=-&PO_STYLE_TYPE-';

Line 8418: END PO_ChangeOrderWF_PVT;

8414: resultout := 'F:' || l_external_url;
8415: return;
8416: end CHECK_POS_EXTERNAL_URL;
8417:
8418: END PO_ChangeOrderWF_PVT;