600: x_msg_count => l_msg_count,
601: x_msg_data => l_msg_data
602: );
603:
604: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
605:
606: If (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then
607: fnd_log.STRING (fnd_log.level_statement,
608: 'CSD.PLSQL.CSD_WF_PROCESS_PVT.AUTO_CREATE_REPAIR_ORDERS',
608: 'CSD.PLSQL.CSD_WF_PROCESS_PVT.AUTO_CREATE_REPAIR_ORDERS',
609: 'Create Internal SR Failed');
610: End if;
611:
612: RAISE FND_API.G_EXC_ERROR;
613:
614: END IF;
615:
616: l_created_sr := true;
709: l_repair_number := null;
710:
711: csd_repairs_pvt.Create_Repair_Order(
712: P_Api_Version_Number => 1.0,
713: P_Init_Msg_List => Fnd_Api.G_TRUE,
714: P_Commit => Fnd_Api.G_FALSE,
715: p_validation_level => Fnd_Api.G_VALID_LEVEL_FULL,
716: p_REPAIR_LINE_ID => Fnd_Api.G_MISS_NUM,
717: P_REPLN_Rec => l_repln_rec,
710:
711: csd_repairs_pvt.Create_Repair_Order(
712: P_Api_Version_Number => 1.0,
713: P_Init_Msg_List => Fnd_Api.G_TRUE,
714: P_Commit => Fnd_Api.G_FALSE,
715: p_validation_level => Fnd_Api.G_VALID_LEVEL_FULL,
716: p_REPAIR_LINE_ID => Fnd_Api.G_MISS_NUM,
717: P_REPLN_Rec => l_repln_rec,
718: X_REPAIR_LINE_ID => l_repair_line_id,
711: csd_repairs_pvt.Create_Repair_Order(
712: P_Api_Version_Number => 1.0,
713: P_Init_Msg_List => Fnd_Api.G_TRUE,
714: P_Commit => Fnd_Api.G_FALSE,
715: p_validation_level => Fnd_Api.G_VALID_LEVEL_FULL,
716: p_REPAIR_LINE_ID => Fnd_Api.G_MISS_NUM,
717: P_REPLN_Rec => l_repln_rec,
718: X_REPAIR_LINE_ID => l_repair_line_id,
719: X_REPAIR_NUMBER => l_repair_number,
712: P_Api_Version_Number => 1.0,
713: P_Init_Msg_List => Fnd_Api.G_TRUE,
714: P_Commit => Fnd_Api.G_FALSE,
715: p_validation_level => Fnd_Api.G_VALID_LEVEL_FULL,
716: p_REPAIR_LINE_ID => Fnd_Api.G_MISS_NUM,
717: P_REPLN_Rec => l_repln_rec,
718: X_REPAIR_LINE_ID => l_repair_line_id,
719: X_REPAIR_NUMBER => l_repair_number,
720: X_Return_Status => l_return_status,
721: X_Msg_Count => l_msg_count,
722: X_Msg_Data => l_msg_data
723: );
724:
725: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
726:
727: If (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then
728: fnd_log.STRING (fnd_log.level_statement,
729: 'CSD.PLSQL.CSD_WF_PROCESS_PVT.AUTO_CREATE_REPAIR_ORDERS',
729: 'CSD.PLSQL.CSD_WF_PROCESS_PVT.AUTO_CREATE_REPAIR_ORDERS',
730: 'Create RO Failed for transaction id = ' || l_transaction_id);
731: End if;
732:
733: RAISE FND_API.G_EXC_ERROR;
734:
735: END IF;
736:
737: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
830: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name, 'Calling csd_repairs_util.create_repair_warranty for order line id '||l_order_line_id);
831: END IF;
832: csd_repairs_util.create_repair_warranty
833: (p_api_version_number => 1.0,
834: p_init_msg_list => fnd_api.g_true,
835: p_commit => fnd_api.g_false,
836: x_return_status => x_return_status,
837: x_msg_count => x_msg_count,
838: x_msg_data => x_msg_data,
831: END IF;
832: csd_repairs_util.create_repair_warranty
833: (p_api_version_number => 1.0,
834: p_init_msg_list => fnd_api.g_true,
835: p_commit => fnd_api.g_false,
836: x_return_status => x_return_status,
837: x_msg_count => x_msg_count,
838: x_msg_data => x_msg_data,
839: x_contract_number => x_contract_number,
844: THEN
845: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name, 'Return from csd_repairs_util.create_repair_warranty. The return status is '||x_return_status);
846: END IF;
847:
848: IF x_return_status = fnd_api.g_ret_sts_success
849: THEN
850: resultout := 'COMPLETE:SUCCESS';
851: ELSE
852: resultout := 'COMPLETE:ERROR';