DBA Data[Home] [Help]

APPS.POR_UTIL_PKG dependencies on POR_UTIL_PKG

Line 1: PACKAGE BODY POR_UTIL_PKG AS

1: PACKAGE BODY POR_UTIL_PKG AS
2: /* $Header: PORUTILB.pls 120.69.12020000.11 2013/06/04 10:40:19 rparise ship $ */
3:
4: -- Read the profile option that enables/disables the debug log
5: g_po_wf_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('PO_SET_DEBUG_WORKFLOW_ON'),'N');

Line 16: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'PO.PLSQL.POR_UTIL_PKG';

12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
16: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'PO.PLSQL.POR_UTIL_PKG';
17:
18: FUNCTION bool_to_varchar(b IN BOOLEAN) RETURN VARCHAR2 IS
19: BEGIN
20: IF(b) THEN

Line 519: 'Exception at POR_UTIL_PKG.get_document_number: Exceeding limit for Negative header number generation');

515: END IF;
516: l_inc_val := l_inc_val + 1;
517: IF (l_inc_val > 3) THEN
518: RAISE_APPLICATION_ERROR(-20000,
519: 'Exception at POR_UTIL_PKG.get_document_number: Exceeding limit for Negative header number generation');
520: END IF;
521: ELSE
522: l_cannotread := FALSE;
523: END IF;

Line 1927: 'Exception at POR_UTIL_PKG.validate_pjm_project_info ' || l_progress ||

1923:
1924: EXCEPTION
1925: WHEN OTHERS THEN
1926: RAISE_APPLICATION_ERROR(-20000,
1927: 'Exception at POR_UTIL_PKG.validate_pjm_project_info ' || l_progress ||
1928: 'SQLERRM:' || SQLERRM);
1929:
1930: END validate_pjm_project_info;
1931:

Line 2746: 'Exception at POR_UTIL_PKG.check_transaction_flow ' || l_progress ||

2742: EXCEPTION
2743: WHEN OTHERS THEN
2744: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2745: RAISE_APPLICATION_ERROR(-20000,
2746: 'Exception at POR_UTIL_PKG.check_transaction_flow ' || l_progress ||
2747: 'SQLERRM:' || SQLERRM);
2748:
2749: END check_transaction_flow;
2750:

Line 2765: 'Exception at POR_UTIL_PKG.truncate_po_encumbrance_gt ' || l_progress ||

2761:
2762: EXCEPTION
2763: WHEN OTHERS THEN
2764: RAISE_APPLICATION_ERROR(-20000,
2765: 'Exception at POR_UTIL_PKG.truncate_po_encumbrance_gt ' || l_progress ||
2766: 'SQLERRM:' || SQLERRM);
2767:
2768: END truncate_po_encumbrance_gt;
2769:

Line 2884: 'Exception at POR_UTIL_PKG.populate_po_encumbrance_gt ' || l_progress ||

2880:
2881: EXCEPTION
2882: WHEN OTHERS THEN
2883: RAISE_APPLICATION_ERROR(-20000,
2884: 'Exception at POR_UTIL_PKG.populate_po_encumbrance_gt ' || l_progress ||
2885: 'SQLERRM:' || SQLERRM);
2886:
2887: END populate_po_encumbrance_gt;
2888:

Line 2944: 'Exception at POR_UTIL_PKG.check_reserve ' || l_progress ||

2940: EXCEPTION
2941: WHEN OTHERS THEN
2942: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2943: RAISE_APPLICATION_ERROR(-20000,
2944: 'Exception at POR_UTIL_PKG.check_reserve ' || l_progress ||
2945: 'SQLERRM:' || SQLERRM);
2946:
2947: END check_reserve;
2948:

Line 3023: 'Exception at POR_UTIL_PKG.check_adjust ' || l_progress ||

3019: EXCEPTION
3020: WHEN OTHERS THEN
3021: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3022: RAISE_APPLICATION_ERROR(-20000,
3023: 'Exception at POR_UTIL_PKG.check_adjust ' || l_progress ||
3024: 'SQLERRM:' || SQLERRM);
3025:
3026: END check_adjust;
3027:

Line 3121: 'Exception at POR_UTIL_PKG.do_reserve_contractor ' || l_progress ||

3117: EXCEPTION
3118: WHEN OTHERS THEN
3119: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3120: RAISE_APPLICATION_ERROR(-20000,
3121: 'Exception at POR_UTIL_PKG.do_reserve_contractor ' || l_progress ||
3122: 'SQLERRM:' || SQLERRM);
3123:
3124: END do_reserve_contractor;
3125:

Line 3219: 'Exception at POR_UTIL_PKG.do_unreserve_contractor ' || l_progress ||

3215: EXCEPTION
3216: WHEN OTHERS THEN
3217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3218: RAISE_APPLICATION_ERROR(-20000,
3219: 'Exception at POR_UTIL_PKG.do_unreserve_contractor ' || l_progress ||
3220: 'SQLERRM:' || SQLERRM);
3221:
3222: END do_unreserve_contractor;
3223:

Line 3369: p_pkg_name => 'POR_UTIL_PKG')

3365: IF NOT FND_API.Compatible_API_Call(
3366: p_current_version_number => l_api_version,
3367: p_caller_version_number => p_api_version,
3368: p_api_name => l_api_name,
3369: p_pkg_name => 'POR_UTIL_PKG')
3370: THEN
3371: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
3372: FND_LOG.string(log_level => FND_LOG.LEVEL_STATEMENT,
3373: module => l_api_name || '.begin',

Line 4141: RAISE_APPLICATION_ERROR(-20000,'Exception at POR_UTIL_PKG.validate_rcv_funded_val(po_distribution_id : '

4137: END IF ;
4138:
4139: EXCEPTION
4140: WHEN OTHERS THEN
4141: RAISE_APPLICATION_ERROR(-20000,'Exception at POR_UTIL_PKG.validate_rcv_funded_val(po_distribution_id : '
4142: || p_distribution_id || ') ' || ' SQLERRM:' || SQLERRM);
4143: END get_rcv_funded_val;
4144:
4145: PROCEDURE get_funded_val_dist

Line 4163: RAISE_APPLICATION_ERROR(-20000,'Exception at POR_UTIL_PKG.get_funded_val_dist(p_distribution_id : '

4159: WHERE distribution_id = p_distribution_id ;
4160:
4161: EXCEPTION
4162: WHEN OTHERS THEN
4163: RAISE_APPLICATION_ERROR(-20000,'Exception at POR_UTIL_PKG.get_funded_val_dist(p_distribution_id : '
4164: || p_distribution_id || ') ' || ' SQLERRM:' || SQLERRM);
4165: END get_funded_val_dist;
4166: /* <> */
4167:

Line 5151: l_log_msg := 'POR_UTIL_PKG:req_imp_act_up_frm_wf - SQL Error Account Generator Loop';

5147: l_batch_id
5148: );
5149: IF (g_fnd_debug = 'Y') THEN
5150: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
5151: l_log_msg := 'POR_UTIL_PKG:req_imp_act_up_frm_wf - SQL Error Account Generator Loop';
5152: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5153: END IF;
5154: END IF;
5155: END;

Line 5600: l_log_msg := 'POR_UTIL_PKG:req_imp_mul_dst_act_up_frm_wf - SQLErr Account Generator Loop';

5596: l_batch_id
5597: );
5598: IF (g_fnd_debug = 'Y') THEN
5599: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
5600: l_log_msg := 'POR_UTIL_PKG:req_imp_mul_dst_act_up_frm_wf - SQLErr Account Generator Loop';
5601: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME||l_procedure_name, l_log_msg);
5602: END IF;
5603: END IF;
5604: END;

Line 5958: l_progress := 'POR_UTIL_PKG.Start_Email_WF_Process: at beginning of Start_Email_WF_Process';

5954: BEGIN
5955: select to_char (PO_WF_ITEMKEY_S.NEXTVAL) into l_seq_for_item_key from sys.dual;
5956: l_itemkey := to_char(p_document_id) || '-' || l_seq_for_item_key;
5957: l_itemtype := 'REQAPPRV';
5958: l_progress := 'POR_UTIL_PKG.Start_Email_WF_Process: at beginning of Start_Email_WF_Process';
5959:
5960: SELECT segment1 into l_segment1
5961: from po_requisition_headers_all
5962: where requisition_header_id = p_document_id;

Line 5964: l_progress := 'POR_UTIL_PKG.Start_Email_WF_Process: Verify whether the role exists in wf_users';

5960: SELECT segment1 into l_segment1
5961: from po_requisition_headers_all
5962: where requisition_header_id = p_document_id;
5963:
5964: l_progress := 'POR_UTIL_PKG.Start_Email_WF_Process: Verify whether the role exists in wf_users';
5965:
5966: IF (g_po_wf_debug = 'Y') THEN
5967: PO_WF_DEBUG_PKG.insert_debug (l_itemtype, l_itemkey, l_progress);
5968: END IF;

Line 6011: l_progress := 'POR_UTIL_PKG.Start_Email_WF_Process: at beginning of Start_Email_WF_Process';

6007:
6008: l_po_email_performer := Upper(l_po_email_performer);
6009: end if;
6010:
6011: l_progress := 'POR_UTIL_PKG.Start_Email_WF_Process: at beginning of Start_Email_WF_Process';
6012: l_workflow_process := 'EMAIL_MIPR_DOC';
6013:
6014: wf_engine.CreateProcess(ItemType => l_itemtype,
6015: ItemKey => l_itemkey,

Line 6055: avalue => 'PLSQLBLOB:POR_UTIL_PKG.PDF_ATTACH_MIPR/' || l_itemtype || ':' || l_itemkey);

6051:
6052: PO_WF_UTIL_PKG.SetItemAttrText (itemtype => l_itemtype,
6053: itemkey => l_itemkey,
6054: aname => 'PDF_ATTACHMENT_MIPR',
6055: avalue => 'PLSQLBLOB:POR_UTIL_PKG.PDF_ATTACH_MIPR/' || l_itemtype || ':' || l_itemkey);
6056:
6057: l_progress := 'POR_UTIL_PKG.Start_Email_WF_Process: Start the workflow process';
6058:
6059: IF (g_po_wf_debug = 'Y') THEN

Line 6057: l_progress := 'POR_UTIL_PKG.Start_Email_WF_Process: Start the workflow process';

6053: itemkey => l_itemkey,
6054: aname => 'PDF_ATTACHMENT_MIPR',
6055: avalue => 'PLSQLBLOB:POR_UTIL_PKG.PDF_ATTACH_MIPR/' || l_itemtype || ':' || l_itemkey);
6056:
6057: l_progress := 'POR_UTIL_PKG.Start_Email_WF_Process: Start the workflow process';
6058:
6059: IF (g_po_wf_debug = 'Y') THEN
6060: PO_WF_DEBUG_PKG.insert_debug (l_itemtype, l_itemkey, l_progress);
6061: END IF;

Line 6067: l_progress := 'POR_UTIL_PKG.Start_WF_Process_Email: In Exception handler';

6063: wf_engine. StartProcess (itemtype => l_itemtype, itemkey => l_itemkey);
6064:
6065: EXCEPTION
6066: WHEN OTHERS THEN
6067: l_progress := 'POR_UTIL_PKG.Start_WF_Process_Email: In Exception handler';
6068: IF (g_po_wf_debug = 'Y') THEN
6069: PO_WF_DEBUG_PKG.insert_debug(l_itemtype, l_itemkey, l_progress);
6070: END IF;
6071:

Line 6090: x_progress := 'POR_UTIL_PKG.pdf_attach_mipr';

6086:
6087: x_progress varchar2(300);
6088:
6089: BEGIN
6090: x_progress := 'POR_UTIL_PKG.pdf_attach_mipr';
6091:
6092: l_itemtype := substr(document_id, 1, instr(document_id, ':') - 1);
6093: l_itemkey := substr(document_id, instr(document_id, ':') + 1, length(document_id) - 2);
6094:

Line 6114: x_progress := 'POR_UTIL_PKG.pdf_attach_mipr - Exception ';

6110: document_type :='application/pdf; name='|| l_filename;
6111:
6112: EXCEPTION
6113: WHEN OTHERS THEN
6114: x_progress := 'POR_UTIL_PKG.pdf_attach_mipr - Exception ';
6115:
6116: document_type := 'text/html';
6117: l_message := fnd_message.get_string('PO', 'PO_PDF_FAILED');
6118: DBMS_LOB.write(document, lengthb(l_message), 1, UTL_RAW.cast_to_raw(l_message));

Line 6130: l_progress := 'POR_UTIL_PKG.insert_action_in_mipr_history: Start';

6126: l_progress VARCHAR2(300);
6127: l_api_name CONSTANT VARCHAR2(50) := 'insert_action_in_mipr_history';
6128: l_rec_found NUMBER;
6129: BEGIN
6130: l_progress := 'POR_UTIL_PKG.insert_action_in_mipr_history: Start';
6131: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
6132: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME || l_api_name,
6133: 'Progress: ' || l_progress );
6134: END IF;

Line 6176: l_progress := 'POR_UTIL_PKG.insert_action_in_mipr_history: In Exception handler';

6172: END IF;
6173:
6174: EXCEPTION
6175: WHEN OTHERS THEN
6176: l_progress := 'POR_UTIL_PKG.insert_action_in_mipr_history: In Exception handler';
6177: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
6178: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME || l_api_name,
6179: 'Progress: ' || l_progress );
6180: END IF;

Line 6185: END POR_UTIL_PKG;

6181:
6182: RAISE;
6183: END insert_action_in_mipr_history;
6184:
6185: END POR_UTIL_PKG;