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 565: l_validation_level := FND_API.G_VALID_LEVEL_FULL;

561:
562: If (nvl(p_import_transaction_as_sent,'N') = 'N') then
563: l_validation_level := 50;
564: Else
565: l_validation_level := FND_API.G_VALID_LEVEL_FULL;
566: end if;
567:
568: -- Derive reject_allow_flag from System Options
569:

Line 742: l_return_status:=FND_API.G_RET_STS_ERROR;

738: IF c_inv_flag%NOTFOUND THEN
739: close c_inv_flag;
740:
741: Print('Main Package ~~~'||' Trx type ID'||l_batch_rec.trx_type_id);
742: l_return_status:=FND_API.G_RET_STS_ERROR;
743: END IF;
744:
745: Print('Main Package ~~~'||' Value'||l_invoice_flag||'Return Staus '|| l_return_status);
746:

Line 747: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

743: END IF;
744:
745: Print('Main Package ~~~'||' Value'||l_invoice_flag||'Return Staus '|| l_return_status);
746:
747: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
748: RAISE FND_API.G_EXC_ERROR;
749: ELSE
750: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
751: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 748: RAISE FND_API.G_EXC_ERROR;

744:
745: Print('Main Package ~~~'||' Value'||l_invoice_flag||'Return Staus '|| l_return_status);
746:
747: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
748: RAISE FND_API.G_EXC_ERROR;
749: ELSE
750: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
751: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
752: END IF;

Line 750: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

746:
747: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
748: RAISE FND_API.G_EXC_ERROR;
749: ELSE
750: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
751: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
752: END IF;
753: End if;
754: CLOSE c_inv_flag;

Line 751: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

747: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
748: RAISE FND_API.G_EXC_ERROR;
749: ELSE
750: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
751: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
752: END IF;
753: End if;
754: CLOSE c_inv_flag;
755:

Line 823: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

819: where trx_id=curr_head.trx_id;
820:
821: Print('Main Package ~~~'|| 'Return Status from Transaction Attributes'||l_return_status);
822:
823: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
824: RAISE FND_API.G_EXC_ERROR;
825: ELSE
826: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 824: RAISE FND_API.G_EXC_ERROR;

820:
821: Print('Main Package ~~~'|| 'Return Status from Transaction Attributes'||l_return_status);
822:
823: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
824: RAISE FND_API.G_EXC_ERROR;
825: ELSE
826: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
828: END IF;

Line 826: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

822:
823: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
824: RAISE FND_API.G_EXC_ERROR;
825: ELSE
826: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
828: END IF;
829: End if;
830: Print('Main Package ~~~'||' Populating Dist Lines into l_dist_lines_tbl ');

Line 827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

823: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
824: RAISE FND_API.G_EXC_ERROR;
825: ELSE
826: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
828: END IF;
829: End if;
830: Print('Main Package ~~~'||' Populating Dist Lines into l_dist_lines_tbl ');
831:

Line 918: p_init_msg_list => FND_API.G_TRUE,

914: ----Call the Public API to Validate and Insert Transactions (Batches,Headers,Lines and Distributions).
915:
916: FUN_TRX_PUB.CREATE_BATCH(
917: p_api_version => 1.0,
918: p_init_msg_list => FND_API.G_TRUE,
919: p_validation_level => l_validation_level,
920: x_return_status => l_return_status,
921: x_msg_count => l_msg_count,
922: x_msg_data => l_msg_data,

Line 925: p_insert => FND_API.G_TRUE,

921: x_msg_count => l_msg_count,
922: x_msg_data => l_msg_data,
923: p_sent => nvl(p_import_transaction_as_sent,'N'),
924: p_calling_sequence => 'Intercompany Import Program',
925: p_insert => FND_API.G_TRUE,
926: p_batch_rec => l_batch_rec,
927: p_trx_tbl => l_trx_tbl,
928: p_init_dist_tbl => l_init_dist_tbl,
929: p_dist_lines_tbl => l_dist_lines_tbl,

Line 935: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

931: );
932: Print('Main Package ~~~'||'Validation and Insertion Complete with Status' || l_return_status);
933: /* If l_return_status is Unexpected - Raise Unexpected Error*/
934:
935: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
936: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
937: END IF;
938:
939: Print('Main Package ~~~ Raise batch.send Business Event');

Line 936: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

932: Print('Main Package ~~~'||'Validation and Insertion Complete with Status' || l_return_status);
933: /* If l_return_status is Unexpected - Raise Unexpected Error*/
934:
935: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
936: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
937: END IF;
938:
939: Print('Main Package ~~~ Raise batch.send Business Event');
940: /* Raise a Business Event (Send) */

Line 942: If l_return_status = FND_API.G_RET_STS_SUCCESS then

938:
939: Print('Main Package ~~~ Raise batch.send Business Event');
940: /* Raise a Business Event (Send) */
941:
942: If l_return_status = FND_API.G_RET_STS_SUCCESS then
943: Overall_Status := 'A';
944: commit work;
945: else
946: Overall_Status := 'R';

Line 989: WHEN FND_API.G_EXC_ERROR THEN

985: p_errbuff := NULL;
986: p_retcode := 0;
987:
988: EXCEPTION
989: WHEN FND_API.G_EXC_ERROR THEN
990: IF c_head%ISOPEN Then
991: Close c_head;
992: END IF;
993: IF c_dist_lines%ISOPEN Then

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

996:
997: IF c_batch_dist %ISOPEN Then
998: Close c_batch_dist;
999: END IF;
1000: p_errbuff := 'FND_API.G_EXC_ERROR';
1001: p_retcode := 2;
1002: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1003:
1004: IF c_head%ISOPEN Then

Line 1002: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

998: Close c_batch_dist;
999: END IF;
1000: p_errbuff := 'FND_API.G_EXC_ERROR';
1001: p_retcode := 2;
1002: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1003:
1004: IF c_head%ISOPEN Then
1005: Close c_head;
1006: END IF;

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

1012: IF c_batch_dist %ISOPEN Then
1013: Close c_batch_dist;
1014: END IF;
1015:
1016: p_errbuff := 'FND_API.G_EXC_UNEXPECTED_ERROR';
1017: p_retcode := 2;
1018:
1019: WHEN BATCH_NOT_FOUND THEN
1020: