143: --
144: --
145: -- Parameters :
146: -- IN : p_api_version NUMBER Require
147: -- p_init_msg_list VARCHAR2 Optional (FND_API.G_FALSE)
148: -- p_commit VARCHAR2 Optional (FND_API.G_FALSE)
149: -- p_validation_level NUMBER Optional (FND_API.G_VALID_LEVEL_FULL)
150: -- OUT : x_return_status VARCHAR2(1)
151: -- x_msg_count NUMBER
144: --
145: -- Parameters :
146: -- IN : p_api_version NUMBER Require
147: -- p_init_msg_list VARCHAR2 Optional (FND_API.G_FALSE)
148: -- p_commit VARCHAR2 Optional (FND_API.G_FALSE)
149: -- p_validation_level NUMBER Optional (FND_API.G_VALID_LEVEL_FULL)
150: -- OUT : x_return_status VARCHAR2(1)
151: -- x_msg_count NUMBER
152: -- x_msg_data VARCHAR2(2000)
145: -- Parameters :
146: -- IN : p_api_version NUMBER Require
147: -- p_init_msg_list VARCHAR2 Optional (FND_API.G_FALSE)
148: -- p_commit VARCHAR2 Optional (FND_API.G_FALSE)
149: -- p_validation_level NUMBER Optional (FND_API.G_VALID_LEVEL_FULL)
150: -- OUT : x_return_status VARCHAR2(1)
151: -- x_msg_count NUMBER
152: -- x_msg_data VARCHAR2(2000)
153: -- IN : p_physical_batch_id NUMBER(15) Require
163: -- End of comments
164:
165: PROCEDURE populate_batch
166: ( p_api_version IN NUMBER,
167: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
168: p_commit IN VARCHAR2 := FND_API.G_FALSE,
169: p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL,
170:
171: x_return_status OUT NOCOPY VARCHAR2,
164:
165: PROCEDURE populate_batch
166: ( p_api_version IN NUMBER,
167: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
168: p_commit IN VARCHAR2 := FND_API.G_FALSE,
169: p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL,
170:
171: x_return_status OUT NOCOPY VARCHAR2,
172: x_msg_count OUT NOCOPY NUMBER,
165: PROCEDURE populate_batch
166: ( p_api_version IN NUMBER,
167: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
168: p_commit IN VARCHAR2 := FND_API.G_FALSE,
169: p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL,
170:
171: x_return_status OUT NOCOPY VARCHAR2,
172: x_msg_count OUT NOCOPY NUMBER,
173: x_msg_data OUT NOCOPY VARCHAR2,
436:
437: l_role_count NUMBER := 0;
438: BEGIN
439: -- Standard call to check for call compatibility.
440: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
441: p_api_version ,
442: l_api_name ,
443: G_PKG_NAME )
444: THEN
441: p_api_version ,
442: l_api_name ,
443: G_PKG_NAME )
444: THEN
445: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
446: END IF;
447:
448: -- Initialize message list if p_init_msg_list is set to TRUE.
449: IF FND_API.to_Boolean( p_init_msg_list ) THEN
445: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
446: END IF;
447:
448: -- Initialize message list if p_init_msg_list is set to TRUE.
449: IF FND_API.to_Boolean( p_init_msg_list ) THEN
450: FND_MSG_PUB.initialize;
451: END IF;
452:
453: -- Initialize API return status to success
450: FND_MSG_PUB.initialize;
451: END IF;
452:
453: -- Initialize API return status to success
454: x_return_status := FND_API.G_RET_STS_SUCCESS;
455:
456: select org_id into g_org_id
457: from cn_process_batches_all
458: where physical_batch_id = p_physical_batch_id
1046: -- Standard call to get message count and if count is 1, get message info.
1047: FND_MSG_PUB.Count_And_Get
1048: ( p_count => x_msg_count ,
1049: p_data => x_msg_data ,
1050: p_encoded => FND_API.G_FALSE
1051: );
1052:
1053: EXCEPTION
1054: WHEN FND_API.G_EXC_ERROR THEN
1050: p_encoded => FND_API.G_FALSE
1051: );
1052:
1053: EXCEPTION
1054: WHEN FND_API.G_EXC_ERROR THEN
1055: x_return_status := FND_API.G_RET_STS_ERROR ;
1056: FND_MSG_PUB.Count_And_Get
1057: (p_count => x_msg_count ,
1058: p_data => x_msg_data ,
1051: );
1052:
1053: EXCEPTION
1054: WHEN FND_API.G_EXC_ERROR THEN
1055: x_return_status := FND_API.G_RET_STS_ERROR ;
1056: FND_MSG_PUB.Count_And_Get
1057: (p_count => x_msg_count ,
1058: p_data => x_msg_data ,
1059: p_encoded => FND_API.G_FALSE
1055: x_return_status := FND_API.G_RET_STS_ERROR ;
1056: FND_MSG_PUB.Count_And_Get
1057: (p_count => x_msg_count ,
1058: p_data => x_msg_data ,
1059: p_encoded => FND_API.G_FALSE
1060: );
1061:
1062: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1058: p_data => x_msg_data ,
1059: p_encoded => FND_API.G_FALSE
1060: );
1061:
1062: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1064: FND_MSG_PUB.Count_And_Get
1065: (p_count => x_msg_count ,
1066: p_data => x_msg_data ,
1059: p_encoded => FND_API.G_FALSE
1060: );
1061:
1062: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1064: FND_MSG_PUB.Count_And_Get
1065: (p_count => x_msg_count ,
1066: p_data => x_msg_data ,
1067: p_encoded => FND_API.G_FALSE
1063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1064: FND_MSG_PUB.Count_And_Get
1065: (p_count => x_msg_count ,
1066: p_data => x_msg_data ,
1067: p_encoded => FND_API.G_FALSE
1068: );
1069:
1070: WHEN OTHERS THEN
1071: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1067: p_encoded => FND_API.G_FALSE
1068: );
1069:
1070: WHEN OTHERS THEN
1071: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1072: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1073: THEN
1074: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1075: END IF;
1075: END IF;
1076: FND_MSG_PUB.Count_And_Get
1077: (p_count => x_msg_count ,
1078: p_data => x_msg_data ,
1079: p_encoded => FND_API.G_FALSE
1080: );
1081:
1082: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1083: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,