DBA Data[Home] [Help]

APPS.CZ_FCE_COMPILE dependencies on DBMS_LOB

Line 913: DBMS_LOB.WRITEAPPEND ( ConstantPool, l_len, l_raw );

909: BEGIN
910:
911: IF ( l_len > 0 ) THEN
912:
913: DBMS_LOB.WRITEAPPEND ( ConstantPool, l_len, l_raw );
914:
915: END IF;
916: END flush_constant_pool;
917: ---------------------------------------------------------------------------------------

Line 928: DBMS_LOB.WRITEAPPEND ( CodeMemory, l_len, l_raw );

924: BEGIN
925:
926: IF ( l_len > 0 ) THEN
927:
928: DBMS_LOB.WRITEAPPEND ( CodeMemory, l_len, l_raw );
929:
930: END IF;
931: END flush_code_memory;
932: ---------------------------------------------------------------------------------------

Line 937: DBMS_LOB.CREATETEMPORARY ( ConstantPool, TRUE );

933: -- Scope: compile_logic_file
934: PROCEDURE init_logic_file IS
935: BEGIN
936:
937: DBMS_LOB.CREATETEMPORARY ( ConstantPool, TRUE );
938: DBMS_LOB.CREATETEMPORARY ( CodeMemory, TRUE );
939:
940: CodeMemory_buffer := NULL;
941: code_buffer_ptr := 0;

Line 938: DBMS_LOB.CREATETEMPORARY ( CodeMemory, TRUE );

934: PROCEDURE init_logic_file IS
935: BEGIN
936:
937: DBMS_LOB.CREATETEMPORARY ( ConstantPool, TRUE );
938: DBMS_LOB.CREATETEMPORARY ( CodeMemory, TRUE );
939:
940: CodeMemory_buffer := NULL;
941: code_buffer_ptr := 0;
942:

Line 959: DBMS_LOB.TRIM ( ConstantPool, 0 );

955: -- Scope: compile_logic_file
956: PROCEDURE next_logic_segment IS
957: BEGIN
958:
959: DBMS_LOB.TRIM ( ConstantPool, 0 );
960: DBMS_LOB.TRIM ( CodeMemory, 0 );
961:
962: CodeMemory_buffer := NULL;
963: code_buffer_ptr := 0;

Line 960: DBMS_LOB.TRIM ( CodeMemory, 0 );

956: PROCEDURE next_logic_segment IS
957: BEGIN
958:
959: DBMS_LOB.TRIM ( ConstantPool, 0 );
960: DBMS_LOB.TRIM ( CodeMemory, 0 );
961:
962: CodeMemory_buffer := NULL;
963: code_buffer_ptr := 0;
964:

Line 994: DBMS_LOB.CREATETEMPORARY ( l_loc, TRUE );

990: flush_code_memory ();
991:
992: IF ( pool_ptr + code_ptr > 0 ) THEN
993:
994: DBMS_LOB.CREATETEMPORARY ( l_loc, TRUE );
995:
996: IF ( pool_ptr > 0 ) THEN DBMS_LOB.APPEND ( l_loc, ConstantPool ); END IF;
997: IF ( code_ptr > 0 ) THEN DBMS_LOB.APPEND ( l_loc, CodeMemory ); END IF;
998:

Line 996: IF ( pool_ptr > 0 ) THEN DBMS_LOB.APPEND ( l_loc, ConstantPool ); END IF;

992: IF ( pool_ptr + code_ptr > 0 ) THEN
993:
994: DBMS_LOB.CREATETEMPORARY ( l_loc, TRUE );
995:
996: IF ( pool_ptr > 0 ) THEN DBMS_LOB.APPEND ( l_loc, ConstantPool ); END IF;
997: IF ( code_ptr > 0 ) THEN DBMS_LOB.APPEND ( l_loc, CodeMemory ); END IF;
998:
999: DBMS_LOB.WRITEAPPEND ( l_loc, 4, cz_fce_compile_utils.integer_raw ( pool_ptr ));
1000: DBMS_LOB.WRITEAPPEND ( l_loc, 4, const_file_signature );

Line 997: IF ( code_ptr > 0 ) THEN DBMS_LOB.APPEND ( l_loc, CodeMemory ); END IF;

993:
994: DBMS_LOB.CREATETEMPORARY ( l_loc, TRUE );
995:
996: IF ( pool_ptr > 0 ) THEN DBMS_LOB.APPEND ( l_loc, ConstantPool ); END IF;
997: IF ( code_ptr > 0 ) THEN DBMS_LOB.APPEND ( l_loc, CodeMemory ); END IF;
998:
999: DBMS_LOB.WRITEAPPEND ( l_loc, 4, cz_fce_compile_utils.integer_raw ( pool_ptr ));
1000: DBMS_LOB.WRITEAPPEND ( l_loc, 4, const_file_signature );
1001:

Line 999: DBMS_LOB.WRITEAPPEND ( l_loc, 4, cz_fce_compile_utils.integer_raw ( pool_ptr ));

995:
996: IF ( pool_ptr > 0 ) THEN DBMS_LOB.APPEND ( l_loc, ConstantPool ); END IF;
997: IF ( code_ptr > 0 ) THEN DBMS_LOB.APPEND ( l_loc, CodeMemory ); END IF;
998:
999: DBMS_LOB.WRITEAPPEND ( l_loc, 4, cz_fce_compile_utils.integer_raw ( pool_ptr ));
1000: DBMS_LOB.WRITEAPPEND ( l_loc, 4, const_file_signature );
1001:
1002: IF ( this_segment_nbr = 1 ) THEN
1003:

Line 1000: DBMS_LOB.WRITEAPPEND ( l_loc, 4, const_file_signature );

996: IF ( pool_ptr > 0 ) THEN DBMS_LOB.APPEND ( l_loc, ConstantPool ); END IF;
997: IF ( code_ptr > 0 ) THEN DBMS_LOB.APPEND ( l_loc, CodeMemory ); END IF;
998:
999: DBMS_LOB.WRITEAPPEND ( l_loc, 4, cz_fce_compile_utils.integer_raw ( pool_ptr ));
1000: DBMS_LOB.WRITEAPPEND ( l_loc, 4, const_file_signature );
1001:
1002: IF ( this_segment_nbr = 1 ) THEN
1003:
1004: SELECT cz_fce_files_s.NEXTVAL INTO this_file_id FROM DUAL;

Line 1099: DBMS_LOB.WRITEAPPEND ( ConstantPool, l_len, p_data );

1095: IF ( l_data_len >= const_constantpool_buffersize ) THEN
1096:
1097: flush_constant_pool ();
1098:
1099: DBMS_LOB.WRITEAPPEND ( ConstantPool, l_len, p_data );
1100:
1101: ConstantPool_buffer := NULL;
1102: pool_buffer_ptr := 0;
1103:

Line 1167: DBMS_LOB.TRIM ( ConstantPool, 0 );

1163: --already been saved to the database, for example segment switching occured in
1164: --in the middle of a rule generation, and this rule has to be rolled back. The
1165: --previous segment nees to be restored in memory from the database.
1166:
1167: DBMS_LOB.TRIM ( ConstantPool, 0 );
1168: DBMS_LOB.TRIM ( CodeMemory, 0 );
1169:
1170: SELECT fce_file INTO l_fce_file FROM cz_fce_files
1171: WHERE deleted_flag = '0'

Line 1168: DBMS_LOB.TRIM ( CodeMemory, 0 );

1164: --in the middle of a rule generation, and this rule has to be rolled back. The
1165: --previous segment nees to be restored in memory from the database.
1166:
1167: DBMS_LOB.TRIM ( ConstantPool, 0 );
1168: DBMS_LOB.TRIM ( CodeMemory, 0 );
1169:
1170: SELECT fce_file INTO l_fce_file FROM cz_fce_files
1171: WHERE deleted_flag = '0'
1172: AND component_id = p_component_id

Line 1179: l_size := UTL_RAW.CAST_TO_BINARY_INTEGER ( DBMS_LOB.SUBSTR ( l_fce_file, 4, DBMS_LOB.GETLENGTH ( l_fce_file ) - 7 ));

1175:
1176: --According to the logic file format, second four bytes from the end store the
1177: --size of the Constant Pool.
1178:
1179: l_size := UTL_RAW.CAST_TO_BINARY_INTEGER ( DBMS_LOB.SUBSTR ( l_fce_file, 4, DBMS_LOB.GETLENGTH ( l_fce_file ) - 7 ));
1180: l_tail := DBMS_LOB.GETLENGTH ( l_fce_file ) - 8 - l_size;
1181:
1182: IF ( l_size > 0 ) THEN ConstantPool := DBMS_LOB.SUBSTR ( l_fce_file, l_size, 1 ); END IF;
1183: IF ( l_tail > 0 ) THEN CodeMemory := DBMS_LOB.SUBSTR ( l_fce_file, l_tail, l_size + 1 ); END IF;

Line 1180: l_tail := DBMS_LOB.GETLENGTH ( l_fce_file ) - 8 - l_size;

1176: --According to the logic file format, second four bytes from the end store the
1177: --size of the Constant Pool.
1178:
1179: l_size := UTL_RAW.CAST_TO_BINARY_INTEGER ( DBMS_LOB.SUBSTR ( l_fce_file, 4, DBMS_LOB.GETLENGTH ( l_fce_file ) - 7 ));
1180: l_tail := DBMS_LOB.GETLENGTH ( l_fce_file ) - 8 - l_size;
1181:
1182: IF ( l_size > 0 ) THEN ConstantPool := DBMS_LOB.SUBSTR ( l_fce_file, l_size, 1 ); END IF;
1183: IF ( l_tail > 0 ) THEN CodeMemory := DBMS_LOB.SUBSTR ( l_fce_file, l_tail, l_size + 1 ); END IF;
1184:

Line 1182: IF ( l_size > 0 ) THEN ConstantPool := DBMS_LOB.SUBSTR ( l_fce_file, l_size, 1 ); END IF;

1178:
1179: l_size := UTL_RAW.CAST_TO_BINARY_INTEGER ( DBMS_LOB.SUBSTR ( l_fce_file, 4, DBMS_LOB.GETLENGTH ( l_fce_file ) - 7 ));
1180: l_tail := DBMS_LOB.GETLENGTH ( l_fce_file ) - 8 - l_size;
1181:
1182: IF ( l_size > 0 ) THEN ConstantPool := DBMS_LOB.SUBSTR ( l_fce_file, l_size, 1 ); END IF;
1183: IF ( l_tail > 0 ) THEN CodeMemory := DBMS_LOB.SUBSTR ( l_fce_file, l_tail, l_size + 1 ); END IF;
1184:
1185: this_segment_nbr := segment_nbr_svp;
1186:

Line 1183: IF ( l_tail > 0 ) THEN CodeMemory := DBMS_LOB.SUBSTR ( l_fce_file, l_tail, l_size + 1 ); END IF;

1179: l_size := UTL_RAW.CAST_TO_BINARY_INTEGER ( DBMS_LOB.SUBSTR ( l_fce_file, 4, DBMS_LOB.GETLENGTH ( l_fce_file ) - 7 ));
1180: l_tail := DBMS_LOB.GETLENGTH ( l_fce_file ) - 8 - l_size;
1181:
1182: IF ( l_size > 0 ) THEN ConstantPool := DBMS_LOB.SUBSTR ( l_fce_file, l_size, 1 ); END IF;
1183: IF ( l_tail > 0 ) THEN CodeMemory := DBMS_LOB.SUBSTR ( l_fce_file, l_tail, l_size + 1 ); END IF;
1184:
1185: this_segment_nbr := segment_nbr_svp;
1186:
1187: ELSE

Line 1197: DBMS_LOB.TRIM ( CodeMemory, code_ptr_svp );

1193:
1194: code_ptr := code_ptr_svp;
1195: pool_ptr := pool_ptr_svp;
1196:
1197: DBMS_LOB.TRIM ( CodeMemory, code_ptr_svp );
1198: DBMS_LOB.TRIM ( ConstantPool, pool_ptr_svp );
1199:
1200: CodeMemory_buffer := NULL;
1201: code_buffer_ptr := 0;

Line 1198: DBMS_LOB.TRIM ( ConstantPool, pool_ptr_svp );

1194: code_ptr := code_ptr_svp;
1195: pool_ptr := pool_ptr_svp;
1196:
1197: DBMS_LOB.TRIM ( CodeMemory, code_ptr_svp );
1198: DBMS_LOB.TRIM ( ConstantPool, pool_ptr_svp );
1199:
1200: CodeMemory_buffer := NULL;
1201: code_buffer_ptr := 0;
1202: