368:
369: curr_pos := 1;
370: body_len := LENGTH(body);
371: WHILE curr_pos <= body_len LOOP
372: ad_ddl.build_statement(SUBSTR(body, curr_pos, g_line_size),r);
373: curr_pos := curr_pos + g_line_size;
374: r := r + 1;
375: END LOOP;
376:
406:
407: curr_pos := 1;
408: body_len := LENGTH(body);
409: WHILE curr_pos <= body_len LOOP
410: ad_ddl.build_statement(SUBSTR(body, curr_pos, g_line_size),r);
411: curr_pos := curr_pos + g_line_size;
412: r := r + 1;
413: END LOOP;
414:
467:
468: curr_pos := 1;
469: body_len := LENGTH(body);
470: WHILE curr_pos <= body_len LOOP
471: ad_ddl.build_statement(SUBSTR(body, curr_pos, g_line_size),r);
472: curr_pos := curr_pos + g_line_size;
473: r := r + 1;
474: END LOOP;
475:
502:
503: curr_pos := 1;
504: body_len := LENGTH(body);
505: WHILE curr_pos <= body_len LOOP
506: ad_ddl.build_statement(SUBSTR(body, curr_pos, g_line_size),r);
507: curr_pos := curr_pos + g_line_size;
508: r := r + 1;
509: END LOOP;
510:
566:
567: curr_pos := 1;
568: body_len := LENGTH(body);
569: WHILE curr_pos <= body_len LOOP
570: ad_ddl.build_statement(SUBSTR(body, curr_pos, g_line_size),r);
571: curr_pos := curr_pos + g_line_size;
572: r := r + 1;
573: END LOOP;
574:
599:
600: curr_pos := 1;
601: body_len := LENGTH(body);
602: WHILE curr_pos <= body_len LOOP
603: ad_ddl.build_statement(SUBSTR(body, curr_pos, g_line_size),r);
604: curr_pos := curr_pos + g_line_size;
605: r := r + 1;
606: END LOOP;
607:
660:
661: curr_pos := 1;
662: body_len := LENGTH(body);
663: WHILE curr_pos <= body_len LOOP
664: ad_ddl.build_statement(SUBSTR(body, curr_pos, g_line_size),r);
665: curr_pos := curr_pos + g_line_size;
666: r := r + 1;
667: END LOOP;
668:
698:
699: curr_pos := 1;
700: body_len := LENGTH(body);
701: WHILE curr_pos <= body_len LOOP
702: ad_ddl.build_statement(SUBSTR(body, curr_pos, g_line_size),r);
703: curr_pos := curr_pos + g_line_size;
704: r := r + 1;
705: END LOOP;
706:
765:
766: curr_pos := 1;
767: body_len := LENGTH(body);
768: WHILE curr_pos <= body_len LOOP
769: ad_ddl.build_statement(SUBSTR(body, curr_pos, g_line_size),r);
770: curr_pos := curr_pos + g_line_size;
771: r := r + 1;
772: END LOOP;
773:
808: ';
809: curr_pos := 1;
810: body_len := LENGTH(body);
811: WHILE curr_pos <= body_len LOOP
812: ad_ddl.build_statement(SUBSTR(body, curr_pos, g_line_size),r);
813: curr_pos := curr_pos + g_line_size;
814: r := r + 1;
815: END LOOP;
816:
813: curr_pos := curr_pos + g_line_size;
814: r := r + 1;
815: END LOOP;
816:
817: ad_ddl.create_plsql_object(GCS_DYNAMIC_UTIL_PKG.g_applsys_username, 'GCS', 'GCS_DYN_EPB_DIMTR_PKG',1, r - 1, 'FALSE', err);
818:
819: -- dbms_output.put_line('Error' || AD_DDL.error_buf);
820:
821: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
815: END LOOP;
816:
817: ad_ddl.create_plsql_object(GCS_DYNAMIC_UTIL_PKG.g_applsys_username, 'GCS', 'GCS_DYN_EPB_DIMTR_PKG',1, r - 1, 'FALSE', err);
818:
819: -- dbms_output.put_line('Error' || AD_DDL.error_buf);
820:
821: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
822: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, 'GCS_BUILD_EPB_DIMTR_PKG' || '.' || 'BUILD_EPB_DIMTR_PKG',
823: GCS_UTILITY_PKG.g_module_success || 'BUILD_EPB_DIMTR_PKG' ||