DBA Data[Home] [Help]

APPS.AHL_OSP_COST_PVT dependencies on FND_LOG

Line 120: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

116:
117: -- Initialize Procedure return status to success
118: x_return_status := FND_API.G_RET_STS_SUCCESS;
119:
120: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
121: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
122: END IF;
123:
124: -- Initialize the return value to zero

Line 121: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');

117: -- Initialize Procedure return status to success
118: x_return_status := FND_API.G_RET_STS_SUCCESS;
119:
120: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
121: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
122: END IF;
123:
124: -- Initialize the return value to zero
125: x_osp_cost := 0;

Line 127: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

123:
124: -- Initialize the return value to zero
125: x_osp_cost := 0;
126: IF p_workorder_id IS NULL THEN
127: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
128: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_workorder_id is null');
129: END IF;
130: -- AHL_PRD_NULL_WORKORDER_ID
131: RETURN;

Line 128: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_workorder_id is null');

124: -- Initialize the return value to zero
125: x_osp_cost := 0;
126: IF p_workorder_id IS NULL THEN
127: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
128: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_workorder_id is null');
129: END IF;
130: -- AHL_PRD_NULL_WORKORDER_ID
131: RETURN;
132: ELSE

Line 133: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

129: END IF;
130: -- AHL_PRD_NULL_WORKORDER_ID
131: RETURN;
132: ELSE
133: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
134: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_workorder_id = ' || p_workorder_id);
135: END IF;
136: END IF;
137:

Line 134: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_workorder_id = ' || p_workorder_id);

130: -- AHL_PRD_NULL_WORKORDER_ID
131: RETURN;
132: ELSE
133: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
134: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'p_workorder_id = ' || p_workorder_id);
135: END IF;
136: END IF;
137:
138: /* commented out since workorder org should be the same as osp line org

Line 143: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

139:
140: OPEN get_wo_org_id_csr;
141: FETCH get_wo_org_id_csr INTO l_inv_org_id;
142: IF(get_wo_org_id_csr%NOTFOUND) THEN
143: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
144: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Work order id is invalid.');
145: END IF;
146: CLOSE get_wo_org_id_csr;
147: RETURN;

Line 144: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Work order id is invalid.');

140: OPEN get_wo_org_id_csr;
141: FETCH get_wo_org_id_csr INTO l_inv_org_id;
142: IF(get_wo_org_id_csr%NOTFOUND) THEN
143: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
144: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Work order id is invalid.');
145: END IF;
146: CLOSE get_wo_org_id_csr;
147: RETURN;
148: ELSE

Line 149: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

145: END IF;
146: CLOSE get_wo_org_id_csr;
147: RETURN;
148: ELSE
149: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
150: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Got Inv Org Id as ' || l_inv_org_id || ' for Work order');
151: END IF;
152: CLOSE get_wo_org_id_csr;
153: END IF;

Line 150: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Got Inv Org Id as ' || l_inv_org_id || ' for Work order');

146: CLOSE get_wo_org_id_csr;
147: RETURN;
148: ELSE
149: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
150: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Got Inv Org Id as ' || l_inv_org_id || ' for Work order');
151: END IF;
152: CLOSE get_wo_org_id_csr;
153: END IF;
154: */

Line 160: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

156: OPEN get_osp_line_dtls_csr;
157: FETCH get_osp_line_dtls_csr into l_osp_line_rec;
158: IF(get_osp_line_dtls_csr%NOTFOUND) THEN
159: -- No OSP Order has been created for this Work order
160: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
161: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'No Active OSP Order line found for this workorder.');
162: END IF;
163: CLOSE get_osp_line_dtls_csr;
164: RETURN;

Line 161: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'No Active OSP Order line found for this workorder.');

157: FETCH get_osp_line_dtls_csr into l_osp_line_rec;
158: IF(get_osp_line_dtls_csr%NOTFOUND) THEN
159: -- No OSP Order has been created for this Work order
160: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
161: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'No Active OSP Order line found for this workorder.');
162: END IF;
163: CLOSE get_osp_line_dtls_csr;
164: RETURN;
165: END IF;

Line 179: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

175: OPEN get_po_line_price_csr(NVL(l_osp_line_rec.po_line_id, l_osp_line_rec.req_loc_po_line_id));
176: /** End change by jaramana on January 11, 2008 for the Requisition ER 6034236 **/
177: FETCH get_po_line_price_csr INTO x_osp_cost, l_po_currency_code;
178:
179: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
180: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Price retrieved from PO Line with Id ' || l_osp_line_rec.po_line_id ||
181: ' is: ' || x_osp_cost);
182: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Currency Code retrieved from PO Line with Id ' || l_osp_line_rec.po_line_id ||
183: ' is: ' || l_po_currency_code);

Line 180: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Price retrieved from PO Line with Id ' || l_osp_line_rec.po_line_id ||

176: /** End change by jaramana on January 11, 2008 for the Requisition ER 6034236 **/
177: FETCH get_po_line_price_csr INTO x_osp_cost, l_po_currency_code;
178:
179: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
180: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Price retrieved from PO Line with Id ' || l_osp_line_rec.po_line_id ||
181: ' is: ' || x_osp_cost);
182: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Currency Code retrieved from PO Line with Id ' || l_osp_line_rec.po_line_id ||
183: ' is: ' || l_po_currency_code);
184:

Line 182: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Currency Code retrieved from PO Line with Id ' || l_osp_line_rec.po_line_id ||

178:
179: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
180: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Price retrieved from PO Line with Id ' || l_osp_line_rec.po_line_id ||
181: ' is: ' || x_osp_cost);
182: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Currency Code retrieved from PO Line with Id ' || l_osp_line_rec.po_line_id ||
183: ' is: ' || l_po_currency_code);
184:
185: END IF;
186:

Line 205: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

201: OPEN currency_code_csr(l_osp_line_rec.inventory_org_id);
202: FETCH currency_code_csr into l_ou_currency_code;
203: CLOSE currency_code_csr;
204:
205: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
206: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Currency Code retrieved from OU is: ' || l_ou_currency_code);
207: END IF;
208:
209: IF(l_ou_currency_code is NULL)THEN

Line 206: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Currency Code retrieved from OU is: ' || l_ou_currency_code);

202: FETCH currency_code_csr into l_ou_currency_code;
203: CLOSE currency_code_csr;
204:
205: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
206: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Currency Code retrieved from OU is: ' || l_ou_currency_code);
207: END IF;
208:
209: IF(l_ou_currency_code is NULL)THEN
210: FND_MESSAGE.Set_Name('AHL','AHL_VWP_CST_NO_CURRENCY');

Line 212: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN

208:
209: IF(l_ou_currency_code is NULL)THEN
210: FND_MESSAGE.Set_Name('AHL','AHL_VWP_CST_NO_CURRENCY');
211: FND_MSG_PUB.ADD;
212: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
213: fnd_log.string
214: (
215: fnd_log.level_error,
216: L_DEBUG_KEY,'No curency is defined for the organization of the osp order line'

Line 213: fnd_log.string

209: IF(l_ou_currency_code is NULL)THEN
210: FND_MESSAGE.Set_Name('AHL','AHL_VWP_CST_NO_CURRENCY');
211: FND_MSG_PUB.ADD;
212: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
213: fnd_log.string
214: (
215: fnd_log.level_error,
216: L_DEBUG_KEY,'No curency is defined for the organization of the osp order line'
217: );

Line 215: fnd_log.level_error,

211: FND_MSG_PUB.ADD;
212: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
213: fnd_log.string
214: (
215: fnd_log.level_error,
216: L_DEBUG_KEY,'No curency is defined for the organization of the osp order line'
217: );
218: END IF;
219: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 239: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

235: -- A Requisition has been created: try to get the cost as price of the requisition
236: OPEN get_req_line_price_csr(l_osp_line_rec.po_req_line_id);
237: FETCH get_req_line_price_csr INTO x_osp_cost, l_po_currency_code;
238:
239: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
240: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
241: L_DEBUG_KEY,
242: 'Price and Currency code retrieved from Requisition Line with Id ' || l_osp_line_rec.po_req_line_id ||
243: ' are: ' || x_osp_cost || ' and ' || l_po_currency_code);

Line 240: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

236: OPEN get_req_line_price_csr(l_osp_line_rec.po_req_line_id);
237: FETCH get_req_line_price_csr INTO x_osp_cost, l_po_currency_code;
238:
239: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
240: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
241: L_DEBUG_KEY,
242: 'Price and Currency code retrieved from Requisition Line with Id ' || l_osp_line_rec.po_req_line_id ||
243: ' are: ' || x_osp_cost || ' and ' || l_po_currency_code);
244: END IF;

Line 259: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

255: OPEN currency_code_csr(l_osp_line_rec.inventory_org_id);
256: FETCH currency_code_csr into l_ou_currency_code;
257: CLOSE currency_code_csr;
258:
259: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
260: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Currency Code retrieved from OU is: ' || l_ou_currency_code);
261: END IF;
262:
263: IF(l_ou_currency_code is NULL)THEN

Line 260: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Currency Code retrieved from OU is: ' || l_ou_currency_code);

256: FETCH currency_code_csr into l_ou_currency_code;
257: CLOSE currency_code_csr;
258:
259: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
260: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Currency Code retrieved from OU is: ' || l_ou_currency_code);
261: END IF;
262:
263: IF(l_ou_currency_code is NULL)THEN
264: FND_MESSAGE.Set_Name('AHL','AHL_VWP_CST_NO_CURRENCY');

Line 266: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)THEN

262:
263: IF(l_ou_currency_code is NULL)THEN
264: FND_MESSAGE.Set_Name('AHL','AHL_VWP_CST_NO_CURRENCY');
265: FND_MSG_PUB.ADD;
266: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)THEN
267: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, 'No curency is defined for the organization of the osp order line.');
268: END IF;
269: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
270: END IF;

Line 267: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, 'No curency is defined for the organization of the osp order line.');

263: IF(l_ou_currency_code is NULL)THEN
264: FND_MESSAGE.Set_Name('AHL','AHL_VWP_CST_NO_CURRENCY');
265: FND_MSG_PUB.ADD;
266: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL)THEN
267: FND_LOG.STRING(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, 'No curency is defined for the organization of the osp order line.');
268: END IF;
269: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
270: END IF;
271:

Line 290: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

286: CLOSE get_osp_order_dtls_csr;
287: IF (l_osp_order_rec.order_type_code = AHL_OSP_ORDERS_PVT.G_OSP_ORDER_TYPE_LOAN OR
288: l_osp_order_rec.order_type_code = AHL_OSP_ORDERS_PVT.G_OSP_ORDER_TYPE_BORROW) THEN
289: -- Cannot calculate cost for Loan and Borrow Orders
290: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
291: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cannot calculate cost of OSP Orders of type ' || l_osp_order_rec.order_type_code);
292: END IF;
293: RETURN;
294: ELSIF (l_osp_line_rec.service_item_id IS NULL OR l_osp_line_rec.service_item_uom_code IS NULL OR l_osp_line_rec.quantity IS NULL) THEN

Line 291: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cannot calculate cost of OSP Orders of type ' || l_osp_order_rec.order_type_code);

287: IF (l_osp_order_rec.order_type_code = AHL_OSP_ORDERS_PVT.G_OSP_ORDER_TYPE_LOAN OR
288: l_osp_order_rec.order_type_code = AHL_OSP_ORDERS_PVT.G_OSP_ORDER_TYPE_BORROW) THEN
289: -- Cannot calculate cost for Loan and Borrow Orders
290: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
291: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cannot calculate cost of OSP Orders of type ' || l_osp_order_rec.order_type_code);
292: END IF;
293: RETURN;
294: ELSIF (l_osp_line_rec.service_item_id IS NULL OR l_osp_line_rec.service_item_uom_code IS NULL OR l_osp_line_rec.quantity IS NULL) THEN
295: -- Cannot calculate cost: Insufficient information

Line 296: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

292: END IF;
293: RETURN;
294: ELSIF (l_osp_line_rec.service_item_id IS NULL OR l_osp_line_rec.service_item_uom_code IS NULL OR l_osp_line_rec.quantity IS NULL) THEN
295: -- Cannot calculate cost: Insufficient information
296: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
297: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cannot calculate cost due to insufficient OSP Line information: ' ||
298: ' Service Item Id: ' || l_osp_line_rec.service_item_id ||
299: ', Service Item Quantity: ' || l_osp_line_rec.quantity ||
300: ', Service Item UOM: ' || l_osp_line_rec.service_item_uom_code);

Line 297: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cannot calculate cost due to insufficient OSP Line information: ' ||

293: RETURN;
294: ELSIF (l_osp_line_rec.service_item_id IS NULL OR l_osp_line_rec.service_item_uom_code IS NULL OR l_osp_line_rec.quantity IS NULL) THEN
295: -- Cannot calculate cost: Insufficient information
296: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
297: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cannot calculate cost due to insufficient OSP Line information: ' ||
298: ' Service Item Id: ' || l_osp_line_rec.service_item_id ||
299: ', Service Item Quantity: ' || l_osp_line_rec.quantity ||
300: ', Service Item UOM: ' || l_osp_line_rec.service_item_uom_code);
301: END IF;

Line 318: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

314: FETCH get_item_dtls_csr INTO l_unit_price, l_temp_uom_code;
315: CLOSE get_item_dtls_csr;
316: IF (l_temp_uom_code IS NULL OR l_unit_price IS NULL) THEN
317: -- If either is null, return zero
318: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
319: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Insufficient Service Item information: Primary UOM Code: ' || l_temp_uom_code ||
320: ', List Price per unit: ' || l_unit_price);
321: END IF;
322: RETURN;

Line 319: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Insufficient Service Item information: Primary UOM Code: ' || l_temp_uom_code ||

315: CLOSE get_item_dtls_csr;
316: IF (l_temp_uom_code IS NULL OR l_unit_price IS NULL) THEN
317: -- If either is null, return zero
318: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
319: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Insufficient Service Item information: Primary UOM Code: ' || l_temp_uom_code ||
320: ', List Price per unit: ' || l_unit_price);
321: END IF;
322: RETURN;
323: END IF;

Line 327: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

323: END IF;
324: IF (l_temp_uom_code = l_osp_line_rec.service_item_uom_code) THEN
325: -- Calculate Price as Price = Qty * Price per Unit
326: x_osp_cost := l_osp_line_rec.quantity * l_unit_price;
327: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
328: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'UOM Codes are same. Calculated price as Quantity (' || l_osp_line_rec.quantity ||
329: ') * List Price per Unit (' || l_unit_price || ') = ' || x_osp_cost);
330: END IF;
331: ELSE

Line 328: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'UOM Codes are same. Calculated price as Quantity (' || l_osp_line_rec.quantity ||

324: IF (l_temp_uom_code = l_osp_line_rec.service_item_uom_code) THEN
325: -- Calculate Price as Price = Qty * Price per Unit
326: x_osp_cost := l_osp_line_rec.quantity * l_unit_price;
327: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
328: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'UOM Codes are same. Calculated price as Quantity (' || l_osp_line_rec.quantity ||
329: ') * List Price per Unit (' || l_unit_price || ') = ' || x_osp_cost);
330: END IF;
331: ELSE
332: -- UOM Codes are different: Convert Quantity from OSP Line Service Item UOM to Primary UOM of the Service Item

Line 333: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

329: ') * List Price per Unit (' || l_unit_price || ') = ' || x_osp_cost);
330: END IF;
331: ELSE
332: -- UOM Codes are different: Convert Quantity from OSP Line Service Item UOM to Primary UOM of the Service Item
333: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
334: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'UOM Codes are different. About to convert From Service Item UOM (' ||
335: l_osp_line_rec.service_item_uom_code || ') to Primary UOM (' ||
336: l_temp_uom_code || ') by calling inv_convert.inv_um_convert');
337: END IF;

Line 334: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'UOM Codes are different. About to convert From Service Item UOM (' ||

330: END IF;
331: ELSE
332: -- UOM Codes are different: Convert Quantity from OSP Line Service Item UOM to Primary UOM of the Service Item
333: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
334: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'UOM Codes are different. About to convert From Service Item UOM (' ||
335: l_osp_line_rec.service_item_uom_code || ') to Primary UOM (' ||
336: l_temp_uom_code || ') by calling inv_convert.inv_um_convert');
337: END IF;
338: l_converted_qty := inv_convert.inv_um_convert(item_id => l_osp_line_rec.service_item_id,

Line 356: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

352: END IF;
353:
354: -- Calculate Price as Price = Converted_Qty * Price per Unit
355: x_osp_cost := l_converted_qty * l_unit_price;
356: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
357: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Converted Quantity: ' || l_converted_qty ||
358: '. Calculated price as Converted Quantity (' || l_converted_qty ||
359: ') * List Price per Unit (' || l_unit_price || ') = ' || x_osp_cost);
360: END IF; -- Log Level

Line 357: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Converted Quantity: ' || l_converted_qty ||

353:
354: -- Calculate Price as Price = Converted_Qty * Price per Unit
355: x_osp_cost := l_converted_qty * l_unit_price;
356: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
357: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Converted Quantity: ' || l_converted_qty ||
358: '. Calculated price as Converted Quantity (' || l_converted_qty ||
359: ') * List Price per Unit (' || l_unit_price || ') = ' || x_osp_cost);
360: END IF; -- Log Level
361: END IF; -- Same or different UOM Codes

Line 365: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

361: END IF; -- Same or different UOM Codes
362: END IF; -- Can calculate Cost
363: END IF; -- Has PO or not
364:
365: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
366: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
367: END IF;
368:
369: EXCEPTION

Line 366: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

362: END IF; -- Can calculate Cost
363: END IF; -- Has PO or not
364:
365: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
366: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
367: END IF;
368:
369: EXCEPTION
370: WHEN FND_API.G_EXC_ERROR THEN