101: arp_util.debug('The doc sequence does not exist for the current document');
102: END IF;
103: p_return_status := FND_API.G_RET_STS_ERROR;
104: --Error message
105: FND_MESSAGE.Set_Name( 'AR','AR_RAPI_DOC_SEQ_NOT_EXIST_A');
106: FND_MSG_PUB.Add;
107: ELSIF l_doc_seq_ret_stat = -2 THEN
108: --this is the case of Partially Used
109: IF PG_DEBUG in ('Y', 'C') THEN
110: arp_util.debug('The doc sequence does not exist for the current document');
111: END IF;
112: --Warning
113: IF FND_MSG_PUB.Check_Msg_Level(G_MSG_SUCCESS) THEN
114: FND_MESSAGE.SET_NAME('AR','AR_RAPI_DOC_SEQ_NOT_EXIST_P');
115: FND_MSG_PUB.Add;
116: END IF;
117: END IF;
118:
139: IF p_doc_sequence_value IS NOT NULL THEN
140: --raise an error message because the user is not supposed to pass
141: --in a value for the document sequence number in this case.
142: p_return_status := FND_API.G_RET_STS_ERROR;
143: FND_MESSAGE.Set_Name('AR', 'AR_RAPI_DOC_SEQ_AUTOMATIC');
144: FND_MSG_PUB.Add;
145: END IF;
146: p_doc_sequence_value := l_doc_sequence_value;
147: arp_util.debug('l_doc_sequence_value :'||to_char(nvl(p_doc_sequence_value,-99)));
171: +-----------------------------------------*/
172:
173: IF NVL(unique_seq_numbers,'N') = 'A' THEN
174: p_return_status := FND_API.G_RET_STS_ERROR;
175: FND_MESSAGE.Set_Name('AR', 'AR_RAPI_DOC_SEQ_VALUE_NULL_A');
176: FND_MESSAGE.Set_Token('SEQUENCE', l_doc_sequence_name);
177: FND_MSG_PUB.Add;
178: ELSIF NVL(unique_seq_numbers,'N') = 'P' THEN
179: --Warning
172:
173: IF NVL(unique_seq_numbers,'N') = 'A' THEN
174: p_return_status := FND_API.G_RET_STS_ERROR;
175: FND_MESSAGE.Set_Name('AR', 'AR_RAPI_DOC_SEQ_VALUE_NULL_A');
176: FND_MESSAGE.Set_Token('SEQUENCE', l_doc_sequence_name);
177: FND_MSG_PUB.Add;
178: ELSIF NVL(unique_seq_numbers,'N') = 'P' THEN
179: --Warning
180: IF FND_MSG_PUB.Check_Msg_Level(G_MSG_SUCCESS) THEN
177: FND_MSG_PUB.Add;
178: ELSIF NVL(unique_seq_numbers,'N') = 'P' THEN
179: --Warning
180: IF FND_MSG_PUB.Check_Msg_Level(G_MSG_SUCCESS) THEN
181: FND_MESSAGE.SET_NAME('AR','AR_RAPI_DOC_SEQ_VALUE_NULL_P');
182: FND_MSG_PUB.Add;
183: END IF;
184: END IF;
185:
198: arp_util.debug('EXCEPTION: no_data_found raised');
199: END IF;
200: IF (unique_seq_numbers = 'A' ) THEN
201: p_return_status := FND_API.G_RET_STS_ERROR;
202: FND_MESSAGE.Set_Name( 'FND','UNIQUE-ALWAYS USED');
203: FND_MSG_PUB.Add;
204: ELSE
205: p_doc_sequence_id := NULL;
206: p_doc_sequence_value := NULL;
585: arp_util.debug('EXCEPTION Calling arp_process_credit_util.get_credited_trx_details.');
586: END IF;
587: /*Bug3041195: Commented out this portion as it would overwrite errors
588: raised by get_credited_trx_details*/
589: -- fnd_message.set_name( 'AR', 'AR_RAXTRX-1666');
590: -- l_message_name := 'AR_RAXTRX-1666' ;
591: RAISE e_unexpected_error;
592: END;
593:
713: IF PG_DEBUG in ('Y', 'C') THEN
714: arp_util.debug('EXCEPTION: select from ra_customer_trx_cr_trx_v returns no data');
715: END IF;
716:
717: fnd_message.set_name( 'AR', 'AR_RAXTRX-1666');
718: l_message_name := 'AR_RAXTRX-1666' ;
719: RAISE e_handled_error;
720:
721: WHEN OTHERS THEN
743: )
744: AND ( sign(l_line_amount) <> sign (l_line_orig) )
745: )
746: THEN
747: fnd_message.set_name('AR', 'AR_TW_CMI_HEADER_OVERAPP_NA');
748: l_message_name := 'AR_TW_CMI_HEADER_OVERAPP_NA';
749: RAISE e_handled_error;
750: END IF;
751: END IF;
926: ROLLBACK TO Credit_Transaction_Pub;
927: IF PG_DEBUG in ('Y', 'C') THEN
928: arp_util.debug('Error: l_cm_header.cust_trx_type_id IS NULL');
929: END IF;
930: fnd_message.set_name( 'AR', 'AR_TW_BAD_DATE_TRX_TYPE');
931: l_message_name := 'AR_TW_BAD_DATE_TRX_TYPE' ;
932: RAISE e_handled_error;
933: END IF;
934: END IF;
1358:
1359: ROLLBACK TO Credit_Transaction_Pub;
1360: p_errors(1).customer_trx_id := p_prev_customer_trx_id;
1361: p_errors(1).message_name := l_message_name;
1362: p_errors(1).translated_message := fnd_message.get;
1363:
1364: fnd_message.set_name( 'AR', l_message_name);
1365: FND_MSG_PUB.Add;
1366:
1360: p_errors(1).customer_trx_id := p_prev_customer_trx_id;
1361: p_errors(1).message_name := l_message_name;
1362: p_errors(1).translated_message := fnd_message.get;
1363:
1364: fnd_message.set_name( 'AR', l_message_name);
1365: FND_MSG_PUB.Add;
1366:
1367: IF PG_DEBUG in ('Y', 'C') THEN
1368: arp_util.debug('create_header_cm: ' || 'p_errors(1).message_name = '
1380: p_status := 'e_unexpected_error';
1381:
1382: ROLLBACK TO Credit_Transaction_Pub;
1383: p_errors(1).customer_trx_id := p_prev_customer_trx_id;
1384: p_errors(1).encoded_message := fnd_message.get_encoded;
1385: fnd_message.set_encoded(p_errors(1).encoded_message);
1386: p_errors(1).translated_message := fnd_message.get;
1387:
1388: IF p_errors(1).translated_message IS NULL
1381:
1382: ROLLBACK TO Credit_Transaction_Pub;
1383: p_errors(1).customer_trx_id := p_prev_customer_trx_id;
1384: p_errors(1).encoded_message := fnd_message.get_encoded;
1385: fnd_message.set_encoded(p_errors(1).encoded_message);
1386: p_errors(1).translated_message := fnd_message.get;
1387:
1388: IF p_errors(1).translated_message IS NULL
1389: THEN
1382: ROLLBACK TO Credit_Transaction_Pub;
1383: p_errors(1).customer_trx_id := p_prev_customer_trx_id;
1384: p_errors(1).encoded_message := fnd_message.get_encoded;
1385: fnd_message.set_encoded(p_errors(1).encoded_message);
1386: p_errors(1).translated_message := fnd_message.get;
1387:
1388: IF p_errors(1).translated_message IS NULL
1389: THEN
1390: p_errors(1).message_name := 'GENERIC_MESSAGE';
1390: p_errors(1).message_name := 'GENERIC_MESSAGE';
1391: p_errors(1).token_name_1 := 'GENERIC_TEXT';
1392: p_errors(1).token_1 := NVL(l_ue_message, 'CREATE_HEADER_CM : UNEXPECTED ERROR') ;
1393:
1394: fnd_message.set_name('AR','GENERIC_MESSAGE');
1395: fnd_message.set_token('GENERIC_TEXT', p_errors(1).token_1 );
1396: FND_MSG_PUB.Add;
1397:
1398: p_errors(1).translated_message := fnd_message.get;
1391: p_errors(1).token_name_1 := 'GENERIC_TEXT';
1392: p_errors(1).token_1 := NVL(l_ue_message, 'CREATE_HEADER_CM : UNEXPECTED ERROR') ;
1393:
1394: fnd_message.set_name('AR','GENERIC_MESSAGE');
1395: fnd_message.set_token('GENERIC_TEXT', p_errors(1).token_1 );
1396: FND_MSG_PUB.Add;
1397:
1398: p_errors(1).translated_message := fnd_message.get;
1399: ELSE
1394: fnd_message.set_name('AR','GENERIC_MESSAGE');
1395: fnd_message.set_token('GENERIC_TEXT', p_errors(1).token_1 );
1396: FND_MSG_PUB.Add;
1397:
1398: p_errors(1).translated_message := fnd_message.get;
1399: ELSE
1400: /*Bug3041195 - Set Message on API stack */
1401: fnd_message.set_encoded(p_errors(1).encoded_message);
1402: FND_MSG_PUB.Add;
1397:
1398: p_errors(1).translated_message := fnd_message.get;
1399: ELSE
1400: /*Bug3041195 - Set Message on API stack */
1401: fnd_message.set_encoded(p_errors(1).encoded_message);
1402: FND_MSG_PUB.Add;
1403: END IF;
1404: IF PG_DEBUG in ('Y', 'C') THEN
1405: arp_util.debug('create_header_cm: ' || 'p_errors(1).message_name = '
1421: p_errors(1).message_name := 'GENERIC_MESSAGE';
1422: p_errors(1).token_name_1 := 'GENERIC_TEXT';
1423: p_errors(1).token_1 := 'CREATE_HEADER_CM : ERROR AT UNKNOWN POINT '|| SQLERRM ;
1424:
1425: fnd_message.set_name('AR','GENERIC_MESSAGE');
1426: fnd_message.set_token('GENERIC_TEXT', p_errors(1).token_1 );
1427: FND_MSG_PUB.Add;
1428:
1429: p_errors(1).translated_message := fnd_message.get;
1422: p_errors(1).token_name_1 := 'GENERIC_TEXT';
1423: p_errors(1).token_1 := 'CREATE_HEADER_CM : ERROR AT UNKNOWN POINT '|| SQLERRM ;
1424:
1425: fnd_message.set_name('AR','GENERIC_MESSAGE');
1426: fnd_message.set_token('GENERIC_TEXT', p_errors(1).token_1 );
1427: FND_MSG_PUB.Add;
1428:
1429: p_errors(1).translated_message := fnd_message.get;
1430: IF PG_DEBUG in ('Y', 'C') THEN
1425: fnd_message.set_name('AR','GENERIC_MESSAGE');
1426: fnd_message.set_token('GENERIC_TEXT', p_errors(1).token_1 );
1427: FND_MSG_PUB.Add;
1428:
1429: p_errors(1).translated_message := fnd_message.get;
1430: IF PG_DEBUG in ('Y', 'C') THEN
1431: arp_util.debug('create_header_cm: ' || 'p_errors(1).message_name = '
1432: || p_errors(1).message_name);
1433: arp_util.debug('create_header_cm: ' || 'p_errors(1).encoded_message = '
1854: arp_util.debug('EXCEPTION: Error Calling arp_process_credit_util.get_credited_trx_details.');
1855: END IF;
1856: /*Bug3041196: Commented out this portion as it was overwriting message
1857: names set by get_credited_trx_details*/
1858: -- fnd_message.set_name( 'AR', 'AR_RAXTRX-1666');
1859: -- l_message_name := 'AR_RAXTRX-1666' ;
1860: RAISE e_unexpected_error;
1861: END;
1862:
1888: --- not exist in the system.
1889: --- Proposed error message : AR_RAXTRX-1666 Your credit memo
1890: --- transaction can only credit an invoice or a debit memo line
1891:
1892: fnd_message.set_name( 'AR', 'AR_RAXTRX-1666');
1893: l_message_name := 'AR_RAXTRX-1666' ;
1894: RAISE e_handled_error;
1895: WHEN OTHERS THEN
1896: IF PG_DEBUG in ('Y', 'C') THEN
2071: ROLLBACK TO Credit_Transaction_Pub;
2072: IF PG_DEBUG in ('Y', 'C') THEN
2073: arp_util.debug( 'Error: l_cm_header.cust_trx_type_id IS NULL');
2074: END IF;
2075: fnd_message.set_name( 'AR', 'AR_TW_BAD_DATE_TRX_TYPE');
2076: l_message_name := 'AR_TW_BAD_DATE_TRX_TYPE' ;
2077: RAISE e_handled_error;
2078: END IF;
2079: END IF;
2497: END LOOP;
2498:
2499: EXCEPTION
2500: WHEN e_handled_error THEN
2501: fnd_message.set_name( 'AR', 'l_message_name');
2502: RAISE e_handled_error;
2503: WHEN OTHERS THEN
2504: ROLLBACK TO Credit_Transaction_Pub;
2505: IF PG_DEBUG in ('Y', 'C') THEN
2711:
2712: ROLLBACK TO Credit_Transaction_Pub;
2713: p_errors(1).customer_trx_id := p_prev_customer_trx_id;
2714: p_errors(1).message_name := l_message_name;
2715: p_errors(1).translated_message := fnd_message.get;
2716:
2717: fnd_message.set_name( 'AR', l_message_name);
2718: FND_MSG_PUB.Add;
2719:
2713: p_errors(1).customer_trx_id := p_prev_customer_trx_id;
2714: p_errors(1).message_name := l_message_name;
2715: p_errors(1).translated_message := fnd_message.get;
2716:
2717: fnd_message.set_name( 'AR', l_message_name);
2718: FND_MSG_PUB.Add;
2719:
2720: IF PG_DEBUG in ('Y', 'C') THEN
2721: arp_util.debug( 'p_errors(1).message_name = '
2733: p_status := 'e_unexpected_error';
2734:
2735: ROLLBACK TO Credit_Transaction_Pub;
2736: p_errors(1).customer_trx_id := p_prev_customer_trx_id;
2737: p_errors(1).encoded_message := fnd_message.get_encoded;
2738: fnd_message.set_encoded(p_errors(1).encoded_message);
2739: p_errors(1).translated_message := fnd_message.get;
2740:
2741: IF p_errors(1).translated_message IS NULL
2734:
2735: ROLLBACK TO Credit_Transaction_Pub;
2736: p_errors(1).customer_trx_id := p_prev_customer_trx_id;
2737: p_errors(1).encoded_message := fnd_message.get_encoded;
2738: fnd_message.set_encoded(p_errors(1).encoded_message);
2739: p_errors(1).translated_message := fnd_message.get;
2740:
2741: IF p_errors(1).translated_message IS NULL
2742: THEN
2735: ROLLBACK TO Credit_Transaction_Pub;
2736: p_errors(1).customer_trx_id := p_prev_customer_trx_id;
2737: p_errors(1).encoded_message := fnd_message.get_encoded;
2738: fnd_message.set_encoded(p_errors(1).encoded_message);
2739: p_errors(1).translated_message := fnd_message.get;
2740:
2741: IF p_errors(1).translated_message IS NULL
2742: THEN
2743: p_errors(1).message_name := 'GENERIC_MESSAGE';
2743: p_errors(1).message_name := 'GENERIC_MESSAGE';
2744: p_errors(1).token_name_1 := 'GENERIC_TEXT';
2745: p_errors(1).token_1 := NVL(l_ue_message, 'CREATE_LINE_CM : UNEXPECTED ERROR') ;
2746:
2747: fnd_message.set_name('AR','GENERIC_MESSAGE');
2748: fnd_message.set_token('GENERIC_TEXT', p_errors(1).token_1 );
2749: FND_MSG_PUB.Add;
2750:
2751: p_errors(1).translated_message := fnd_message.get;
2744: p_errors(1).token_name_1 := 'GENERIC_TEXT';
2745: p_errors(1).token_1 := NVL(l_ue_message, 'CREATE_LINE_CM : UNEXPECTED ERROR') ;
2746:
2747: fnd_message.set_name('AR','GENERIC_MESSAGE');
2748: fnd_message.set_token('GENERIC_TEXT', p_errors(1).token_1 );
2749: FND_MSG_PUB.Add;
2750:
2751: p_errors(1).translated_message := fnd_message.get;
2752: ELSE
2747: fnd_message.set_name('AR','GENERIC_MESSAGE');
2748: fnd_message.set_token('GENERIC_TEXT', p_errors(1).token_1 );
2749: FND_MSG_PUB.Add;
2750:
2751: p_errors(1).translated_message := fnd_message.get;
2752: ELSE
2753: /*Bug3041195 - Set Message on API stack */
2754: fnd_message.set_encoded(p_errors(1).encoded_message);
2755: FND_MSG_PUB.Add;
2750:
2751: p_errors(1).translated_message := fnd_message.get;
2752: ELSE
2753: /*Bug3041195 - Set Message on API stack */
2754: fnd_message.set_encoded(p_errors(1).encoded_message);
2755: FND_MSG_PUB.Add;
2756: END IF;
2757: IF PG_DEBUG in ('Y', 'C') THEN
2758: arp_util.debug( 'p_errors(1).message_name = '
2774: p_errors(1).message_name := 'GENERIC_MESSAGE';
2775: p_errors(1).token_name_1 := 'GENERIC_TEXT';
2776: p_errors(1).token_1 := 'CREATE_LINE_CM : ERROR AT UNKNOWN POINT '|| SQLERRM ;
2777:
2778: fnd_message.set_name('AR','GENERIC_MESSAGE');
2779: fnd_message.set_token('GENERIC_TEXT', p_errors(1).token_1 );
2780: FND_MSG_PUB.Add;
2781:
2782: p_errors(1).translated_message := fnd_message.get;
2775: p_errors(1).token_name_1 := 'GENERIC_TEXT';
2776: p_errors(1).token_1 := 'CREATE_LINE_CM : ERROR AT UNKNOWN POINT '|| SQLERRM ;
2777:
2778: fnd_message.set_name('AR','GENERIC_MESSAGE');
2779: fnd_message.set_token('GENERIC_TEXT', p_errors(1).token_1 );
2780: FND_MSG_PUB.Add;
2781:
2782: p_errors(1).translated_message := fnd_message.get;
2783: IF PG_DEBUG in ('Y', 'C') THEN
2778: fnd_message.set_name('AR','GENERIC_MESSAGE');
2779: fnd_message.set_token('GENERIC_TEXT', p_errors(1).token_1 );
2780: FND_MSG_PUB.Add;
2781:
2782: p_errors(1).translated_message := fnd_message.get;
2783: IF PG_DEBUG in ('Y', 'C') THEN
2784: arp_util.debug( 'p_errors(1).message_name = '
2785: || p_errors(1).message_name);
2786: arp_util.debug( 'p_errors(1).encoded_message = '