DBA Data[Home] [Help]

APPS.OE_GENERATE dependencies on UTL_FILE

Line 53: ( p_file IN UTL_FILE.file_type

49:
50: END Is_Gen_End;
51:
52: PROCEDURE Start_Gen
53: ( p_file IN UTL_FILE.file_type
54: , p_text IN VARCHAR2
55: )
56: IS
57: BEGIN

Line 64: ( p_file IN UTL_FILE.file_type

60:
61: END Start_Gen;
62:
63: PROCEDURE End_Gen
64: ( p_file IN UTL_FILE.file_type
65: , p_text IN VARCHAR2
66: )
67: IS
68: BEGIN

Line 75: ( p_file IN UTL_FILE.file_type

71:
72: END End_Gen;
73:
74: PROCEDURE Load_File
75: ( p_file IN UTL_FILE.file_type
76: )
77: IS
78: l_buffer VARCHAR2(240);
79: l_count NUMBER := 0;

Line 91: UTL_FILE.get_line ( p_file , l_buffer );

87:
88: WHILE TRUE LOOP
89:
90: l_count := l_count + 1;
91: UTL_FILE.get_line ( p_file , l_buffer );
92: g_src_tbl(l_count) := l_buffer;
93:
94: END LOOP;
95:

Line 105: ( p_file IN UTL_FILE.file_type

101:
102: END Load_File;
103:
104: PROCEDURE Parameter
105: ( p_file IN UTL_FILE.file_type
106: , p_param IN VARCHAR2
107: , p_mode IN VARCHAR2 := 'IN'
108: , p_type IN VARCHAR2 := G_TYPE_NUMBER
109: , p_level IN NUMBER := 1

Line 138: ( p_file IN UTL_FILE.file_type

134:
135: END Parameter;
136:
137: PROCEDURE Element
138: ( p_file IN UTL_FILE.file_type
139: , p_element IN VARCHAR2
140: , p_type IN VARCHAR2 := G_TYPE_NUMBER
141: , p_level IN NUMBER := 1
142: , p_rpad IN NUMBER := 30

Line 163: ( p_file IN UTL_FILE.file_type

159:
160: END Element;
161:
162: PROCEDURE Variable
163: ( p_file IN UTL_FILE.file_type
164: , p_var IN VARCHAR2
165: , p_type IN VARCHAR2
166: , p_level IN NUMBER := 1
167: , p_rpad IN NUMBER := 30

Line 185: ( p_file IN UTL_FILE.file_type

181:
182: END Variable;
183:
184: PROCEDURE Assign
185: ( p_file IN UTL_FILE.file_type
186: , p_left IN VARCHAR2
187: , p_right IN VARCHAR2
188: , p_level IN NUMBER := 1
189: , p_rpad IN NUMBER := 30

Line 209: ( p_file IN UTL_FILE.file_type

205:
206: END Assign;
207:
208: PROCEDURE Call_Param
209: ( p_file IN UTL_FILE.file_type
210: , p_param IN VARCHAR2
211: , p_val IN VARCHAR2
212: , p_level IN NUMBER := 1
213: , p_rpad IN NUMBER := 30

Line 226: UTL_FILE.put_line( p_file ,

222: ELSE
223: l_first := ',';
224: END IF;
225:
226: UTL_FILE.put_line( p_file ,
227: LPAD(l_first,p_level*4+1)||' '||RPAD(p_param,p_rpad)||'=> '||p_val);
228:
229: END Call_Param;
230:

Line 232: ( p_file IN UTL_FILE.file_type

228:
229: END Call_Param;
230:
231: PROCEDURE End_Call
232: ( p_file IN UTL_FILE.file_type
233: , p_level IN NUMBER := 1
234: )
235: IS
236: BEGIN

Line 243: ( p_file IN UTL_FILE.file_type

239:
240: END End_Call;
241:
242: PROCEDURE Get_Msg
243: ( p_file IN UTL_FILE.file_type
244: , p_level IN NUMBER := 1
245: )
246: IS
247: BEGIN

Line 254: UTL_FILE.new_line(p_file);

250: Text (p_file,'FND_MSG_PUB.Count_And_Get',p_level);
251: Call_Param (p_file,'p_count','x_msg_count',p_level,30,TRUE);
252: Call_Param (p_file,'p_data','x_msg_data',p_level);
253: End_Call (p_file,p_level);
254: UTL_FILE.new_line(p_file);
255:
256: END Get_Msg;
257:
258: PROCEDURE Pkg_Header

Line 259: ( p_file IN UTL_FILE.file_type

255:
256: END Get_Msg;
257:
258: PROCEDURE Pkg_Header
259: ( p_file IN UTL_FILE.file_type
260: , p_filename IN VARCHAR2
261: , p_pkg_name IN VARCHAR2
262: , p_pkg_type IN VARCHAR2
263: )

Line 297: UTL_FILE.new_line ( p_file );

293: Text ( p_file,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;',0);
294:
295: -- Define package.
296:
297: UTL_FILE.new_line ( p_file );
298: IF p_pkg_type = G_PKG_TYPE_BODY THEN
299: Text ( p_file ,'CREATE or REPLACE PACKAGE BODY '||
300: p_pkg_name|| ' AS',0);
301: ELSE

Line 308: UTL_FILE.new_line ( p_file );

304: END IF;
305:
306: -- $Header clause.
307:
308: UTL_FILE.new_line ( p_file );
309: Text (p_file,'/* $Header: OEXTGENB.pls 120.0 2005/06/01 23:18:13 appldev noship $ */',0);
310:
311: -- Global constant holding package name.
312:

Line 322: ( p_file IN UTL_FILE.file_type

318:
319: END Pkg_Header;
320:
321: PROCEDURE Pkg_End
322: ( p_file IN UTL_FILE.file_type
323: , p_pkg_name IN VARCHAR2
324: , p_pkg_type IN VARCHAR2
325: , p_filename IN VARCHAR2 := NULL
326: )

Line 332: UTL_FILE.new_line(p_file);

328: BEGIN
329:
330: -- end statement.
331:
332: UTL_FILE.new_line(p_file);
333: Text ( p_file , 'END '||p_pkg_name||';',0);
334: Text ( p_file , '/',0);
335: -- Show errors.
336:

Line 337: UTL_FILE.new_line(p_file);

333: Text ( p_file , 'END '||p_pkg_name||';',0);
334: Text ( p_file , '/',0);
335: -- Show errors.
336:
337: UTL_FILE.new_line(p_file);
338: IF p_pkg_type = G_PKG_TYPE_BODY THEN
339: Text ( p_file ,'SHOW ERRORS PACKAGE BODY '||
340: p_pkg_name||';' ,0);
341: ELSE

Line 348: UTL_FILE.new_line(p_file);

344: END IF;
345:
346: -- Commit and Exit.
347:
348: UTL_FILE.new_line(p_file);
349: Text ( p_file , 'COMMIT;',0);
350: Comment ( p_file , 'EXIT;',0);
351:
352: -- Log an entry in the compile file if p_filename is not NULL.

Line 367: ( p_file IN UTL_FILE.file_type

363:
364: END Pkg_End;
365:
366: PROCEDURE Check_Status
367: ( p_file IN UTL_FILE.file_type
368: , p_variable IN VARCHAR2
369: , p_level IN NUMBER := 1
370: )
371: IS

Line 374: UTL_FILE.new_line (p_file);

370: )
371: IS
372: BEGIN
373:
374: UTL_FILE.new_line (p_file);
375: Text (p_file,
376: 'IF '||p_variable||' = FND_API.G_RET_STS_UNEXP_ERROR THEN',p_level);
377: Text (p_file , 'RAISE FND_API.G_EXC_UNEXPECTED_ERROR;',p_level+1);
378: Text (p_file,

Line 382: UTL_FILE.new_line (p_file);

378: Text (p_file,
379: 'ELSIF '||p_variable||' = FND_API.G_RET_STS_ERROR THEN',p_level);
380: Text (p_file ,'RAISE FND_API.G_EXC_ERROR;',p_level+1);
381: Text (p_file ,'END IF;',p_level);
382: UTL_FILE.new_line (p_file);
383:
384: END Check_Status;
385:
386:

Line 388: ( p_file IN UTL_FILE.file_type

384: END Check_Status;
385:
386:
387: PROCEDURE Exc_Msg
388: ( p_file IN UTL_FILE.file_type
389: , p_procedure IN VARCHAR2
390: , p_error IN VARCHAR2 := NULL
391: , p_level IN NUMBER := 2
392: , p_text IN BOOLEAN := FALSE

Line 417: ( p_file IN UTL_FILE.file_type

413:
414: END Exc_Msg;
415:
416: PROCEDURE Error_Msg
417: ( p_file IN UTL_FILE.file_type
418: , p_product IN VARCHAR2
419: , p_name IN VARCHAR2
420: , p_level IN NUMBER := 2
421: , p_tk1 IN VARCHAR2 := NULL

Line 466: ( p_file IN UTL_FILE.file_type

462:
463: END Error_Msg;
464:
465: PROCEDURE Msg
466: ( p_file IN UTL_FILE.file_type
467: , p_product IN VARCHAR2
468: , p_name IN VARCHAR2
469: , p_level IN NUMBER := 2
470: , p_tk1 IN VARCHAR2 := NULL

Line 505: UTL_FILE.new_line(p_file);

501: l_buffer||')',p_level);
502:
503: Text (p_file,'THEN',p_level);
504:
505: UTL_FILE.new_line(p_file);
506: Text(p_file,'FND_MESSAGE.SET_NAME('''||p_product||''','''||p_name||''');'
507: ,p_level+1);
508:
509: IF p_tk1 IS NOT NULL THEN

Line 572: UTL_FILE.new_line(p_file);

568: END IF;
569:
570: Text(p_file,'FND_MSG_PUB.Add;',p_level+1);
571:
572: UTL_FILE.new_line(p_file);
573: Text (p_file,'END IF;',p_level);
574:
575: END Msg;
576:

Line 579: ( p_file IN UTL_FILE.file_type

575: END Msg;
576:
577:
578: PROCEDURE Comment
579: ( p_file IN UTL_FILE.file_type
580: , p_comment IN VARCHAR2
581: , p_level IN NUMBER := 1
582: , p_line_before IN BOOLEAN := TRUE
583: , p_line_after IN BOOLEAN := TRUE

Line 589: UTL_FILE.new_line(p_file);

585: IS
586: BEGIN
587:
588: IF p_line_before THEN
589: UTL_FILE.new_line(p_file);
590: END IF;
591:
592: Text(p_file,'-- '||p_comment,p_level);
593:

Line 595: UTL_FILE.new_line(p_file);

591:
592: Text(p_file,'-- '||p_comment,p_level);
593:
594: IF p_line_after THEN
595: UTL_FILE.new_line(p_file);
596: END IF;
597:
598: END Comment;
599:

Line 601: ( p_file IN UTL_FILE.file_type

597:
598: END Comment;
599:
600: PROCEDURE API_Out_Vars
601: ( p_file IN UTL_FILE.file_type
602: , p_entity_tbl IN Entity_Tbl_Type
603: , p_pkg IN VARCHAR2
604: , p_level IN NUMBER := 1
605: )

Line 643: ( p_file IN UTL_FILE.file_type

639:
640: END API_Out_Vars;
641:
642: PROCEDURE API_Out_Param
643: ( p_file IN UTL_FILE.file_type
644: , p_entity_tbl IN Entity_Tbl_Type
645: , p_level IN NUMBER := 1
646: , p_entity_prefix IN VARCHAR2 := 'l_'
647: , p_type IN VARCHAR2 := G_API_TYPE_PVT

Line 697: ( p_file IN UTL_FILE.file_type

693:
694: END API_Out_Param;
695:
696: PROCEDURE API_In_Param
697: ( p_file IN UTL_FILE.file_type
698: , p_entity_tbl IN Entity_Tbl_Type
699: , p_level IN NUMBER := 1
700: , p_entity_prefix IN VARCHAR2 := 'l_'
701: , p_old_param IN BOOLEAN := TRUE

Line 797: ( p_file IN UTL_FILE.file_type

793:
794: END API_In_Param;
795:
796: PROCEDURE API_Local_Vars
797: ( p_file IN UTL_FILE.file_type
798: , p_entity_tbl IN Entity_Tbl_Type
799: , p_pkg IN VARCHAR2
800: )
801: IS

Line 861: ( p_file IN UTL_FILE.file_type

857:
858: END API_Local_Vars;
859:
860: PROCEDURE Text
861: ( p_file IN UTL_FILE.file_type
862: , p_string IN VARCHAR2
863: , p_level IN NUMBER := 1
864: )
865: IS

Line 868: UTL_FILE.put_line (p_file ,LPAD(p_string,p_level*4+LENGTH(p_string)));

864: )
865: IS
866: BEGIN
867:
868: UTL_FILE.put_line (p_file ,LPAD(p_string,p_level*4+LENGTH(p_string)));
869:
870: END text;
871:
872: PROCEDURE Comp_Check

Line 873: ( p_file IN UTL_FILE.file_type

869:
870: END text;
871:
872: PROCEDURE Comp_Check
873: ( p_file IN UTL_FILE.file_type
874: )
875: IS
876: BEGIN
877:

Line 893: ( p_file IN UTL_FILE.file_type

889:
890: END Comp_Check;
891:
892: PROCEDURE Std_Exc_Handler
893: ( p_file IN UTL_FILE.file_type
894: , p_name IN VARCHAR2 := NULL
895: , p_savepoint IN VARCHAR2 := NULL
896: )
897: IS

Line 900: UTL_FILE.new_line (p_file);

896: )
897: IS
898: BEGIN
899:
900: UTL_FILE.new_line (p_file);
901: Text (p_file,'EXCEPTION',0);
902:
903: UTL_FILE.new_line (p_file);
904: Text (p_file,'WHEN FND_API.G_EXC_ERROR THEN',1);

Line 903: UTL_FILE.new_line (p_file);

899:
900: UTL_FILE.new_line (p_file);
901: Text (p_file,'EXCEPTION',0);
902:
903: UTL_FILE.new_line (p_file);
904: Text (p_file,'WHEN FND_API.G_EXC_ERROR THEN',1);
905: UTL_FILE.new_line (p_file);
906: Text (p_file,'x_return_status := FND_API.G_RET_STS_ERROR;',2);
907: Get_Msg (p_file,2);

Line 905: UTL_FILE.new_line (p_file);

901: Text (p_file,'EXCEPTION',0);
902:
903: UTL_FILE.new_line (p_file);
904: Text (p_file,'WHEN FND_API.G_EXC_ERROR THEN',1);
905: UTL_FILE.new_line (p_file);
906: Text (p_file,'x_return_status := FND_API.G_RET_STS_ERROR;',2);
907: Get_Msg (p_file,2);
908: IF p_savepoint IS NOT NULL THEN
909: Add_Rollback ( p_file , p_savepoint , 2 );

Line 913: UTL_FILE.new_line (p_file);

909: Add_Rollback ( p_file , p_savepoint , 2 );
910: END IF;
911:
912: Text (p_file,'WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN',1);
913: UTL_FILE.new_line (p_file);
914: Text (p_file,'x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;',2);
915: Get_Msg (p_file,2);
916: IF p_savepoint IS NOT NULL THEN
917: Add_Rollback ( p_file , p_savepoint , 2 );

Line 921: UTL_FILE.new_line (p_file);

917: Add_Rollback ( p_file , p_savepoint , 2 );
918: END IF;
919:
920: Text (p_file,'WHEN OTHERS THEN',1);
921: UTL_FILE.new_line (p_file);
922: Text (p_file,'x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;',2);
923: UTL_FILE.new_line (p_file);
924: Exc_Msg (p_file,p_name,NULL,2);
925: Get_Msg (p_file,2);

Line 923: UTL_FILE.new_line (p_file);

919:
920: Text (p_file,'WHEN OTHERS THEN',1);
921: UTL_FILE.new_line (p_file);
922: Text (p_file,'x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;',2);
923: UTL_FILE.new_line (p_file);
924: Exc_Msg (p_file,p_name,NULL,2);
925: Get_Msg (p_file,2);
926: IF p_savepoint IS NOT NULL THEN
927: Add_Rollback ( p_file , p_savepoint , 2 );

Line 933: ( p_file IN UTL_FILE.file_type

929:
930: END Std_Exc_Handler;
931:
932: PROCEDURE Others_Exc
933: ( p_file IN UTL_FILE.file_type
934: , p_name IN VARCHAR2 := NULL
935: , p_level IN NUMBER := 0
936: , p_raise_exc IN BOOLEAN := TRUE
937: )

Line 941: UTL_FILE.new_line (p_file);

937: )
938: IS
939: BEGIN
940:
941: UTL_FILE.new_line (p_file);
942: Text (p_file,'EXCEPTION',p_level);
943: UTL_FILE.new_line (p_file);
944: Text (p_file,'WHEN OTHERS THEN',p_level+1);
945: UTL_FILE.new_line (p_file);

Line 943: UTL_FILE.new_line (p_file);

939: BEGIN
940:
941: UTL_FILE.new_line (p_file);
942: Text (p_file,'EXCEPTION',p_level);
943: UTL_FILE.new_line (p_file);
944: Text (p_file,'WHEN OTHERS THEN',p_level+1);
945: UTL_FILE.new_line (p_file);
946: Exc_Msg (p_file,p_name,NULL,p_level+2);
947: UTL_FILE.new_line (p_file);

Line 945: UTL_FILE.new_line (p_file);

941: UTL_FILE.new_line (p_file);
942: Text (p_file,'EXCEPTION',p_level);
943: UTL_FILE.new_line (p_file);
944: Text (p_file,'WHEN OTHERS THEN',p_level+1);
945: UTL_FILE.new_line (p_file);
946: Exc_Msg (p_file,p_name,NULL,p_level+2);
947: UTL_FILE.new_line (p_file);
948:
949: IF p_raise_exc THEN

Line 947: UTL_FILE.new_line (p_file);

943: UTL_FILE.new_line (p_file);
944: Text (p_file,'WHEN OTHERS THEN',p_level+1);
945: UTL_FILE.new_line (p_file);
946: Exc_Msg (p_file,p_name,NULL,p_level+2);
947: UTL_FILE.new_line (p_file);
948:
949: IF p_raise_exc THEN
950: Text (p_file,'RAISE FND_API.G_EXC_UNEXPECTED_ERROR;',p_level+2);
951: ELSE

Line 967: UTL_FILE.new_line (p_file);

963: );
964:
965: END IF;
966:
967: UTL_FILE.new_line (p_file);
968:
969: END Others_Exc;
970:
971: PROCEDURE Client_Exception

Line 972: ( p_file IN UTL_FILE.file_type

968:
969: END Others_Exc;
970:
971: PROCEDURE Client_Exception
972: ( p_file IN UTL_FILE.file_type
973: , p_name IN VARCHAR2 := NULL
974: , p_level IN NUMBER := 0
975: )
976: IS

Line 979: UTL_FILE.new_line (p_file);

975: )
976: IS
977: BEGIN
978:
979: UTL_FILE.new_line (p_file);
980: Text (p_file,'EXCEPTION',p_level);
981:
982: UTL_FILE.new_line (p_file);
983: Text (p_file,'WHEN VALUE_ERROR THEN',p_level+1);

Line 982: UTL_FILE.new_line (p_file);

978:
979: UTL_FILE.new_line (p_file);
980: Text (p_file,'EXCEPTION',p_level);
981:
982: UTL_FILE.new_line (p_file);
983: Text (p_file,'WHEN VALUE_ERROR THEN',p_level+1);
984: UTL_FILE.new_line (p_file);
985: Text (p_file,'Message(''Error calling server API in procedure '||
986: p_name||''');',p_level+2);

Line 984: UTL_FILE.new_line (p_file);

980: Text (p_file,'EXCEPTION',p_level);
981:
982: UTL_FILE.new_line (p_file);
983: Text (p_file,'WHEN VALUE_ERROR THEN',p_level+1);
984: UTL_FILE.new_line (p_file);
985: Text (p_file,'Message(''Error calling server API in procedure '||
986: p_name||''');',p_level+2);
987: OE_GENERATE.Text(p_file,'RAISE FORM_TRIGGER_FAILURE;',p_level+2);
988: UTL_FILE.new_line (p_file);

Line 988: UTL_FILE.new_line (p_file);

984: UTL_FILE.new_line (p_file);
985: Text (p_file,'Message(''Error calling server API in procedure '||
986: p_name||''');',p_level+2);
987: OE_GENERATE.Text(p_file,'RAISE FORM_TRIGGER_FAILURE;',p_level+2);
988: UTL_FILE.new_line (p_file);
989:
990: END Client_Exception;
991:
992: PROCEDURE API_Parameters

Line 993: ( p_file IN UTL_FILE.file_type

989:
990: END Client_Exception;
991:
992: PROCEDURE API_Parameters
993: ( p_file IN UTL_FILE.file_type
994: , p_product IN VARCHAR2
995: , p_object IN VARCHAR2
996: , p_name IN VARCHAR2
997: , p_type IN VARCHAR2

Line 1246: ( p_file IN UTL_FILE.file_type

1242:
1243: END API_Parameters;
1244:
1245: PROCEDURE API_Header
1246: ( p_file IN UTL_FILE.file_type
1247: , p_name IN VARCHAR2
1248: , p_type IN VARCHAR2
1249: )
1250: IS

Line 1400: ( p_file IN UTL_FILE.file_type

1396:
1397: END Load_Flex_Tables;
1398:
1399: PROCEDURE Parameter_PK
1400: ( p_file IN UTL_FILE.file_type
1401: , p_mode IN VARCHAR2 := 'IN'
1402: , p_level IN NUMBER := 0
1403: , p_rpad IN NUMBER := 30
1404: , p_first IN BOOLEAN := FALSE

Line 1517: ( p_file IN UTL_FILE.file_type

1513:
1514: END Parameter_PK;
1515:
1516: PROCEDURE Call_Param_PK
1517: ( p_file IN UTL_FILE.file_type
1518: , p_param IN VARCHAR2 := NULL
1519: , p_val IN VARCHAR2 := NULL
1520: , p_level IN NUMBER := 1
1521: , p_rpad IN NUMBER := 30

Line 1549: ( p_file IN UTL_FILE.file_type

1545:
1546: END Call_Param_PK;
1547:
1548: PROCEDURE Add_Savepoint
1549: ( p_file IN UTL_FILE.file_type
1550: , p_name IN VARCHAR2
1551: , p_level IN NUMBER := 1
1552: )
1553: IS

Line 1562: ( p_file IN UTL_FILE.file_type

1558:
1559: END Add_Savepoint;
1560:
1561: PROCEDURE Add_Rollback
1562: ( p_file IN UTL_FILE.file_type
1563: , p_name IN VARCHAR2
1564: , p_level IN NUMBER := 1
1565: )
1566: IS

Line 1571: UTL_FILE.new_line (p_file);

1567: BEGIN
1568:
1569: Comment ( p_file , 'Rollback' , p_level , FALSE, TRUE);
1570: Text ( p_file , 'ROLLBACK TO '||p_name||';' , p_level );
1571: UTL_FILE.new_line (p_file);
1572:
1573: END Add_Rollback;
1574:
1575: PROCEDURE Load_Constants

Line 1648: ( p_file IN UTL_FILE.file_type

1644:
1645: END Load_Constants;
1646:
1647: PROCEDURE End_If
1648: ( p_file IN UTL_FILE.file_type
1649: , p_level IN NUMBER := 1
1650: )
1651: IS
1652: BEGIN

Line 1659: ( p_file IN UTL_FILE.file_type

1655:
1656: END End_If;
1657:
1658: PROCEDURE Add_Then
1659: ( p_file IN UTL_FILE.file_type
1660: , p_level IN NUMBER := 1
1661: )
1662: IS
1663: BEGIN

Line 1670: ( p_file IN UTL_FILE.file_type

1666:
1667: END Add_Then;
1668:
1669: PROCEDURE Add_Is
1670: ( p_file IN UTL_FILE.file_type
1671: , p_level IN NUMBER := 0
1672: )
1673: IS
1674: BEGIN

Line 1681: ( p_file IN UTL_FILE.file_type

1677:
1678: END Add_Is;
1679:
1680: PROCEDURE Add_Begin
1681: ( p_file IN UTL_FILE.file_type
1682: , p_level IN NUMBER := 0
1683: )
1684: IS
1685: BEGIN

Line 1692: ( p_file IN UTL_FILE.file_type

1688:
1689: END Add_Begin;
1690:
1691: PROCEDURE Add_Else
1692: ( p_file IN UTL_FILE.file_type
1693: , p_level IN NUMBER := 1
1694: )
1695: IS
1696: BEGIN

Line 1703: ( p_file IN UTL_FILE.file_type

1699:
1700: END Add_Else;
1701:
1702: PROCEDURE End_Loop
1703: ( p_file IN UTL_FILE.file_type
1704: , p_level IN NUMBER := 1
1705: )
1706: IS
1707: BEGIN

Line 1750: ( p_file IN UTL_FILE.file_type

1746:
1747: END Get_Name_In;
1748:
1749: PROCEDURE Add_Copy
1750: ( p_file IN UTL_FILE.file_type
1751: , p_source IN VARCHAR2
1752: , p_dest IN VARCHAR2
1753: , p_type IN VARCHAR2 := G_TYPE_CHAR
1754: , p_level IN NUMBER := 1

Line 1770: ( p_file IN UTL_FILE.file_type

1766:
1767: END Add_Copy;
1768:
1769: PROCEDURE IDL_Comment
1770: ( p_file IN UTL_FILE.file_type
1771: , p_comment IN VARCHAR2
1772: , p_level IN NUMBER := 1
1773: , p_line_before IN BOOLEAN := TRUE
1774: , p_line_after IN BOOLEAN := TRUE

Line 1780: UTL_FILE.new_line(p_file);

1776: IS
1777: BEGIN
1778:
1779: IF p_line_before THEN
1780: UTL_FILE.new_line(p_file);
1781: END IF;
1782:
1783: Text(p_file,'// '||p_comment,p_level);
1784:

Line 1786: UTL_FILE.new_line(p_file);

1782:
1783: Text(p_file,'// '||p_comment,p_level);
1784:
1785: IF p_line_after THEN
1786: UTL_FILE.new_line(p_file);
1787: END IF;
1788:
1789: END IDL_Comment;
1790:

Line 1792: ( p_file IN UTL_FILE.file_type

1788:
1789: END IDL_Comment;
1790:
1791: PROCEDURE IDL_Header
1792: ( p_file IN UTL_FILE.file_type
1793: , p_filename IN VARCHAR2
1794: , p_object_name IN VARCHAR2
1795: )
1796: IS

Line 1912: ( p_file IN UTL_FILE.file_type

1908:
1909: END Strip_Attributes;
1910:
1911: PROCEDURE IDL_Parameter
1912: ( p_file IN UTL_FILE.file_type
1913: , p_param IN VARCHAR2
1914: , p_mode IN VARCHAR2 := 'in'
1915: , p_type IN VARCHAR2
1916: , p_level IN NUMBER := 1

Line 1973: ( p_file IN UTL_FILE.file_type

1969:
1970: END Get_Attr_Values;
1971:
1972: PROCEDURE Get_Api_Parameters
1973: ( p_file IN UTL_FILE.file_type
1974: , p_product IN VARCHAR2
1975: , p_object IN VARCHAR2
1976: , p_name IN VARCHAR2
1977: , p_type IN VARCHAR2 := G_API_TYPE_PVT

Line 2104: ( p_file IN UTL_FILE.file_type

2100:
2101: END Get_Api_Parameters;
2102:
2103: PROCEDURE Null_Or_Missing
2104: ( p_file IN UTL_FILE.file_type
2105: , p_attribute IN attribute_rec_type
2106: , p_prefix_text IN VARCHAR2 := NULL
2107: , p_not IN BOOLEAN := TRUE
2108: , p_and IN BOOLEAN := TRUE

Line 2144: -- UTL_FILE.new_line(p_file);

2140: OE_GENERATE.Text (p_file , 'AND' , p_level);
2141: ELSE
2142: OE_GENERATE.Text (p_file , 'OR' , p_level);
2143: END IF;
2144: -- UTL_FILE.new_line(p_file);
2145: END IF;
2146:
2147: OE_GENERATE.Text
2148: ( p_file