58: BEGIN
59: -- Standard Start of API savepoint
60: SAVEPOINT Get_Start_Flow_Status;
61:
62: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
63: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
64: 'Entered Get_Start_Flow_Status');
65: END IF;
66:
59: -- Standard Start of API savepoint
60: SAVEPOINT Get_Start_Flow_Status;
61:
62: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
63: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.BEGIN',
64: 'Entered Get_Start_Flow_Status');
65: END IF;
66:
67: -- Initialize API return status to success
69:
70: -- Api body starts
71:
72: -- Check the required parameters
73: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
74: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
75: 'Checking required parameters');
76: end if;
77:
70: -- Api body starts
71:
72: -- Check the required parameters
73: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
74: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name,
75: 'Checking required parameters');
76: end if;
77:
78: -- Check the required parameters
108: FND_MSG_PUB.Count_And_Get
109: (p_count => x_msg_count,
110: p_data => x_msg_data );
111:
112: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
113: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
114: 'Leaving Get_Start_Flow_Status');
115: END IF;
116:
109: (p_count => x_msg_count,
110: p_data => x_msg_data );
111:
112: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
113: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, lc_mod_name || '.END',
114: 'Leaving Get_Start_Flow_Status');
115: END IF;
116:
117: EXCEPTION
123: (p_count => x_msg_count,
124: p_data => x_msg_data );
125:
126: -- save message in debug log
127: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
128: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
129: 'EXC_ERROR['||x_msg_data||']');
130: END IF;
131:
124: p_data => x_msg_data );
125:
126: -- save message in debug log
127: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
128: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
129: 'EXC_ERROR['||x_msg_data||']');
130: END IF;
131:
132: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
136: -- save message in fnd stack
137: IF FND_MSG_PUB.Check_Msg_Level
138: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
139: THEN
140: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
141: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
142: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
143: end if;
144: FND_MSG_PUB.Add_Exc_Msg
137: IF FND_MSG_PUB.Check_Msg_Level
138: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
139: THEN
140: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
141: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
142: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
143: end if;
144: FND_MSG_PUB.Add_Exc_Msg
145: (G_PKG_NAME ,
150: ( p_count => x_msg_count,
151: p_data => x_msg_data );
152:
153: -- save message in debug log
154: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
155: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
156: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
157: END IF;
158:
151: p_data => x_msg_data );
152:
153: -- save message in debug log
154: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
155: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
156: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
157: END IF;
158:
159: WHEN OTHERS THEN
163: -- save message in fnd stack
164: IF FND_MSG_PUB.Check_Msg_Level
165: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
166: THEN
167: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
168: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
169: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
170: end if;
171: FND_MSG_PUB.Add_Exc_Msg
164: IF FND_MSG_PUB.Check_Msg_Level
165: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
166: THEN
167: if (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
168: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, lc_mod_name,
169: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
170: end if;
171: FND_MSG_PUB.Add_Exc_Msg
172: (G_PKG_NAME ,
177: (p_count => x_msg_count,
178: p_data => x_msg_data );
179:
180: -- save message in debug log
181: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
182: -- create a seeded message
183: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
184: 'SQL Message['||sqlerrm||']' );
185: END IF;
179:
180: -- save message in debug log
181: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
182: -- create a seeded message
183: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION, lc_mod_name,
184: 'SQL Message['||sqlerrm||']' );
185: END IF;
186:
187: END Get_Start_Flow_Status;