메뉴 건너뛰기

SAP 한국 커뮤니티

REPORT z12_11.

sapjoy 2012.07.30 22:36 조회 수 : 1012

REPORT  z12_11.

DATA : g_total TYPE i,
       g_cnt   TYPE i,
       g_index TYPE i.

DATA : gt_sflight TYPE TABLE OF sflight WITH HEADER LINE.

START-OF-SELECTION.
  SELECT *
  INTO CORRESPONDING FIELDS OF TABLE gt_sflight
  FROM sflight.

  DESCRIBE TABLE gt_sflight LINES g_total.

  LOOP AT gt_sflight.
    g_cnt = g_cnt + 1.
    PERFORM progress_indicator USING g_cnt g_total ' Progressing... '.
  ENDLOOP.

  WRITE 'SUCCESS'.

FORM progress_indicator USING    value(p_cur)
                                   value(p_total)
                                   value(p_text).
  DATA : lv_text(50) TYPE c,
          lv_idx(3)  TYPE n.

  lv_idx = ( p_cur / p_total ) * 100.

  CONCATENATE lv_idx ' % : ' p_text INTO lv_text.

  CALL FUNCTION
    'SAPGUI_PROGRESS_INDICATOR'
    EXPORTING
      percentage = lv_idx
      text       = lv_text
    EXCEPTIONS
      OTHERS     = 0.
ENDFORM.       " progress_indicator
번호 제목 글쓴이 날짜 조회 수
550 REPORT Z18_002 sapjoy 2007.03.05 3082
549 REPORT z18_003 sapjoy 2007.03.05 3281
548 REPORT z18_004 [1] sapjoy 2007.03.05 2348
547 REPORT z18_005 sapjoy 2007.03.06 2157
546 REPORT z18_006 sapjoy 2007.03.06 2423
545 REPORT z18_007 sapjoy 2007.03.07 2206
544 REPORT z18_008 sapjoy 2007.03.07 2359
543 REPORT z18_011 [1] sapjoy 2007.03.07 2326
542 REPORT Z15_045 sapjoy 2007.03.08 2388
541 REPORT z18_012 [1] sapjoy 2007.03.09 2404
540 REPORT z18_013 [1] sapjoy 2007.03.09 2585
539 REPORT z18_014 sapjoy 2007.03.09 2843
538 REPORT z18_017 sapjoy 2007.03.11 2672
537 REPORT z18_018 [4] sapjoy 2007.03.11 2462
536 REPORT z18_019 sapjoy 2007.03.12 2473
535 REPORT z18_035 sapjoy 2007.03.13 2450
534 REPORT z18_036 sapjoy 2007.03.13 2631
533 REPORT z18_022 sapjoy 2007.03.16 2464
532 REPORT z18_025 sapjoy 2007.03.16 2598
531 REPORT z19_001 sapjoy 2007.03.22 2551