topic Re: hide option in Application Development and Automation Discussions

hide option

Former Member — Tue, 29 Apr 2008 09:19:53 GMT

how can hide print option in a zreport or any option.

Re: hide option

Former Member — Tue, 29 Apr 2008 09:23:12 GMT

Hi,

try using custom pf status for the program.

Regards,

Aravind M

Re: hide option

Former Member — Tue, 29 Apr 2008 09:25:23 GMT

Which print option u r talking about ?

Re: hide option

p291102 — Tue, 29 Apr 2008 09:30:38 GMT

Hi,

Follow this report u can find out the usage for Hide Statements.

REPORT  YMS_INTERACTIVETEST LINE-SIZE 50 NO STANDARD PAGE HEADING.

TABLES: VBAP,KNA1,VBAK.

SELECT-OPTIONS: CUST FOR KNA1-KUNNR.

DATA: BEGIN OF ITAB OCCURS 0,
        KUNNR LIKE KNA1-KUNNR,
        NAME1 LIKE KNA1-NAME1,
        VBELN LIKE VBAK-VBELN,
        AUDAT LIKE VBAK-AUDAT,
        AUART LIKE VBAK-AUART,
        POSNR LIKE VBAP-POSNR,
        POSAR LIKE VBAP-POSAR,
      END OF ITAB.

DATA: ITAB1 LIKE ITAB OCCURS 0 WITH HEADER LINE.

INITIALIZATION.

START-OF-SELECTION.

  SELECT KNA1~KUNNR KNA1~NAME1 INTO CORRESPONDING FIELDS OF TABLE ITAB1
          FROM KNA1 WHERE KNA1~KUNNR IN CUST.

  LOOP AT ITAB1.
    WRITE:/10 ITAB1-KUNNR HOTSPOT, 30 ITAB1-NAME1.
    HIDE: ITAB1-KUNNR.
  ENDLOOP.


AT LINE-SELECTION.

  CASE SY-LSIND.
    WHEN '1'.
      SELECT KNA1~KUNNR VBAK~VBELN VBAK~AUDAT VBAK~ERDAT INTO CORRESPONDING FIELDS OF TABLE ITAB1
      FROM KNA1 INNER JOIN VBAK ON KNA1~KUNNR = VBAK~KUNNR.

      LOOP AT ITAB1.
        WRITE:/ ITAB1-VBELN HOTSPOT, ITAB1-AUDAT, ITAB1-AUART.
        HIDE: ITAB1-VBELN, ITAB1-AUDAT, ITAB1-AUART.
      ENDLOOP.

    WHEN '2'.
      SELECT VBAK~VBELN VBAP~POSNR VBAP~POSAR
      INTO CORRESPONDING FIELDS OF TABLE ITAB1 FROM VBAK INNER JOIN VBAP ON VBAK~VBELN = VBAP~VBELN.
      LOOP AT ITAB1.
        WRITE:/ ITAB1-POSNR, ITAB1-POSAR.
      ENDLOOP.
  ENDCASE.


TOP-OF-PAGE.
  WRITE:/ SY-VLINE,TEXT-001 COLOR COL_NEGATIVE.
  ULINE.

Thanks

Sankar M

Re: hide option

Former Member — Tue, 29 Apr 2008 10:01:50 GMT

hi ,

check below for ur requriment.

REPORT YMS_INTERACTIVETEST LINE-SIZE 50 NO STANDARD PAGE HEADING.

TABLES: VBAP,KNA1,VBAK.

SELECT-OPTIONS: CUST FOR KNA1-KUNNR.

DATA: BEGIN OF ITAB OCCURS 0,

KUNNR LIKE KNA1-KUNNR,

NAME1 LIKE KNA1-NAME1,

VBELN LIKE VBAK-VBELN,

AUDAT LIKE VBAK-AUDAT,

AUART LIKE VBAK-AUART,

POSNR LIKE VBAP-POSNR,

POSAR LIKE VBAP-POSAR,

END OF ITAB.

DATA: ITAB1 LIKE ITAB OCCURS 0 WITH HEADER LINE.

INITIALIZATION.

START-OF-SELECTION.

SELECT KNA1_{KUNNR KNA1}NAME1 INTO CORRESPONDING FIELDS OF TABLE ITAB1

FROM KNA1 WHERE KNA1~KUNNR IN CUST.

LOOP AT ITAB1.

WRITE:/10 ITAB1-KUNNR HOTSPOT, 30 ITAB1-NAME1.

HIDE: ITAB1-KUNNR.

ENDLOOP.

AT LINE-SELECTION.

CASE SY-LSIND.

WHEN '1'.

SELECT KNA1_{KUNNR VBAK}VBELN VBAK_{AUDAT VBAK}ERDAT INTO CORRESPONDING FIELDS OF TABLE ITAB1

FROM KNA1 INNER JOIN VBAK ON KNA1_{KUNNR = VBAK}KUNNR.

LOOP AT ITAB1.

WRITE:/ ITAB1-VBELN HOTSPOT, ITAB1-AUDAT, ITAB1-AUART.

HIDE: ITAB1-VBELN, ITAB1-AUDAT, ITAB1-AUART.

ENDLOOP.

WHEN '2'.

SELECT VBAK_{VBELN VBAP}POSNR VBAP~POSAR

INTO CORRESPONDING FIELDS OF TABLE ITAB1 FROM VBAK INNER JOIN VBAP ON VBAK_{VBELN = VBAP}VBELN.

LOOP AT ITAB1.

WRITE:/ ITAB1-POSNR, ITAB1-POSAR.

ENDLOOP.

ENDCASE.

TOP-OF-PAGE.

WRITE:/ SY-VLINE,TEXT-001 COLOR COL_NEGATIVE.

ULINE.

Regards,

kranthi