DBA Data[Home] [Help]

APPS.BSC_BIS_DIM_GROUP_PUB dependencies on FND_API

Line 27: p_commit IN VARCHAR2 := FND_API.G_TRUE

23: *********************************************************************************/
24:
25: PROCEDURE Update_Dimension
26: (
27: p_commit IN VARCHAR2 := FND_API.G_TRUE
28: , p_dimension_id IN NUMBER
29: , p_short_name IN VARCHAR2
30: , p_display_name IN VARCHAR2
31: , p_description IN VARCHAR2

Line 66: x_return_status := FND_API.G_RET_STS_ERROR;

62: INTO l_dimension_rec.dimension_id
63: , l_dimension_rec.dimension_short_name;
64: IF (cr_dim_id%ROWCOUNT = 0) THEN
65: l_msg_data := 'Record does not exist for BIS_DIMENSIONS.DIMENSION_ID =<'||p_dimension_id||'>';
66: x_return_status := FND_API.G_RET_STS_ERROR;
67: END IF;
68: CLOSE cr_dim_id;
69: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
70: RAISE FND_API.G_EXC_ERROR;

Line 69: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

65: l_msg_data := 'Record does not exist for BIS_DIMENSIONS.DIMENSION_ID =<'||p_dimension_id||'>';
66: x_return_status := FND_API.G_RET_STS_ERROR;
67: END IF;
68: CLOSE cr_dim_id;
69: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
70: RAISE FND_API.G_EXC_ERROR;
71: END IF;
72: ELSIF (p_short_name IS NOT NULL) THEN
73: IF (cr_dim_short_name%ISOPEN) THEN

Line 70: RAISE FND_API.G_EXC_ERROR;

66: x_return_status := FND_API.G_RET_STS_ERROR;
67: END IF;
68: CLOSE cr_dim_id;
69: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
70: RAISE FND_API.G_EXC_ERROR;
71: END IF;
72: ELSIF (p_short_name IS NOT NULL) THEN
73: IF (cr_dim_short_name%ISOPEN) THEN
74: CLOSE cr_dim_short_name;

Line 82: x_return_status := FND_API.G_RET_STS_ERROR;

78: INTO l_dimension_rec.dimension_id
79: , l_dimension_rec.dimension_short_name;
80: IF (cr_dim_short_name%ROWCOUNT = 0) THEN
81: l_msg_data := 'Record does not exist for BIS_DIMENSIONS.SHORT_NAME =<'||p_short_name||'>';
82: x_return_status := FND_API.G_RET_STS_ERROR;
83: END IF;
84: CLOSE cr_dim_short_name;
85: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
86: RAISE FND_API.G_EXC_ERROR;

Line 85: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

81: l_msg_data := 'Record does not exist for BIS_DIMENSIONS.SHORT_NAME =<'||p_short_name||'>';
82: x_return_status := FND_API.G_RET_STS_ERROR;
83: END IF;
84: CLOSE cr_dim_short_name;
85: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
86: RAISE FND_API.G_EXC_ERROR;
87: END IF;
88: ELSE
89: l_msg_data := 'Either of P_DIMENSION_ID or P_SHORT_NAME must be NOT NULL';

Line 86: RAISE FND_API.G_EXC_ERROR;

82: x_return_status := FND_API.G_RET_STS_ERROR;
83: END IF;
84: CLOSE cr_dim_short_name;
85: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
86: RAISE FND_API.G_EXC_ERROR;
87: END IF;
88: ELSE
89: l_msg_data := 'Either of P_DIMENSION_ID or P_SHORT_NAME must be NOT NULL';
90: RAISE FND_API.G_EXC_ERROR;

Line 90: RAISE FND_API.G_EXC_ERROR;

86: RAISE FND_API.G_EXC_ERROR;
87: END IF;
88: ELSE
89: l_msg_data := 'Either of P_DIMENSION_ID or P_SHORT_NAME must be NOT NULL';
90: RAISE FND_API.G_EXC_ERROR;
91: END IF;
92:
93: IF (p_display_name IS NULL) THEN
94: l_msg_data := 'P_DISPLAY_NAME must be NOT NULL';

Line 95: RAISE FND_API.G_EXC_ERROR;

91: END IF;
92:
93: IF (p_display_name IS NULL) THEN
94: l_msg_data := 'P_DISPLAY_NAME must be NOT NULL';
95: RAISE FND_API.G_EXC_ERROR;
96: END IF;
97:
98: --check for uniqueness of p_display_name
99: SELECT COUNT(*) INTO l_count FROM bis_dimensions_vl

Line 104: RAISE FND_API.G_EXC_ERROR;

100: WHERE name = p_display_name
101: AND dimension_id <> l_dimension_rec.dimension_id;
102: IF (l_count > 0) THEN
103: l_msg_data := 'P_DISPLAY_NAME =<'||p_display_name||'> must be UNIQUE';
104: RAISE FND_API.G_EXC_ERROR;
105: END IF;
106:
107: --call PMF's API
108: l_dimension_rec.Dimension_Name := p_display_name;

Line 114: , p_commit => FND_API.G_FALSE

110:
111: BIS_DIMENSION_PUB.Update_Dimension
112: (
113: p_api_version => 1.0
114: , p_commit => FND_API.G_FALSE
115: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
116: , p_Dimension_Rec => l_dimension_rec
117: , x_return_status => l_return_status
118: , x_error_Tbl => l_error_tbl

Line 115: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

111: BIS_DIMENSION_PUB.Update_Dimension
112: (
113: p_api_version => 1.0
114: , p_commit => FND_API.G_FALSE
115: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
116: , p_Dimension_Rec => l_dimension_rec
117: , x_return_status => l_return_status
118: , x_error_Tbl => l_error_tbl
119: );

Line 120: IF ((l_return_status = FND_API.G_RET_STS_SUCCESS) OR (l_return_status IS NULL) OR

116: , p_Dimension_Rec => l_dimension_rec
117: , x_return_status => l_return_status
118: , x_error_Tbl => l_error_tbl
119: );
120: IF ((l_return_status = FND_API.G_RET_STS_SUCCESS) OR (l_return_status IS NULL) OR
121: ((l_return_status <> FND_API.G_RET_STS_ERROR) AND
122: (l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR))) THEN
123: x_return_status := FND_API.G_RET_STS_SUCCESS;
124: IF (p_commit = FND_API.G_TRUE) THEN

Line 121: ((l_return_status <> FND_API.G_RET_STS_ERROR) AND

117: , x_return_status => l_return_status
118: , x_error_Tbl => l_error_tbl
119: );
120: IF ((l_return_status = FND_API.G_RET_STS_SUCCESS) OR (l_return_status IS NULL) OR
121: ((l_return_status <> FND_API.G_RET_STS_ERROR) AND
122: (l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR))) THEN
123: x_return_status := FND_API.G_RET_STS_SUCCESS;
124: IF (p_commit = FND_API.G_TRUE) THEN
125: COMMIT;

Line 122: (l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR))) THEN

118: , x_error_Tbl => l_error_tbl
119: );
120: IF ((l_return_status = FND_API.G_RET_STS_SUCCESS) OR (l_return_status IS NULL) OR
121: ((l_return_status <> FND_API.G_RET_STS_ERROR) AND
122: (l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR))) THEN
123: x_return_status := FND_API.G_RET_STS_SUCCESS;
124: IF (p_commit = FND_API.G_TRUE) THEN
125: COMMIT;
126: END if;

Line 123: x_return_status := FND_API.G_RET_STS_SUCCESS;

119: );
120: IF ((l_return_status = FND_API.G_RET_STS_SUCCESS) OR (l_return_status IS NULL) OR
121: ((l_return_status <> FND_API.G_RET_STS_ERROR) AND
122: (l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR))) THEN
123: x_return_status := FND_API.G_RET_STS_SUCCESS;
124: IF (p_commit = FND_API.G_TRUE) THEN
125: COMMIT;
126: END if;
127: ELSE

Line 124: IF (p_commit = FND_API.G_TRUE) THEN

120: IF ((l_return_status = FND_API.G_RET_STS_SUCCESS) OR (l_return_status IS NULL) OR
121: ((l_return_status <> FND_API.G_RET_STS_ERROR) AND
122: (l_return_status <> FND_API.G_RET_STS_UNEXP_ERROR))) THEN
123: x_return_status := FND_API.G_RET_STS_SUCCESS;
124: IF (p_commit = FND_API.G_TRUE) THEN
125: COMMIT;
126: END if;
127: ELSE
128: IF (l_error_tbl.COUNT > 0) THEN

Line 133: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

129: l_msg_data := l_error_tbl(l_error_tbl.COUNT).Error_Description;
130: END IF;
131:
132: l_msg_data := 'BSC_BIS_DIM_GROUP_PUB.UPDATE_DIMENSION Failed : at BIS_DIMENSION_PUB.UPDATE_DIMENSION <'||l_msg_data||'>';
133: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
134: END IF;
135: EXCEPTION
136: WHEN FND_API.G_EXC_ERROR THEN
137: IF (cr_dim_id%ISOPEN) THEN

Line 136: WHEN FND_API.G_EXC_ERROR THEN

132: l_msg_data := 'BSC_BIS_DIM_GROUP_PUB.UPDATE_DIMENSION Failed : at BIS_DIMENSION_PUB.UPDATE_DIMENSION <'||l_msg_data||'>';
133: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
134: END IF;
135: EXCEPTION
136: WHEN FND_API.G_EXC_ERROR THEN
137: IF (cr_dim_id%ISOPEN) THEN
138: CLOSE cr_dim_id;
139: END IF;
140: IF (cr_dim_short_name%ISOPEN) THEN

Line 144: x_return_status := FND_API.G_RET_STS_ERROR;

140: IF (cr_dim_short_name%ISOPEN) THEN
141: CLOSE cr_dim_short_name;
142: END IF;
143: ROLLBACK;
144: x_return_status := FND_API.G_RET_STS_ERROR;
145: x_msg_data := l_msg_data;
146: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
147: IF (cr_dim_id%ISOPEN) THEN
148: CLOSE cr_dim_id;

Line 146: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

142: END IF;
143: ROLLBACK;
144: x_return_status := FND_API.G_RET_STS_ERROR;
145: x_msg_data := l_msg_data;
146: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
147: IF (cr_dim_id%ISOPEN) THEN
148: CLOSE cr_dim_id;
149: END IF;
150: IF (cr_dim_short_name%ISOPEN) THEN

Line 159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

155: (
156: p_count => x_msg_count
157: , p_data => x_msg_data
158: );
159: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
160: x_msg_data := x_msg_data||' '||l_msg_data;
161: WHEN NO_DATA_FOUND THEN
162: IF (cr_dim_id%ISOPEN) THEN
163: CLOSE cr_dim_id;

Line 169: x_return_status := FND_API.G_RET_STS_ERROR;

165: IF (cr_dim_short_name%ISOPEN) THEN
166: CLOSE cr_dim_short_name;
167: END IF;
168: ROLLBACK;
169: x_return_status := FND_API.G_RET_STS_ERROR;
170: FND_MSG_PUB.Count_And_Get
171: (
172: p_count => x_msg_count
173: , p_data => x_msg_data

Line 183: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

179: IF (cr_dim_short_name%ISOPEN) THEN
180: CLOSE cr_dim_short_name;
181: END IF;
182: ROLLBACK;
183: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
184: FND_MSG_PUB.Count_And_Get
185: (
186: p_count => x_msg_count
187: , p_data => x_msg_data