867: ROLLBACK TO SAVEPOINT Insert_Work_Row;
868: l_oracle_error := SQLCODE;
869: l_code_block := SUBSTR(SQLERRM, 1, 200);
870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
871: FND_MESSAGE.SET_NAME('GR','GR_UNEXPECTED_ERROR');
872: FND_MESSAGE.SET_TOKEN('TEXT',l_code_block,FALSE);
873: x_msg_data := FND_MESSAGE.Get;
874:
875: END Insert_Work_Row;
868: l_oracle_error := SQLCODE;
869: l_code_block := SUBSTR(SQLERRM, 1, 200);
870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
871: FND_MESSAGE.SET_NAME('GR','GR_UNEXPECTED_ERROR');
872: FND_MESSAGE.SET_TOKEN('TEXT',l_code_block,FALSE);
873: x_msg_data := FND_MESSAGE.Get;
874:
875: END Insert_Work_Row;
876:
869: l_code_block := SUBSTR(SQLERRM, 1, 200);
870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
871: FND_MESSAGE.SET_NAME('GR','GR_UNEXPECTED_ERROR');
872: FND_MESSAGE.SET_TOKEN('TEXT',l_code_block,FALSE);
873: x_msg_data := FND_MESSAGE.Get;
874:
875: END Insert_Work_Row;
876:
877: