[Home] [Help]
23: /* Function name: DEBUG */
24: /* Description : Logs the debug message */
25: /* Called from : Called from Update API */
26: /* */
27: /* STANDARD PARAMETERS */
28: /* In Parameters : */
29: /* p_message Required Debug message that needs to be logged */
30: /* p_mod_name Required Module name */
31: /* p_severity_level Required Severity level */
29: /* p_message Required Debug message that needs to be logged */
30: /* p_mod_name Required Module name */
31: /* p_severity_level Required Severity level */
32: /* Output Parameters: */
33: /* NON-STANDARD PARAMETERS */
34: /* In Parameters */
35: /* Out parameters */
36: /* Change Hist : */
37: /* 09/20/03 vlakaman Initial Creation. */
174: FROM hz_party_sites
175: WHERE party_site_id = p_party_site_id;
176:
177: BEGIN
178: -- Standard Start of API savepoint
179: SAVEPOINT process_service_request;
180:
181: -- Standard call to check for call compatibility.
182: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
177: BEGIN
178: -- Standard Start of API savepoint
179: SAVEPOINT process_service_request;
180:
181: -- Standard call to check for call compatibility.
182: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
183: p_api_version,
184: l_api_name,
185: G_PKG_NAME)
361: END IF;
362:
363: -- Api body ends here
364:
365: -- Standard check of p_commit.
366: IF Fnd_Api.To_Boolean(p_commit)
367: THEN
368: COMMIT WORK;
369: END IF;
367: THEN
368: COMMIT WORK;
369: END IF;
370:
371: -- Standard call to get message count and IF count is get message info.
372: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
373: p_data => x_msg_data);
374: EXCEPTION
375: WHEN Fnd_Api.G_EXC_ERROR THEN
426:
427: BEGIN
428: Debug('At the Beginning of process_charge_lines', l_mod_name, 1);
429:
430: -- Standard Start of API savepoint
431: SAVEPOINT process_charge_lines;
432:
433: -- Standard call to check for call compatibility.
434: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
429:
430: -- Standard Start of API savepoint
431: SAVEPOINT process_charge_lines;
432:
433: -- Standard call to check for call compatibility.
434: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
435: p_api_version,
436: l_api_name,
437: G_PKG_NAME)
640: END IF;
641:
642: -- Api body ends here
643:
644: -- Standard check of p_commit.
645: IF Fnd_Api.To_Boolean(p_commit)
646: THEN
647: COMMIT WORK;
648: END IF;
646: THEN
647: COMMIT WORK;
648: END IF;
649:
650: -- Standard call to get message count and IF count is get message info.
651: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
652: p_data => x_msg_data);
653: EXCEPTION
654: WHEN Fnd_Api.G_EXC_ERROR THEN
693: l_msg_data VARCHAR2(2000);
694: l_msg_index NUMBER;
695:
696: BEGIN
697: -- Standard Start of API savepoint
698: SAVEPOINT apply_contract;
699:
700: -- Standard call to check for call compatibility.
701: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
696: BEGIN
697: -- Standard Start of API savepoint
698: SAVEPOINT apply_contract;
699:
700: -- Standard call to check for call compatibility.
701: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
702: p_api_version,
703: l_api_name,
704: G_PKG_NAME)
744: -- (p_incident_id => p_incident_id ) ;
745:
746: -- Api body ends here
747:
748: -- Standard check of p_commit.
749: IF Fnd_Api.To_Boolean(p_commit)
750: THEN
751: COMMIT WORK;
752: END IF;
750: THEN
751: COMMIT WORK;
752: END IF;
753:
754: -- Standard call to get message count and IF count is get message info.
755: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
756: p_data => x_msg_data);
757: EXCEPTION
758: WHEN Fnd_Api.G_EXC_ERROR THEN
880: AND wdd.inventory_item_id = mtl.inventory_item_id
881: AND wdd.ship_from_location_id = mtl.organization_id;
882:
883: BEGIN
884: -- Standard Start of API savepoint
885: SAVEPOINT ship_sales_order;
886:
887: -- Standard call to check for call compatibility.
888: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
883: BEGIN
884: -- Standard Start of API savepoint
885: SAVEPOINT ship_sales_order;
886:
887: -- Standard call to check for call compatibility.
888: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
889: p_api_version,
890: l_api_name,
891: G_PKG_NAME)
1136: END; -- end of delivery action
1137:
1138: -- Api body ends here
1139:
1140: -- Standard check of p_commit.
1141: IF Fnd_Api.To_Boolean(p_commit)
1142: THEN
1143: COMMIT WORK;
1144: END IF;
1142: THEN
1143: COMMIT WORK;
1144: END IF;
1145:
1146: -- Standard call to get message count and IF count is get message info.
1147: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
1148: p_data => x_msg_data);
1149:
1150: EXCEPTION
1375: BEGIN
1376: -- Debug message
1377: Debug('At the Beginning of process_sales_order', l_mod_name, 1);
1378:
1379: -- Standard Start of API savepoint
1380: SAVEPOINT process_sales_order;
1381:
1382: -- Standard call to check for call compatibility.
1383: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
1378:
1379: -- Standard Start of API savepoint
1380: SAVEPOINT process_sales_order;
1381:
1382: -- Standard call to check for call compatibility.
1383: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
1384: p_api_version,
1385: l_api_name,
1386: G_PKG_NAME)
1732: END IF;
1733: Debug('Batch created batch_id=['||l_batch_id||']',l_mod_name,1);
1734:
1735: wsh_picking_batches_pub.Release_Batch (
1736: -- Standard parameters
1737: p_api_version => 1.0,
1738: p_init_msg_list => Fnd_API.G_False,
1739: p_commit => Fnd_API.G_False,
1740: x_return_status => x_Return_Status,
2191: END IF; -- end of all actions
2192:
2193: -- Api body ends here
2194:
2195: -- Standard check of p_commit.
2196: IF Fnd_Api.To_Boolean(p_commit)
2197: THEN
2198: COMMIT WORK;
2199: END IF;
2197: THEN
2198: COMMIT WORK;
2199: END IF;
2200:
2201: -- Standard call to get message count and IF count is get message info.
2202: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
2203: p_data => x_msg_data);
2204:
2205: EXCEPTION
2390: BEGIN
2391: -- Debug message
2392: Debug('At the Beginning of create_product_txn', l_mod_name, 1);
2393:
2394: -- Standard Start of API savepoint
2395: SAVEPOINT create_product_txn;
2396:
2397: -- Initialize API return status to success
2398: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2396:
2397: -- Initialize API return status to success
2398: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2399:
2400: -- Standard call to check for call compatibility.
2401: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
2402: p_api_version,
2403: l_api_name,
2404: G_PKG_NAME)
3906: END IF; --end of all process
3907:
3908: -- Api body ends here
3909:
3910: -- Standard check of p_commit.
3911: IF Fnd_Api.To_Boolean(p_commit)
3912: THEN
3913: COMMIT WORK;
3914: END IF;
3912: THEN
3913: COMMIT WORK;
3914: END IF;
3915:
3916: -- Standard call to get message count and IF count is get message info.
3917: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
3918: p_data => x_msg_data);
3919: EXCEPTION
3920: WHEN CREATE_ORDER THEN
4080: AND order_line_id IS NULL
4081: AND line_category_code = 'ORDER';
4082:
4083: BEGIN
4084: -- Standard Start of API savepoint
4085: SAVEPOINT create_product_txn;
4086:
4087: -- Standard call to check for call compatibility.
4088: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
4083: BEGIN
4084: -- Standard Start of API savepoint
4085: SAVEPOINT create_product_txn;
4086:
4087: -- Standard call to check for call compatibility.
4088: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
4089: p_api_version,
4090: l_api_name,
4091: G_PKG_NAME)
4517: END IF;
4518:
4519: -- Api body ends here
4520:
4521: -- Standard check of p_commit.
4522: IF Fnd_Api.To_Boolean(p_commit)
4523: THEN
4524: COMMIT WORK;
4525: END IF;
4523: THEN
4524: COMMIT WORK;
4525: END IF;
4526:
4527: -- Standard call to get message count and IF count is get message info.
4528: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4529: p_data => x_msg_data);
4530: EXCEPTION
4531: WHEN Fnd_Api.G_EXC_ERROR THEN
4763: END IF; --end of process txn
4764:
4765: -- Api body ends here
4766:
4767: -- Standard check of p_commit.
4768: IF Fnd_Api.To_Boolean(p_commit)
4769: THEN
4770: COMMIT WORK;
4771: END IF;
4769: THEN
4770: COMMIT WORK;
4771: END IF;
4772:
4773: -- Standard call to get message count and IF count is get message info.
4774: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
4775: p_data => x_msg_data);
4776: EXCEPTION
4777: WHEN CREATE_ORDER THEN
4912: l_est_detail_id NUMBER;
4913: l_delete_allow VARCHAR2(1);
4914:
4915: BEGIN
4916: -- Standard Start of API savepoint
4917: SAVEPOINT delete_product_txn;
4918:
4919: -- Standard call to check for call compatibility.
4920: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
4915: BEGIN
4916: -- Standard Start of API savepoint
4917: SAVEPOINT delete_product_txn;
4918:
4919: -- Standard call to check for call compatibility.
4920: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
4921: p_api_version,
4922: l_api_name,
4923: G_PKG_NAME)
5034: END IF; --end of delete
5035:
5036: -- Api body ends here
5037:
5038: -- Standard check of p_commit.
5039: IF Fnd_Api.To_Boolean(p_commit)
5040: THEN
5041: COMMIT WORK;
5042: END IF;
5040: THEN
5041: COMMIT WORK;
5042: END IF;
5043:
5044: -- Standard call to get message count and IF count is get message info.
5045: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5046: p_data => x_msg_data);
5047: EXCEPTION
5048: WHEN Fnd_Api.G_EXC_ERROR THEN
5098: l_add_ship_to_id NUMBER;
5099:
5100:
5101: BEGIN
5102: -- Standard Start of API savepoint
5103: SAVEPOINT create_default_prod_txn;
5104:
5105: -- Standard call to check for call compatibility.
5106: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
5101: BEGIN
5102: -- Standard Start of API savepoint
5103: SAVEPOINT create_default_prod_txn;
5104:
5105: -- Standard call to check for call compatibility.
5106: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
5107: p_api_version,
5108: l_api_name,
5109: G_PKG_NAME)
5280: Fnd_Message.SET_TOKEN('MSG_DATA', l_msg_text);
5281: Fnd_Msg_Pub.ADD;
5282: END IF;
5283:
5284: -- Standard check of p_commit.
5285: IF Fnd_Api.To_Boolean(p_commit)
5286: THEN
5287: COMMIT WORK;
5288: END IF;
5286: THEN
5287: COMMIT WORK;
5288: END IF;
5289:
5290: -- Standard call to get message count and IF count is get message info.
5291: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5292: p_data => x_msg_data);
5293:
5294: EXCEPTION
5449: BEGIN
5450: -- -----------------
5451: -- Begin create task
5452: -- -----------------
5453: -- Standard Start of API savepoint
5454: SAVEPOINT create_task;
5455: -- Standard call to check for call compatibility.
5456: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
5457: p_api_version,
5451: -- Begin create task
5452: -- -----------------
5453: -- Standard Start of API savepoint
5454: SAVEPOINT create_task;
5455: -- Standard call to check for call compatibility.
5456: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
5457: p_api_version,
5458: l_api_name,
5459: G_PKG_NAME)
5546:
5547: -- -------------------
5548: -- Api body ends here
5549: -- -------------------
5550: -- Standard check of p_commit.
5551: IF Fnd_Api.To_Boolean(p_commit)
5552: THEN
5553: COMMIT WORK;
5554: END IF;
5551: IF Fnd_Api.To_Boolean(p_commit)
5552: THEN
5553: COMMIT WORK;
5554: END IF;
5555: -- Standard call to get message count and IF count is get message info.
5556: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5557: p_data => x_msg_data);
5558: EXCEPTION
5559: WHEN Fnd_Api.G_EXC_ERROR THEN
5618: BEGIN
5619: -- -----------------
5620: -- Begin update task
5621: -- -----------------
5622: -- Standard Start of API savepoint
5623: SAVEPOINT update_task;
5624: -- Standard call to check for call compatibility.
5625: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
5626: p_api_version,
5620: -- Begin update task
5621: -- -----------------
5622: -- Standard Start of API savepoint
5623: SAVEPOINT update_task;
5624: -- Standard call to check for call compatibility.
5625: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
5626: p_api_version,
5627: l_api_name,
5628: G_PKG_NAME)
5716:
5717: -- -------------------
5718: -- Api body ends here
5719: -- -------------------
5720: -- Standard check of p_commit.
5721: IF Fnd_Api.To_Boolean(p_commit)
5722: THEN
5723: COMMIT WORK;
5724: END IF;
5721: IF Fnd_Api.To_Boolean(p_commit)
5722: THEN
5723: COMMIT WORK;
5724: END IF;
5725: -- Standard call to get message count and IF count is get message info.
5726: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
5727: p_data => x_msg_data);
5728: EXCEPTION
5729: WHEN Fnd_Api.G_EXC_ERROR THEN
5984: -- History : assignee_id --> assigned_by_id
5985: -- assignee_type --> null
5986: -- assignee_name --> null
5987:
5988: -- Standard Start of API savepoint
5989: SAVEPOINT Create_repair_task_hist;
5990: -- Standard call to check for call compatibility.
5991: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
5992: p_api_version,
5986: -- assignee_name --> null
5987:
5988: -- Standard Start of API savepoint
5989: SAVEPOINT Create_repair_task_hist;
5990: -- Standard call to check for call compatibility.
5991: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
5992: p_api_version,
5993: l_api_name,
5994: G_PKG_NAME)
6093:
6094: -- -------------------
6095: -- Api body ends here
6096: -- -------------------
6097: -- Standard check of p_commit.
6098: IF Fnd_Api.To_Boolean(p_commit)
6099: THEN
6100: COMMIT WORK;
6101: END IF;
6099: THEN
6100: COMMIT WORK;
6101: END IF;
6102:
6103: -- Standard call to get message count and IF count is get message info.
6104: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
6105: p_data => x_msg_data);
6106: END IF;
6107: EXCEPTION
6303: IF (l_event_code IN ('TOC', 'TSC')) THEN
6304: -- --------------------------------
6305: -- Begin create repair task history
6306: -- --------------------------------
6307: -- Standard Start of API savepoint
6308: SAVEPOINT Update_repair_task_hist;
6309: -- Standard call to check for call compatibility.
6310: IF NOT FND_API.Compatible_API_Call (l_api_version,
6311: p_api_version,
6305: -- Begin create repair task history
6306: -- --------------------------------
6307: -- Standard Start of API savepoint
6308: SAVEPOINT Update_repair_task_hist;
6309: -- Standard call to check for call compatibility.
6310: IF NOT FND_API.Compatible_API_Call (l_api_version,
6311: p_api_version,
6312: l_api_name ,
6313: G_PKG_NAME )
6411:
6412: -- -------------------
6413: -- Api body ends here
6414: -- -------------------
6415: -- Standard check of p_commit.
6416: IF FND_API.To_Boolean( p_commit ) THEN
6417: COMMIT WORK;
6418: END IF;
6419: -- Standard call to get message count and IF count is get message info.
6415: -- Standard check of p_commit.
6416: IF FND_API.To_Boolean( p_commit ) THEN
6417: COMMIT WORK;
6418: END IF;
6419: -- Standard call to get message count and IF count is get message info.
6420: FND_MSG_PUB.Count_And_Get
6421: (p_count => x_msg_count,
6422: p_data => x_msg_data );
6423: END IF;
6589: -- --------------------------------
6590: -- Begin create repair task history
6591: -- --------------------------------
6592:
6593: -- Standard Start of API savepoint
6594: SAVEPOINT Create_repair_task_hist;
6595: -- Standard call to check for call compatibility.
6596: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
6597: p_api_version,
6591: -- --------------------------------
6592:
6593: -- Standard Start of API savepoint
6594: SAVEPOINT Create_repair_task_hist;
6595: -- Standard call to check for call compatibility.
6596: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
6597: p_api_version,
6598: l_api_name,
6599: G_PKG_NAME)
6698:
6699: -- -------------------
6700: -- Api body ends here
6701: -- -------------------
6702: -- Standard check of p_commit.
6703: IF Fnd_Api.To_Boolean(p_commit)
6704: THEN
6705: COMMIT WORK;
6706: END IF;
6704: THEN
6705: COMMIT WORK;
6706: END IF;
6707:
6708: -- Standard call to get message count and IF count is get message info.
6709: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
6710: p_data => x_msg_data);
6711: END IF;
6712: EXCEPTION
6823: BEGIN
6824: -- --------------------------------
6825: -- Begin create repair task history
6826: -- --------------------------------
6827: -- Standard Start of API savepoint
6828: SAVEPOINT Update_repair_task_hist;
6829: -- Standard call to check for call compatibility.
6830: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
6831: p_api_version,
6825: -- Begin create repair task history
6826: -- --------------------------------
6827: -- Standard Start of API savepoint
6828: SAVEPOINT Update_repair_task_hist;
6829: -- Standard call to check for call compatibility.
6830: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
6831: p_api_version,
6832: l_api_name,
6833: G_PKG_NAME)
7118:
7119: -- -------------------
7120: -- Api body ends here
7121: -- -------------------
7122: -- Standard check of p_commit.
7123: IF Fnd_Api.To_Boolean(p_commit)
7124: THEN
7125: COMMIT WORK;
7126: END IF;
7123: IF Fnd_Api.To_Boolean(p_commit)
7124: THEN
7125: COMMIT WORK;
7126: END IF;
7127: -- Standard call to get message count and IF count is get message info.
7128: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
7129: p_data => x_msg_data);
7130: --END IF;
7131: -- ---------------------------------------------------------
7208: WHERE repair_group_id = p_repair_group_id;
7209:
7210: BEGIN
7211: --------------------------------------
7212: -- Standard Start of API savepoint
7213: --------------------------------------
7214: SAVEPOINT Close_Status;
7215:
7216: -- Standard call to check for call compatibility.
7212: -- Standard Start of API savepoint
7213: --------------------------------------
7214: SAVEPOINT Close_Status;
7215:
7216: -- Standard call to check for call compatibility.
7217: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
7218: p_api_version,
7219: l_api_name,
7220: G_PKG_NAME)
8002: /* procedure name: Update_iro_product_txn */
8003: /* Description: procedure used to update the product transaction */
8004: /* table and process pick release and shipping */
8005: /* transactions for internal ROs. */
8006: /* p_api_version Standard in parameter */
8007: /* p_commit Standard in parameter */
8008: /* p_init_msg_list Standard in parameter */
8009: /* p_validation_level Standard in parameter */
8010: /* x_return_status Standard Out parameter */
8003: /* Description: procedure used to update the product transaction */
8004: /* table and process pick release and shipping */
8005: /* transactions for internal ROs. */
8006: /* p_api_version Standard in parameter */
8007: /* p_commit Standard in parameter */
8008: /* p_init_msg_list Standard in parameter */
8009: /* p_validation_level Standard in parameter */
8010: /* x_return_status Standard Out parameter */
8011: /* x_msg_count Standard in parameter */
8004: /* table and process pick release and shipping */
8005: /* transactions for internal ROs. */
8006: /* p_api_version Standard in parameter */
8007: /* p_commit Standard in parameter */
8008: /* p_init_msg_list Standard in parameter */
8009: /* p_validation_level Standard in parameter */
8010: /* x_return_status Standard Out parameter */
8011: /* x_msg_count Standard in parameter */
8012: /* x_msg_data Standard in parameter , */
8005: /* transactions for internal ROs. */
8006: /* p_api_version Standard in parameter */
8007: /* p_commit Standard in parameter */
8008: /* p_init_msg_list Standard in parameter */
8009: /* p_validation_level Standard in parameter */
8010: /* x_return_status Standard Out parameter */
8011: /* x_msg_count Standard in parameter */
8012: /* x_msg_data Standard in parameter , */
8013: /* x_product_txn_rec in out record variable of type */
8006: /* p_api_version Standard in parameter */
8007: /* p_commit Standard in parameter */
8008: /* p_init_msg_list Standard in parameter */
8009: /* p_validation_level Standard in parameter */
8010: /* x_return_status Standard Out parameter */
8011: /* x_msg_count Standard in parameter */
8012: /* x_msg_data Standard in parameter , */
8013: /* x_product_txn_rec in out record variable of type */
8014: /* csd_process_pvt.product_txn_rec ) ; */
8007: /* p_commit Standard in parameter */
8008: /* p_init_msg_list Standard in parameter */
8009: /* p_validation_level Standard in parameter */
8010: /* x_return_status Standard Out parameter */
8011: /* x_msg_count Standard in parameter */
8012: /* x_msg_data Standard in parameter , */
8013: /* x_product_txn_rec in out record variable of type */
8014: /* csd_process_pvt.product_txn_rec ) ; */
8015: /*---------------------------------------------------------------------------------*/
8008: /* p_init_msg_list Standard in parameter */
8009: /* p_validation_level Standard in parameter */
8010: /* x_return_status Standard Out parameter */
8011: /* x_msg_count Standard in parameter */
8012: /* x_msg_data Standard in parameter , */
8013: /* x_product_txn_rec in out record variable of type */
8014: /* csd_process_pvt.product_txn_rec ) ; */
8015: /*---------------------------------------------------------------------------------*/
8016: PROCEDURE update_iro_product_txn(p_api_version IN NUMBER,
8145: IF l_statement_level >= l_debug_level
8146: THEN
8147: Fnd_Log.string(l_statement_level, l_module_name, 'begin');
8148: END IF;
8149: -- standard start of api savepoint
8150: SAVEPOINT update_iro_product_txn;
8151: IF l_statement_level >= l_debug_level
8152: THEN
8153: Fnd_Log.string(l_statement_level,
8153: Fnd_Log.string(l_statement_level,
8154: l_module_name,
8155: 'checking api compatibility');
8156: END IF;
8157: -- standard call to check for call compatibility.
8158: IF NOT Fnd_Api.compatible_api_call(l_api_version,
8159: p_api_version,
8160: l_api_name,
8161: g_pkg_name)
8898: END IF; -- if l_order_to_be_shipped
8899: END IF; -- end of ship sales order
8900: END IF; --end of process txn
8901: END IF; -- Action Type = MOVE_OUt
8902: -- standard check of p_commit.
8903: IF Fnd_Api.to_boolean(p_commit)
8904: THEN
8905: COMMIT WORK;
8906: END IF;
8909: -- Set return status to unexpected error
8910: x_return_status := Fnd_Api.g_ret_sts_success;
8911: -- If there is any error then rollback
8912: ROLLBACK TO release_sales_order;
8913: -- Standard procedure to get error message count and error message is also returned
8914: -- if error message count is 1
8915: Fnd_Msg_Pub.count_and_get(p_count => x_msg_count,
8916: p_data => x_msg_data);
8917: WHEN ship_order_excep THEN
8918: -- Set return status to unexpected error
8919: x_return_status := Fnd_Api.g_ret_sts_success;
8920: -- If there is any error then rollback
8921: ROLLBACK TO ship_sales_order;
8922: -- Standard procedure to get error message count and error message is also returned
8923: -- if error message count is 1
8924: Fnd_Msg_Pub.count_and_get(p_count => x_msg_count,
8925: p_data => x_msg_data);
8926: WHEN Fnd_Api.g_exc_error THEN
8927: -- Set return status to unexpected error
8928: x_return_status := Fnd_Api.g_ret_sts_error;
8929: -- If there is any error then rollback
8930: ROLLBACK TO update_iro_product_txn;
8931: -- Standard procedure to get error message count and error message is also returned
8932: -- if error message count is 1
8933: Fnd_Msg_Pub.count_and_get(p_count => x_msg_count,
8934: p_data => x_msg_data);
8935: WHEN Fnd_Api.g_exc_unexpected_error THEN
8936: -- Set return status to unexpected error
8937: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
8938: -- If there is any error then rollback
8939: ROLLBACK TO update_iro_product_txn;
8940: -- Standard procedure to get error message count and error message is also returned
8941: -- if error message count is 1
8942: Fnd_Msg_Pub.count_and_get(p_count => x_msg_count,
8943: p_data => x_msg_data);
8944: WHEN OTHERS THEN
8947: -- If there is any error then rollback
8948: ROLLBACK TO update_iro_product_txn;
8949: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_unexp_error)
8950: THEN
8951: -- Standard way to add sql error message to stack
8952: Fnd_Msg_Pub.add_exc_msg(g_pkg_name, l_api_name);
8953: END IF;
8954: -- Standard procedure to get error message count and error message is also returned
8955: -- if error message count is 1
8950: THEN
8951: -- Standard way to add sql error message to stack
8952: Fnd_Msg_Pub.add_exc_msg(g_pkg_name, l_api_name);
8953: END IF;
8954: -- Standard procedure to get error message count and error message is also returned
8955: -- if error message count is 1
8956: Fnd_Msg_Pub.count_and_get(p_count => x_msg_count,
8957: p_data => x_msg_data);
8958: END update_iro_product_txn;
8993: l_Service_Valdn_Org_Name VARCHAR2(240);
8994: l_Item_Name VARCHAR2(240);
8995: -- Define Constants here
8996: C_RO_Status_Open VARCHAR2(30) := 'O';
8997: C_Repair_Type_Ref_Standard VARCHAR2(10) := 'SR';
8998:
8999: i BINARY_INTEGER; -- loop variable
9000:
9001: -- Define Cursor to get all product transaction lines rec information for a repair order
9007: FROM csd_product_Transactions cpt, cs_estimate_Details ced
9008: WHERE cpt.repair_line_id = p_Repair_Line_Id
9009: AND cpt.estimate_detail_id = ced.estimate_detail_id;
9010: BEGIN
9011: -- Standard call to check for call compatibility.
9012: IF NOT Fnd_Api.Compatible_API_Call(l_api_version,
9013: p_api_version,
9014: l_api_name,
9015: G_PKG_NAME)
9082: Fnd_Message.SET_TOKEN('RO_STATUS', l_RO_Status_Meaning);
9083: Fnd_Msg_Pub.ADD;
9084: RAISE Fnd_Api.G_EXC_ERROR;
9085: END IF;
9086: -- Check if repair Type Ref is Standard
9087: IF l_RO_Repair_Type_Ref = C_Repair_TYpe_Ref_Standard
9088: THEN
9089: -- Display message: Default product transaction lines are not created for standard repair type ref
9090: -- CSD_STD_REP_TYPE_NO_PRODUCTXN_LINES
9083: Fnd_Msg_Pub.ADD;
9084: RAISE Fnd_Api.G_EXC_ERROR;
9085: END IF;
9086: -- Check if repair Type Ref is Standard
9087: IF l_RO_Repair_Type_Ref = C_Repair_TYpe_Ref_Standard
9088: THEN
9089: -- Display message: Default product transaction lines are not created for standard repair type ref
9090: -- CSD_STD_REP_TYPE_NO_PRODUCTXN_LINES
9091: Fnd_Message.SET_NAME('CSD',
9085: END IF;
9086: -- Check if repair Type Ref is Standard
9087: IF l_RO_Repair_Type_Ref = C_Repair_TYpe_Ref_Standard
9088: THEN
9089: -- Display message: Default product transaction lines are not created for standard repair type ref
9090: -- CSD_STD_REP_TYPE_NO_PRODUCTXN_LINES
9091: Fnd_Message.SET_NAME('CSD',
9092: 'CSD_STD_REPTYPE_NO_PRODTXN_LNS');
9093: Fnd_Message.SET_TOKEN('RO_NUMBER', l_RO_Number);
9280: -- -----------------
9281: -- Begin create repair task
9282: -- -----------------
9283:
9284: -- Standard Start of API savepoint
9285: IF l_statement_level >= l_debug_level
9286: THEN
9287: Fnd_Log.string(l_statement_level, l_module_name, 'begin');
9288: END IF;
9287: Fnd_Log.string(l_statement_level, l_module_name, 'begin');
9288: END IF;
9289: SAVEPOINT create_repair_task;
9290:
9291: -- Standard call to check for call compatibility.
9292: IF l_statement_level >= l_debug_level
9293: THEN
9294: Fnd_Log.string(l_statement_level,
9295: l_module_name,
9396:
9397: -- -------------------
9398: -- Api body ends here
9399: -- -------------------
9400: -- Standard check of p_commit.
9401: IF Fnd_Api.To_Boolean(p_commit)
9402: THEN
9403: COMMIT WORK;
9404: END IF;
9401: IF Fnd_Api.To_Boolean(p_commit)
9402: THEN
9403: COMMIT WORK;
9404: END IF;
9405: -- Standard call to get message count and IF count is get message info.
9406: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9407: p_data => x_msg_data);
9408: EXCEPTION
9409: WHEN Fnd_Api.G_EXC_ERROR THEN
9490: -- -----------------
9491: -- Begin update repair task
9492: -- -----------------
9493:
9494: -- Standard Start of API savepoint
9495: IF l_statement_level >= l_debug_level
9496: THEN
9497: Fnd_Log.string(l_statement_level, l_module_name, 'begin');
9498: END IF;
9497: Fnd_Log.string(l_statement_level, l_module_name, 'begin');
9498: END IF;
9499: SAVEPOINT update_repair_task;
9500:
9501: -- Standard call to check for call compatibility.
9502: IF l_statement_level >= l_debug_level
9503: THEN
9504: Fnd_Log.string(l_statement_level,
9505: l_module_name,
9613:
9614: -- -------------------
9615: -- Api body ends here
9616: -- -------------------
9617: -- Standard check of p_commit.
9618: IF Fnd_Api.To_Boolean(p_commit)
9619: THEN
9620: COMMIT WORK;
9621: END IF;
9618: IF Fnd_Api.To_Boolean(p_commit)
9619: THEN
9620: COMMIT WORK;
9621: END IF;
9622: -- Standard call to get message count and IF count is get message info.
9623: Fnd_Msg_Pub.Count_And_Get(p_count => x_msg_count,
9624: p_data => x_msg_data);
9625: EXCEPTION
9626: WHEN Fnd_Api.G_EXC_ERROR THEN