925: d_api_version CONSTANT NUMBER := 1.0;
926: d_module CONSTANT VARCHAR2(100) := g_module_prefix||d_api_name;
927:
928: l_progress VARCHAR2(3) := '000' ;
929: l_emp_id NUMBER := FND_GLOBAL.employee_id;
930: l_request_id PO_HEADERS.request_id%TYPE := fnd_global.conc_request_id;
931:
932: BEGIN
933: -- Start standard API initialization
926: d_module CONSTANT VARCHAR2(100) := g_module_prefix||d_api_name;
927:
928: l_progress VARCHAR2(3) := '000' ;
929: l_emp_id NUMBER := FND_GLOBAL.employee_id;
930: l_request_id PO_HEADERS.request_id%TYPE := fnd_global.conc_request_id;
931:
932: BEGIN
933: -- Start standard API initialization
934: IF FND_API.to_boolean(p_init_msg_list) THEN
1103: d_api_name CONSTANT VARCHAR2(30) := 'update_line_qty_price_amt';
1104: d_module CONSTANT VARCHAR2(100) := g_module_prefix||d_api_name;
1105:
1106: l_progress VARCHAR2(3) := '000' ;
1107: l_emp_id NUMBER := FND_GLOBAL.employee_id;
1108:
1109: BEGIN
1110: -- Start standard API initialization
1111: IF FND_API.to_boolean(p_init_msg_list) THEN
1295: d_api_version CONSTANT NUMBER := 1.0;
1296: d_module CONSTANT VARCHAR2(100) := g_module_prefix||d_api_name;
1297:
1298: l_progress VARCHAR2(3) := '000' ;
1299: l_emp_id NUMBER := FND_GLOBAL.employee_id;
1300: l_request_id PO_HEADERS.request_id%TYPE := fnd_global.conc_request_id;
1301:
1302: BEGIN
1303: -- Start standard API initialization
1296: d_module CONSTANT VARCHAR2(100) := g_module_prefix||d_api_name;
1297:
1298: l_progress VARCHAR2(3) := '000' ;
1299: l_emp_id NUMBER := FND_GLOBAL.employee_id;
1300: l_request_id PO_HEADERS.request_id%TYPE := fnd_global.conc_request_id;
1301:
1302: BEGIN
1303: -- Start standard API initialization
1304: IF FND_API.to_boolean(p_init_msg_list) THEN
1485: d_api_version CONSTANT NUMBER := 1.0;
1486: d_module CONSTANT VARCHAR2(100) := g_module_prefix||d_api_name;
1487:
1488: l_progress VARCHAR2(3) := '000' ;
1489: l_emp_id NUMBER := FND_GLOBAL.employee_id;
1490: l_request_id PO_HEADERS.request_id%TYPE := fnd_global.conc_request_id;
1491:
1492: BEGIN
1493: -- Start standard API initialization
1486: d_module CONSTANT VARCHAR2(100) := g_module_prefix||d_api_name;
1487:
1488: l_progress VARCHAR2(3) := '000' ;
1489: l_emp_id NUMBER := FND_GLOBAL.employee_id;
1490: l_request_id PO_HEADERS.request_id%TYPE := fnd_global.conc_request_id;
1491:
1492: BEGIN
1493: -- Start standard API initialization
1494: IF FND_API.to_boolean(p_init_msg_list) THEN
1631: d_api_version CONSTANT NUMBER := 1.0;
1632: d_module CONSTANT VARCHAR2(100) := g_module_prefix||d_api_name;
1633:
1634: l_progress VARCHAR2(3) := '000' ;
1635: l_emp_id NUMBER := FND_GLOBAL.employee_id;
1636: l_request_id PO_HEADERS.request_id%TYPE := fnd_global.conc_request_id;
1637:
1638: BEGIN
1639: -- Start standard API initialization
1632: d_module CONSTANT VARCHAR2(100) := g_module_prefix||d_api_name;
1633:
1634: l_progress VARCHAR2(3) := '000' ;
1635: l_emp_id NUMBER := FND_GLOBAL.employee_id;
1636: l_request_id PO_HEADERS.request_id%TYPE := fnd_global.conc_request_id;
1637:
1638: BEGIN
1639: -- Start standard API initialization
1640: IF FND_API.to_boolean(p_init_msg_list) THEN
5155: PO_DEBUG.debug_var(d_module, l_progress, 'p_reason', p_reason);
5156: END IF;
5157:
5158: --Get User ID and Login ID
5159: l_user_id := FND_GLOBAL.USER_ID;
5160: IF (FND_GLOBAL.CONC_LOGIN_ID >= 0) THEN
5161: l_login_id := FND_GLOBAL.CONC_LOGIN_ID;
5162: ELSE
5163: l_login_id := FND_GLOBAL.LOGIN_ID;
5156: END IF;
5157:
5158: --Get User ID and Login ID
5159: l_user_id := FND_GLOBAL.USER_ID;
5160: IF (FND_GLOBAL.CONC_LOGIN_ID >= 0) THEN
5161: l_login_id := FND_GLOBAL.CONC_LOGIN_ID;
5162: ELSE
5163: l_login_id := FND_GLOBAL.LOGIN_ID;
5164: END IF;
5157:
5158: --Get User ID and Login ID
5159: l_user_id := FND_GLOBAL.USER_ID;
5160: IF (FND_GLOBAL.CONC_LOGIN_ID >= 0) THEN
5161: l_login_id := FND_GLOBAL.CONC_LOGIN_ID;
5162: ELSE
5163: l_login_id := FND_GLOBAL.LOGIN_ID;
5164: END IF;
5165:
5159: l_user_id := FND_GLOBAL.USER_ID;
5160: IF (FND_GLOBAL.CONC_LOGIN_ID >= 0) THEN
5161: l_login_id := FND_GLOBAL.CONC_LOGIN_ID;
5162: ELSE
5163: l_login_id := FND_GLOBAL.LOGIN_ID;
5164: END IF;
5165:
5166: IF g_debug_stmt THEN
5167: PO_DEBUG.debug_var(d_module, l_progress, 'l_user_id', l_user_id);
6368: PO_DEBUG.debug_var(d_module, l_progress, 'l_key', l_key);
6369: END IF;
6370:
6371: --Get User ID and Login ID
6372: l_user_id := FND_GLOBAL.USER_ID;
6373: IF (FND_GLOBAL.CONC_LOGIN_ID >= 0) THEN
6374: l_login_id := FND_GLOBAL.CONC_LOGIN_ID;
6375: ELSE
6376: l_login_id := FND_GLOBAL.LOGIN_ID;
6369: END IF;
6370:
6371: --Get User ID and Login ID
6372: l_user_id := FND_GLOBAL.USER_ID;
6373: IF (FND_GLOBAL.CONC_LOGIN_ID >= 0) THEN
6374: l_login_id := FND_GLOBAL.CONC_LOGIN_ID;
6375: ELSE
6376: l_login_id := FND_GLOBAL.LOGIN_ID;
6377: END IF;
6370:
6371: --Get User ID and Login ID
6372: l_user_id := FND_GLOBAL.USER_ID;
6373: IF (FND_GLOBAL.CONC_LOGIN_ID >= 0) THEN
6374: l_login_id := FND_GLOBAL.CONC_LOGIN_ID;
6375: ELSE
6376: l_login_id := FND_GLOBAL.LOGIN_ID;
6377: END IF;
6378:
6372: l_user_id := FND_GLOBAL.USER_ID;
6373: IF (FND_GLOBAL.CONC_LOGIN_ID >= 0) THEN
6374: l_login_id := FND_GLOBAL.CONC_LOGIN_ID;
6375: ELSE
6376: l_login_id := FND_GLOBAL.LOGIN_ID;
6377: END IF;
6378:
6379: --Query encumbrance flags from FINANCIALS_SYSTEM_PARAMETERS
6380: --to validate action_date with encumbrance if necessary
6821: l_progress := '001' ;
6822:
6823:
6824: --Get User ID and Login ID
6825: l_user_id := FND_GLOBAL.USER_ID;
6826: IF (FND_GLOBAL.CONC_LOGIN_ID >= 0) THEN
6827: l_login_id := FND_GLOBAL.CONC_LOGIN_ID;
6828: ELSE
6829: l_login_id := FND_GLOBAL.LOGIN_ID;
6822:
6823:
6824: --Get User ID and Login ID
6825: l_user_id := FND_GLOBAL.USER_ID;
6826: IF (FND_GLOBAL.CONC_LOGIN_ID >= 0) THEN
6827: l_login_id := FND_GLOBAL.CONC_LOGIN_ID;
6828: ELSE
6829: l_login_id := FND_GLOBAL.LOGIN_ID;
6830: END IF;
6823:
6824: --Get User ID and Login ID
6825: l_user_id := FND_GLOBAL.USER_ID;
6826: IF (FND_GLOBAL.CONC_LOGIN_ID >= 0) THEN
6827: l_login_id := FND_GLOBAL.CONC_LOGIN_ID;
6828: ELSE
6829: l_login_id := FND_GLOBAL.LOGIN_ID;
6830: END IF;
6831:
6825: l_user_id := FND_GLOBAL.USER_ID;
6826: IF (FND_GLOBAL.CONC_LOGIN_ID >= 0) THEN
6827: l_login_id := FND_GLOBAL.CONC_LOGIN_ID;
6828: ELSE
6829: l_login_id := FND_GLOBAL.LOGIN_ID;
6830: END IF;
6831:
6832: IF g_debug_stmt THEN
6833: PO_DEBUG.debug_var(d_module, l_progress, 'l_user_id', l_user_id);