133:
134: EXCEPTION
135: WHEN OTHERS THEN
136: IF (SQLCODE <> -20001) THEN
137: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
138: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
139: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
140: FND_MESSAGE.SET_TOKEN('PARAMETERS',
141: 'ship_from_code = ' || X_ship_from_code ||
134: EXCEPTION
135: WHEN OTHERS THEN
136: IF (SQLCODE <> -20001) THEN
137: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
138: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
139: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
140: FND_MESSAGE.SET_TOKEN('PARAMETERS',
141: 'ship_from_code = ' || X_ship_from_code ||
142: ' ship_to_segment_id = ' || to_char(X_ship_to_segment_id)||
135: WHEN OTHERS THEN
136: IF (SQLCODE <> -20001) THEN
137: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
138: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
139: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
140: FND_MESSAGE.SET_TOKEN('PARAMETERS',
141: 'ship_from_code = ' || X_ship_from_code ||
142: ' ship_to_segment_id = ' || to_char(X_ship_to_segment_id)||
143: ' fiscal_classification_code = '|| X_fiscal_classification_code||
136: IF (SQLCODE <> -20001) THEN
137: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
138: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
139: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
140: FND_MESSAGE.SET_TOKEN('PARAMETERS',
141: 'ship_from_code = ' || X_ship_from_code ||
142: ' ship_to_segment_id = ' || to_char(X_ship_to_segment_id)||
143: ' fiscal_classification_code = '|| X_fiscal_classification_code||
144: ' tax_category_id = ' || to_char(X_tax_category_id) ||
142: ' ship_to_segment_id = ' || to_char(X_ship_to_segment_id)||
143: ' fiscal_classification_code = '|| X_fiscal_classification_code||
144: ' tax_category_id = ' || to_char(X_tax_category_id) ||
145: ' end_date_active = ' || to_char(X_end_date_active,'YYYY/MM/DD'));
146: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
147: END IF;
148: APP_EXCEPTION.RAISE_EXCEPTION;
149:
150: END Insert_Row;
248: FETCH C INTO Recinfo;
249: IF (C%NOTFOUND) THEN
250: debug_info := 'Close cursor C - DATA NOTFOUND';
251: CLOSE C;
252: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
253: APP_EXCEPTION.Raise_Exception;
254: END IF;
255: debug_info := 'Close cursor C';
256: CLOSE C;
333: ((Recinfo.attribute15 IS NULL) AND
334: (X_attribute15 IS NULL)))) THEN
335: return;
336: ELSE
337: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
338: APP_EXCEPTION.Raise_Exception;
339: END IF;
340:
341: EXCEPTION
341: EXCEPTION
342: WHEN OTHERS THEN
343: IF (SQLCODE <> -20001) THEN
344: IF (SQLCODE = -54) THEN
345: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
346: ELSE
347: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
348: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
349: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
343: IF (SQLCODE <> -20001) THEN
344: IF (SQLCODE = -54) THEN
345: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
346: ELSE
347: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
348: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
349: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
350: FND_MESSAGE.SET_TOKEN('PARAMETERS',
351: 'ship_from_code = ' || X_ship_from_code ||
344: IF (SQLCODE = -54) THEN
345: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
346: ELSE
347: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
348: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
349: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
350: FND_MESSAGE.SET_TOKEN('PARAMETERS',
351: 'ship_from_code = ' || X_ship_from_code ||
352: 'ship_to_segment_id = ' || X_ship_to_segment_id ||
345: FND_MESSAGE.SET_NAME('SQLAP','AP_RESOURCE_BUSY');
346: ELSE
347: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
348: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
349: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
350: FND_MESSAGE.SET_TOKEN('PARAMETERS',
351: 'ship_from_code = ' || X_ship_from_code ||
352: 'ship_to_segment_id = ' || X_ship_to_segment_id ||
353: 'fiscal_classification_code =' ||X_fiscal_classification_code||
346: ELSE
347: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
348: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
349: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
350: FND_MESSAGE.SET_TOKEN('PARAMETERS',
351: 'ship_from_code = ' || X_ship_from_code ||
352: 'ship_to_segment_id = ' || X_ship_to_segment_id ||
353: 'fiscal_classification_code =' ||X_fiscal_classification_code||
354: 'tax_category_id = ' || X_tax_category_id ||
352: 'ship_to_segment_id = ' || X_ship_to_segment_id ||
353: 'fiscal_classification_code =' ||X_fiscal_classification_code||
354: 'tax_category_id = ' || X_tax_category_id ||
355: 'end_date_active = ' || X_end_date_active );
356: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
357: END IF;
358: END IF;
359: APP_EXCEPTION.RAISE_EXCEPTION;
360: END Lock_Row;
477: AND org_id = X_org_id
478: AND ((X_rowid IS NULL) OR (rowid <> X_rowid));
479:
480: IF (l_dummy >=1) THEN
481: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
482: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
483: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
484: FND_MESSAGE.SET_TOKEN('PARAMETERS',
485: ' ship_from_code = ' || X_ship_from_code ||
478: AND ((X_rowid IS NULL) OR (rowid <> X_rowid));
479:
480: IF (l_dummy >=1) THEN
481: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
482: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
483: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
484: FND_MESSAGE.SET_TOKEN('PARAMETERS',
485: ' ship_from_code = ' || X_ship_from_code ||
486: ' ship_to_segment_id = ' || X_ship_to_segment_id ||
479:
480: IF (l_dummy >=1) THEN
481: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
482: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
483: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
484: FND_MESSAGE.SET_TOKEN('PARAMETERS',
485: ' ship_from_code = ' || X_ship_from_code ||
486: ' ship_to_segment_id = ' || X_ship_to_segment_id ||
487: ' fiscal_classification_code = '||X_fiscal_classification_code||
480: IF (l_dummy >=1) THEN
481: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
482: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
483: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
484: FND_MESSAGE.SET_TOKEN('PARAMETERS',
485: ' ship_from_code = ' || X_ship_from_code ||
486: ' ship_to_segment_id = ' || X_ship_to_segment_id ||
487: ' fiscal_classification_code = '||X_fiscal_classification_code||
488: ' tax_category_id = ' || X_tax_category_id ||
486: ' ship_to_segment_id = ' || X_ship_to_segment_id ||
487: ' fiscal_classification_code = '||X_fiscal_classification_code||
488: ' tax_category_id = ' || X_tax_category_id ||
489: ' end_date_active = ' || X_end_date_active );
490: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
491: APP_EXCEPTION.RAISE_EXCEPTION;
492: END IF;
493: END Check_Unique;
494:
528: AND org_id = X_org_id
529: AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid));
530:
531: IF (l_dummy >=1) THEN
532: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
533: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
534: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
535: FND_MESSAGE.SET_TOKEN('PARAMETERS',
536: ' ship_from_code = ' || X_ship_from_code ||
529: AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid));
530:
531: IF (l_dummy >=1) THEN
532: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
533: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
534: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
535: FND_MESSAGE.SET_TOKEN('PARAMETERS',
536: ' ship_from_code = ' || X_ship_from_code ||
537: ' ship_to_segment_id = ' || X_ship_to_segment_id ||
530:
531: IF (l_dummy >=1) THEN
532: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
533: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
534: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
535: FND_MESSAGE.SET_TOKEN('PARAMETERS',
536: ' ship_from_code = ' || X_ship_from_code ||
537: ' ship_to_segment_id = ' || X_ship_to_segment_id ||
538: ' fiscal_classification_code ='||X_fiscal_classification_code||
531: IF (l_dummy >=1) THEN
532: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
533: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
534: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
535: FND_MESSAGE.SET_TOKEN('PARAMETERS',
536: ' ship_from_code = ' || X_ship_from_code ||
537: ' ship_to_segment_id = ' || X_ship_to_segment_id ||
538: ' fiscal_classification_code ='||X_fiscal_classification_code||
539: ' tax_category_id = ' || X_tax_category_id ||
537: ' ship_to_segment_id = ' || X_ship_to_segment_id ||
538: ' fiscal_classification_code ='||X_fiscal_classification_code||
539: ' tax_category_id = ' || X_tax_category_id ||
540: ' end_date_active = ' || X_end_date_active );
541: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
542: APP_EXCEPTION.RAISE_EXCEPTION;
543: END IF;
544: END Check_Overlapped_Dates;
545:
612: AND ((X_rowid IS NULL) OR (a.rowid <> X_rowid))
613: AND org_id = X_org_id;
614:
615: IF (l_dummy2 <> 0) THEN
616: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
617: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
618: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
619: FND_MESSAGE.SET_TOKEN('PARAMETERS',
620: ' ship_from_code = ' || X_ship_from_code ||
613: AND org_id = X_org_id;
614:
615: IF (l_dummy2 <> 0) THEN
616: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
617: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
618: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
619: FND_MESSAGE.SET_TOKEN('PARAMETERS',
620: ' ship_from_code = ' || X_ship_from_code ||
621: ' ship_to_segment_id = ' || X_ship_to_segment_id ||
614:
615: IF (l_dummy2 <> 0) THEN
616: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
617: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
618: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
619: FND_MESSAGE.SET_TOKEN('PARAMETERS',
620: ' ship_from_code = ' || X_ship_from_code ||
621: ' ship_to_segment_id = ' || X_ship_to_segment_id ||
622: ' fiscal_classification_code = '||X_fiscal_classification_code ||
615: IF (l_dummy2 <> 0) THEN
616: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
617: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
618: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE',current_calling_sequence);
619: FND_MESSAGE.SET_TOKEN('PARAMETERS',
620: ' ship_from_code = ' || X_ship_from_code ||
621: ' ship_to_segment_id = ' || X_ship_to_segment_id ||
622: ' fiscal_classification_code = '||X_fiscal_classification_code ||
623: ' tax_category_id = ' || X_tax_category_id ||
621: ' ship_to_segment_id = ' || X_ship_to_segment_id ||
622: ' fiscal_classification_code = '||X_fiscal_classification_code ||
623: ' tax_category_id = ' || X_tax_category_id ||
624: ' end_date_active = ' || X_end_date_active );
625: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
626: APP_EXCEPTION.RAISE_EXCEPTION;
627: END IF;
628: END;
629: END IF;