66:
67: EXCEPTION
68: WHEN OTHERS THEN
69: if (SQLCODE <> -20001) then
70: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
71: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
72: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
73: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Batch Set Id = '||X_Batch_Set_Id
74: ||', ROWID = '||X_ROWID);
67: EXCEPTION
68: WHEN OTHERS THEN
69: if (SQLCODE <> -20001) then
70: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
71: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
72: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
73: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Batch Set Id = '||X_Batch_Set_Id
74: ||', ROWID = '||X_ROWID);
75: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
68: WHEN OTHERS THEN
69: if (SQLCODE <> -20001) then
70: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
71: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
72: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
73: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Batch Set Id = '||X_Batch_Set_Id
74: ||', ROWID = '||X_ROWID);
75: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
76: end if;
69: if (SQLCODE <> -20001) then
70: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
71: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
72: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
73: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Batch Set Id = '||X_Batch_Set_Id
74: ||', ROWID = '||X_ROWID);
75: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
76: end if;
77: APP_EXCEPTION.RAISE_EXCEPTION;
71: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
72: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
73: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Batch Set Id = '||X_Batch_Set_Id
74: ||', ROWID = '||X_ROWID);
75: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
76: end if;
77: APP_EXCEPTION.RAISE_EXCEPTION;
78:
79: END Insert_Row;
105: FETCH C INTO Recinfo;
106: if (C%NOTFOUND) then
107: debug_info := 'Close cursor C -ROW NOTFOUND';
108: CLOSE C;
109: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
110: APP_EXCEPTION.Raise_Exception;
111: end if;
112: debug_info := 'Close cursor C';
113: CLOSE C;
116: AND (Recinfo.batch_set_id = X_Batch_Set_Id)
117: ) then
118: return;
119: else
120: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
121: APP_EXCEPTION.Raise_Exception;
122: end if;
123:
124: EXCEPTION
124: EXCEPTION
125: WHEN OTHERS THEN
126: IF (SQLCODE <> -20001) THEN
127: IF (SQLCODE = -54) THEN
128: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
129: ELSE
130: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
131: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
132: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
126: IF (SQLCODE <> -20001) THEN
127: IF (SQLCODE = -54) THEN
128: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
129: ELSE
130: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
131: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
132: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
133: FND_MESSAGE.SET_TOKEN('PARAMETERS','Batch Set Name = '||
134: X_Batch_Set_Name
127: IF (SQLCODE = -54) THEN
128: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
129: ELSE
130: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
131: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
132: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
133: FND_MESSAGE.SET_TOKEN('PARAMETERS','Batch Set Name = '||
134: X_Batch_Set_Name
135: ||', ROWID = '||X_Rowid);
128: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
129: ELSE
130: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
131: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
132: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
133: FND_MESSAGE.SET_TOKEN('PARAMETERS','Batch Set Name = '||
134: X_Batch_Set_Name
135: ||', ROWID = '||X_Rowid);
136: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
129: ELSE
130: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
131: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
132: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
133: FND_MESSAGE.SET_TOKEN('PARAMETERS','Batch Set Name = '||
134: X_Batch_Set_Name
135: ||', ROWID = '||X_Rowid);
136: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
137: END IF;
132: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
133: FND_MESSAGE.SET_TOKEN('PARAMETERS','Batch Set Name = '||
134: X_Batch_Set_Name
135: ||', ROWID = '||X_Rowid);
136: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
137: END IF;
138: END IF;
139: APP_EXCEPTION.RAISE_EXCEPTION;
140:
177:
178: EXCEPTION
179: WHEN OTHERS THEN
180: if (SQLCODE <> -20001) then
181: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
182: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
183: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
184: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Batch Set Id ='||X_Batch_Set_Id
185: ||', ROWID = '||X_Rowid);
178: EXCEPTION
179: WHEN OTHERS THEN
180: if (SQLCODE <> -20001) then
181: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
182: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
183: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
184: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Batch Set Id ='||X_Batch_Set_Id
185: ||', ROWID = '||X_Rowid);
186: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
179: WHEN OTHERS THEN
180: if (SQLCODE <> -20001) then
181: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
182: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
183: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
184: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Batch Set Id ='||X_Batch_Set_Id
185: ||', ROWID = '||X_Rowid);
186: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
187: end if;
180: if (SQLCODE <> -20001) then
181: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
182: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
183: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
184: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Batch Set Id ='||X_Batch_Set_Id
185: ||', ROWID = '||X_Rowid);
186: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
187: end if;
188: APP_EXCEPTION.RAISE_EXCEPTION;
182: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
183: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
184: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'Batch Set Id ='||X_Batch_Set_Id
185: ||', ROWID = '||X_Rowid);
186: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
187: end if;
188: APP_EXCEPTION.RAISE_EXCEPTION;
189: END Update_Row;
190:
211:
212: EXCEPTION
213: WHEN OTHERS THEN
214: if (SQLCODE <> -20001) then
215: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
216: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
217: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
218: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'ROWID = ' || X_Rowid);
219: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
212: EXCEPTION
213: WHEN OTHERS THEN
214: if (SQLCODE <> -20001) then
215: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
216: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
217: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
218: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'ROWID = ' || X_Rowid);
219: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
220: end if;
213: WHEN OTHERS THEN
214: if (SQLCODE <> -20001) then
215: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
216: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
217: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
218: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'ROWID = ' || X_Rowid);
219: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
220: end if;
221: APP_EXCEPTION.RAISE_EXCEPTION;
214: if (SQLCODE <> -20001) then
215: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
216: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
217: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
218: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'ROWID = ' || X_Rowid);
219: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
220: end if;
221: APP_EXCEPTION.RAISE_EXCEPTION;
222: END Delete_Row;
215: FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
216: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
217: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
218: FND_MESSAGE.SET_TOKEN('PARAMETERS', 'ROWID = ' || X_Rowid);
219: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
220: end if;
221: APP_EXCEPTION.RAISE_EXCEPTION;
222: END Delete_Row;
223: */