eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.FUN_OPEN_INTERFACE_PKG dependencies on FND_API

Line 99: x_return_status := FND_API.G_RET_STS_SUCCESS;

95: WHERE party_id = l_party_id;
96:
97: BEGIN
98:
99: x_return_status := FND_API.G_RET_STS_SUCCESS;
100:
101: --Print('Main Package ~~~'||'Deriving Initiator Id from Initiator Name ');
102: fun_trx_entry_util.log_debug(FND_LOG.LEVEL_PROCEDURE,
103: 'FUN_OPEN_INTERFACE_PKG.Derive_Batch_Attributes',

Line 115: Raise FND_API.G_EXC_ERROR;

111: fetch c_init_id_per_name into l_initiator_id_per_name;
112: If (c_init_id_per_name%notfound) then
113: Print('Main Package ~~~'||'No Initiator Exists by this name');
114: close c_init_id_per_name;
115: Raise FND_API.G_EXC_ERROR;
116: Elsif (c_init_id_per_name%rowcount > 1) then
117: Print('Main Package ~~~'||'Multiple Parties with the Initiator name given');
118: close c_init_id_per_name;
119: Raise FND_API.G_EXC_ERROR;

Line 119: Raise FND_API.G_EXC_ERROR;

115: Raise FND_API.G_EXC_ERROR;
116: Elsif (c_init_id_per_name%rowcount > 1) then
117: Print('Main Package ~~~'||'Multiple Parties with the Initiator name given');
118: close c_init_id_per_name;
119: Raise FND_API.G_EXC_ERROR;
120:
121: End If;
122: close c_init_id_per_name;
123:

Line 127: Raise FND_API.G_EXC_ERROR;

123:
124: IF (p_initiator_id is not null) then
125: If (p_initiator_id <> l_initiator_id_per_name) then
126: Print('Main Package ~~~'||'Initiator Id and Initiator Name are inconsistent');
127: Raise FND_API.G_EXC_ERROR;
128: End if;
129: Else
130: p_initiator_id := l_initiator_id_per_name;
131: End If;

Line 145: Raise FND_API.G_EXC_ERROR;

141: fetch c_le_id_per_name into l_from_le_id_per_name;
142: If (c_le_id_per_name%notfound) then
143: Print('Main Package ~~~'||'No Legal Entity Exists by this name');
144: close c_le_id_per_name;
145: Raise FND_API.G_EXC_ERROR;
146: Elsif (c_le_id_per_name%rowcount > 1) then
147: Print('Main Package ~~~'||'Multiple Legal Entities for the name given');
148: close c_le_id_per_name;
149: Raise FND_API.G_EXC_ERROR;

Line 149: Raise FND_API.G_EXC_ERROR;

145: Raise FND_API.G_EXC_ERROR;
146: Elsif (c_le_id_per_name%rowcount > 1) then
147: Print('Main Package ~~~'||'Multiple Legal Entities for the name given');
148: close c_le_id_per_name;
149: Raise FND_API.G_EXC_ERROR;
150: End If;
151: close c_le_id_per_name;
152:
153: IF (p_From_Le_id is not null) then

Line 156: Raise FND_API.G_EXC_ERROR;

152:
153: IF (p_From_Le_id is not null) then
154: If (p_From_Le_id <> l_From_Le_id_per_name) then
155: Print('Main Package ~~~'||'From Le Id and From Le Name are inconsistent');
156: Raise FND_API.G_EXC_ERROR;
157: End if;
158:
159: Else
160: p_From_Le_id := l_From_Le_id_per_name;

Line 171: -- Raise FND_API.G_EXC_ERROR;

167: Print('Main Package ~~~'||' Initiator Id '||p_initiator_id);
168: /*If ((p_from_le_id is not null) and (l_From_Le_id_per_initiator_id is not null)) then
169: If (p_From_Le_id <> l_From_Le_id_per_initiator_id) then
170: Print('Main Package ~~~'||'From Le Id and Initiator Id '||l_from_le_id_per_initiator_id||' are inconsistent');
171: -- Raise FND_API.G_EXC_ERROR;
172: End if;
173: Else */
174:
175: If p_from_le_id is null then

Line 196: Raise FND_API.G_EXC_ERROR;

192: fetch c_ledger_id into l_from_ledger_id_per_le;
193: If (c_ledger_id%notfound) then
194: Print('Main Package ~~~'||'No Primary Ledger attached to the Legal Entity');
195: close c_ledger_id;
196: Raise FND_API.G_EXC_ERROR;
197: End If;
198: close c_ledger_id;
199: IF (p_From_Ledger_id is not null) then
200: If (p_From_Ledger_id <> l_From_Ledger_id_per_le) then

Line 202: Raise FND_API.G_EXC_ERROR;

198: close c_ledger_id;
199: IF (p_From_Ledger_id is not null) then
200: If (p_From_Ledger_id <> l_From_Ledger_id_per_le) then
201: Print('Main Package ~~~'||'From Ledger Id and From Le Id are inconsistent');
202: Raise FND_API.G_EXC_ERROR;
203: End if;
204: Else
205: p_From_Ledger_id := l_From_Ledger_id_per_le;
206: End If;

Line 222: Raise FND_API.G_EXC_ERROR;

218: fetch c_trx_type_id_per_name into l_Trx_type_id_per_name;
219: If (c_trx_type_id_per_name%notfound) then
220: Print('Main Package ~~~'||'Main Package ~~~'||'No Transaction Type with this name');
221: close c_trx_type_id_per_name;
222: Raise FND_API.G_EXC_ERROR;
223: End If;
224: close c_trx_type_id_per_name;
225:
226: IF (p_Trx_type_id is not null) then

Line 229: Raise FND_API.G_EXC_ERROR;

225:
226: IF (p_Trx_type_id is not null) then
227: If (p_Trx_type_id <> l_Trx_type_id_per_name) then
228: Print('Main Package ~~~'||'Trx_Type_Id and Trx_Type_Name are inconsistent');
229: Raise FND_API.G_EXC_ERROR;
230: End if;
231: Else
232: p_Trx_type_id := l_Trx_type_id_per_name;
233: End If;

Line 247: Raise FND_API.G_EXC_ERROR;

243: fetch c_trx_type_id_per_code into l_Trx_type_id_per_code;
244: If (c_trx_type_id_per_code%notfound) then
245: Print('Main Package ~~~'||'No Transaction Type with this code');
246: close c_trx_type_id_per_code;
247: Raise FND_API.G_EXC_ERROR;
248: End If;
249: close c_trx_type_id_per_code;
250: Else
251:

Line 257: Raise FND_API.G_EXC_ERROR;

253: fetch c_trx_type_code_per_id into p_trx_type_code;
254: If (c_trx_type_code_per_id%notfound) then
255: Print('Main Package ~~~'||'No Transaction Type with this Id');
256: close c_trx_type_code_per_id;
257: Raise FND_API.G_EXC_ERROR;
258: End If;
259: close c_trx_type_code_per_id;
260: END IF;
261:

Line 265: Raise FND_API.G_EXC_ERROR;

261:
262: IF ((p_Trx_type_id is not null) and (l_trx_type_id_per_code is not null)) then
263: If (p_Trx_type_id <> l_Trx_type_id_per_code) then
264: Print('Main Package ~~~'||'Trx_Type_Code and Trx_Type_Id are inconsistent');
265: Raise FND_API.G_EXC_ERROR;
266: End if;
267: Else
268: If (l_trx_type_id_per_code is not null) then
269: p_Trx_type_id := l_Trx_type_id_per_code;

Line 274: WHEN FND_API.G_EXC_ERROR THEN

270: End If;
271: End If;
272:
273: EXCEPTION
274: WHEN FND_API.G_EXC_ERROR THEN
275: x_return_status := FND_API.G_RET_STS_ERROR;
276: WHEN OTHERS THEN
277: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
278: END Derive_Batch_Attributes;

Line 275: x_return_status := FND_API.G_RET_STS_ERROR;

271: End If;
272:
273: EXCEPTION
274: WHEN FND_API.G_EXC_ERROR THEN
275: x_return_status := FND_API.G_RET_STS_ERROR;
276: WHEN OTHERS THEN
277: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
278: END Derive_Batch_Attributes;
279:

Line 277: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

273: EXCEPTION
274: WHEN FND_API.G_EXC_ERROR THEN
275: x_return_status := FND_API.G_RET_STS_ERROR;
276: WHEN OTHERS THEN
277: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
278: END Derive_Batch_Attributes;
279:
280:
281: PROCEDURE Derive_Transaction_Attributes(

Line 332: x_return_status := FND_API.G_RET_STS_SUCCESS;

328: WHERE party_id = l_party_id;
329:
330: BEGIN
331:
332: x_return_status := FND_API.G_RET_STS_SUCCESS;
333:
334: Print('Main Package ~~~'||'Deriving Recipient Id from Recipient Name');
335: fun_trx_entry_util.log_debug(FND_LOG.LEVEL_PROCEDURE,
336: 'FUN_OPEN_INTERFACE_PKG.Derive_Transaction_Attributes',

Line 347: Raise FND_API.G_EXC_ERROR;

343: fetch c_reci_id_per_name into l_recipient_id_per_name;
344: If (c_reci_id_per_name%notfound) then
345: Print('Main Package ~~~'||'No Recipient Exists by this name');
346: close c_reci_id_per_name;
347: Raise FND_API.G_EXC_ERROR;
348: Elsif (c_reci_id_per_name%rowcount > 1) then
349: Print('Main Package ~~~'||'Multiple Parties with the Recipient name');
350: close c_reci_id_per_name;
351: Raise FND_API.G_EXC_ERROR;

Line 351: Raise FND_API.G_EXC_ERROR;

347: Raise FND_API.G_EXC_ERROR;
348: Elsif (c_reci_id_per_name%rowcount > 1) then
349: Print('Main Package ~~~'||'Multiple Parties with the Recipient name');
350: close c_reci_id_per_name;
351: Raise FND_API.G_EXC_ERROR;
352: End If;
353: close c_reci_id_per_name;
354:
355: IF (p_recipient_id is not null) then

Line 358: Raise FND_API.G_EXC_ERROR;

354:
355: IF (p_recipient_id is not null) then
356: If (p_recipient_id <> l_recipient_id_per_name) then
357: Print('Recipient Id and Recipient Name are inconsistent');
358: Raise FND_API.G_EXC_ERROR;
359: End if;
360: Else
361: p_recipient_id := l_recipient_id_per_name;
362: End If;

Line 376: Raise FND_API.G_EXC_ERROR;

372: fetch c_le_id_per_name into l_to_le_id_per_name;
373: If (c_le_id_per_name%notfound) then
374: Print('Main Package ~~~'||'No Legal Entity Exists by this name');
375: close c_le_id_per_name;
376: Raise FND_API.G_EXC_ERROR;
377: Elsif (c_le_id_per_name%rowcount > 1) then
378: Print('Main Package ~~~'||'Multiple Legal Entities for the name given');
379: close c_le_id_per_name;
380: Raise FND_API.G_EXC_ERROR;

Line 380: Raise FND_API.G_EXC_ERROR;

376: Raise FND_API.G_EXC_ERROR;
377: Elsif (c_le_id_per_name%rowcount > 1) then
378: Print('Main Package ~~~'||'Multiple Legal Entities for the name given');
379: close c_le_id_per_name;
380: Raise FND_API.G_EXC_ERROR;
381: End If;
382: close c_le_id_per_name;
383: IF (p_To_Le_id is not null) then
384: If (p_To_Le_id <> l_To_Le_id_per_name) then

Line 386: Raise FND_API.G_EXC_ERROR;

382: close c_le_id_per_name;
383: IF (p_To_Le_id is not null) then
384: If (p_To_Le_id <> l_To_Le_id_per_name) then
385: Print('Main Package ~~~'||'To Le Id and To Le Name are inconsistent');
386: Raise FND_API.G_EXC_ERROR;
387: End if;
388: Else
389: p_To_Le_id := l_To_Le_id_per_name;
390: End If;

Line 413: Raise FND_API.G_EXC_ERROR;

409: fetch c_ledger_id into l_to_ledger_id_per_le;
410: If (c_ledger_id%notfound) then
411: Print('No Primary Ledger attached to the Legal Entity');
412: close c_ledger_id;
413: Raise FND_API.G_EXC_ERROR;
414: End If;
415: close c_ledger_id;
416:
417: IF (p_To_Ledger_id is not null) then

Line 420: --to be changed Raise FND_API.G_EXC_ERROR;

416:
417: IF (p_To_Ledger_id is not null) then
418: If (p_To_Ledger_id <> l_To_Ledger_id_per_le) then
419: Print('To Ledger Id and To Le Id are inconsistent');
420: --to be changed Raise FND_API.G_EXC_ERROR;
421: End if;
422: Else
423: p_To_Ledger_id := l_To_Ledger_id_per_le;
424: End If;

Line 428: WHEN FND_API.G_EXC_ERROR THEN

424: End If;
425: END IF;
426: --/* Uncomment ledger_id fetch 3603338
427: EXCEPTION
428: WHEN FND_API.G_EXC_ERROR THEN
429: x_return_status := FND_API.G_RET_STS_ERROR;
430: WHEN OTHERS THEN
431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
432: END Derive_Transaction_Attributes;

Line 429: x_return_status := FND_API.G_RET_STS_ERROR;

425: END IF;
426: --/* Uncomment ledger_id fetch 3603338
427: EXCEPTION
428: WHEN FND_API.G_EXC_ERROR THEN
429: x_return_status := FND_API.G_RET_STS_ERROR;
430: WHEN OTHERS THEN
431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
432: END Derive_Transaction_Attributes;
433:

Line 431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

427: EXCEPTION
428: WHEN FND_API.G_EXC_ERROR THEN
429: x_return_status := FND_API.G_RET_STS_ERROR;
430: WHEN OTHERS THEN
431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
432: END Derive_Transaction_Attributes;
433:
434:
435: PROCEDURE MAIN

Line 540: l_validation_level := FND_API.G_VALID_LEVEL_FULL;

536:
537: If (nvl(p_import_transaction_as_sent,'N') = 'N') then
538: l_validation_level := 50;
539: Else
540: l_validation_level := FND_API.G_VALID_LEVEL_FULL;
541: end if;
542:
543: -- Derive reject_allow_flag from System Options
544:

Line 674: l_return_status:=FND_API.G_RET_STS_ERROR;

670: IF c_inv_flag%NOTFOUND THEN
671: close c_inv_flag;
672:
673: Print('Main Package ~~~'||' Trx type ID'||l_batch_rec.trx_type_id);
674: l_return_status:=FND_API.G_RET_STS_ERROR;
675: END IF;
676:
677: Print('Main Package ~~~'||' Value'||l_invoice_flag||'Return Staus '|| l_return_status);
678:

Line 679: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

675: END IF;
676:
677: Print('Main Package ~~~'||' Value'||l_invoice_flag||'Return Staus '|| l_return_status);
678:
679: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
680: RAISE FND_API.G_EXC_ERROR;
681: ELSE
682: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
683: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 680: RAISE FND_API.G_EXC_ERROR;

676:
677: Print('Main Package ~~~'||' Value'||l_invoice_flag||'Return Staus '|| l_return_status);
678:
679: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
680: RAISE FND_API.G_EXC_ERROR;
681: ELSE
682: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
683: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
684: END IF;

Line 682: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

678:
679: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
680: RAISE FND_API.G_EXC_ERROR;
681: ELSE
682: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
683: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
684: END IF;
685: End if;
686: CLOSE c_inv_flag;

Line 683: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

679: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
680: RAISE FND_API.G_EXC_ERROR;
681: ELSE
682: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
683: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
684: END IF;
685: End if;
686: CLOSE c_inv_flag;
687:

Line 749: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

745: );
746:
747: Print('Main Package ~~~'|| 'Return Status from Transaction Attributes'||l_return_status);
748:
749: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
750: RAISE FND_API.G_EXC_ERROR;
751: ELSE
752: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
753: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 750: RAISE FND_API.G_EXC_ERROR;

746:
747: Print('Main Package ~~~'|| 'Return Status from Transaction Attributes'||l_return_status);
748:
749: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
750: RAISE FND_API.G_EXC_ERROR;
751: ELSE
752: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
753: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
754: END IF;

Line 752: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

748:
749: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
750: RAISE FND_API.G_EXC_ERROR;
751: ELSE
752: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
753: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
754: END IF;
755: End if;
756: Print('Main Package ~~~'||' Populating Dist Lines into l_dist_lines_tbl ');

Line 753: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

749: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
750: RAISE FND_API.G_EXC_ERROR;
751: ELSE
752: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
753: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
754: END IF;
755: End if;
756: Print('Main Package ~~~'||' Populating Dist Lines into l_dist_lines_tbl ');
757:

Line 844: p_init_msg_list => FND_API.G_TRUE,

840: ----Call the Public API to Validate and Insert Transactions (Batches,Headers,Lines and Distributions).
841:
842: FUN_TRX_PUB.CREATE_BATCH(
843: p_api_version => 1.0,
844: p_init_msg_list => FND_API.G_TRUE,
845: p_validation_level => l_validation_level,
846: x_return_status => l_return_status,
847: x_msg_count => l_msg_count,
848: x_msg_data => l_msg_data,

Line 851: p_insert => FND_API.G_TRUE,

847: x_msg_count => l_msg_count,
848: x_msg_data => l_msg_data,
849: p_sent => nvl(p_import_transaction_as_sent,'N'),
850: p_calling_sequence => 'Intercompany Import Program',
851: p_insert => FND_API.G_TRUE,
852: p_batch_rec => l_batch_rec,
853: p_trx_tbl => l_trx_tbl,
854: p_init_dist_tbl => l_init_dist_tbl,
855: p_dist_lines_tbl => l_dist_lines_tbl,

Line 861: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

857: );
858: Print('Main Package ~~~'||'Validation and Insertion Complete with Status' || l_return_status);
859: /* If l_return_status is Unexpected - Raise Unexpected Error*/
860:
861: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
862: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
863: END IF;
864:
865: Print('Main Package ~~~ Raise batch.send Business Event');

Line 862: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

858: Print('Main Package ~~~'||'Validation and Insertion Complete with Status' || l_return_status);
859: /* If l_return_status is Unexpected - Raise Unexpected Error*/
860:
861: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
862: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
863: END IF;
864:
865: Print('Main Package ~~~ Raise batch.send Business Event');
866: /* Raise a Business Event (Send) */

Line 868: If l_return_status = FND_API.G_RET_STS_SUCCESS then

864:
865: Print('Main Package ~~~ Raise batch.send Business Event');
866: /* Raise a Business Event (Send) */
867:
868: If l_return_status = FND_API.G_RET_STS_SUCCESS then
869: Overall_Status := 'A';
870: commit work;
871: else
872: Overall_Status := 'R';

Line 914: WHEN FND_API.G_EXC_ERROR THEN

910: p_errbuff := NULL;
911: p_retcode := 0;
912:
913: EXCEPTION
914: WHEN FND_API.G_EXC_ERROR THEN
915: IF c_batches%ISOPEN Then
916: Close c_batches;
917: END IF;
918: IF c_head%ISOPEN Then

Line 928: p_errbuff := 'FND_API.G_EXC_ERROR';

924:
925: IF c_batch_dist %ISOPEN Then
926: Close c_batch_dist;
927: END IF;
928: p_errbuff := 'FND_API.G_EXC_ERROR';
929: p_retcode := 2;
930: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
931: IF c_batches%ISOPEN Then
932: Close c_batches;

Line 930: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

926: Close c_batch_dist;
927: END IF;
928: p_errbuff := 'FND_API.G_EXC_ERROR';
929: p_retcode := 2;
930: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
931: IF c_batches%ISOPEN Then
932: Close c_batches;
933: END IF;
934: IF c_head%ISOPEN Then

Line 946: p_errbuff := 'FND_API.G_EXC_UNEXPECTED_ERROR';

942: IF c_batch_dist %ISOPEN Then
943: Close c_batch_dist;
944: END IF;
945:
946: p_errbuff := 'FND_API.G_EXC_UNEXPECTED_ERROR';
947: p_retcode := 2;
948:
949: WHEN BATCH_NOT_FOUND THEN
950: IF c_batches%ISOPEN Then