topic Re: Sy-Lsind in Application Development and Automation Discussions

Sy-Lsind

Former Member — Thu, 16 Aug 2007 10:18:47 GMT

Hi,

iam executing the following program.

TYPES:

BEGIN OF TY_KNA1,

KUNNR TYPE KNA1-KUNNR,

LAND1 TYPE KNA1-LAND1,

NAME1 TYPE KNA1-NAME1,

ORT01 TYPE KNA1-ORT01,

END OF TY_KNA1,

BEGIN OF TY_VBAK,

VBELN TYPE VBAK-VBELN,

AUDAT TYPE VBAK-AUDAT,

AUART TYPE VBAK-AUART,

NETWR TYPE VBAK-NETWR,

END OF TY_VBAK,

BEGIN OF TY_VBAP,

POSNR TYPE VBAP-POSNR,

MATNR TYPE VBAP-MATNR,

ARKTX TYPE VBAP-ARKTX,

NETPR TYPE VBAP-NETPR,

NETWR TYPE VBAP-NETWR,

END OF TY_VBAP.

DATA:

ST_KNA1 TYPE TY_KNA1,

IT_KNA1 TYPE TABLE OF TY_KNA1,

ST_VBAK TYPE TY_VBAK,

IT_VBAK TYPE TABLE OF TY_VBAK,

ST_VBAP TYPE TY_VBAP,

IT_VBAP TYPE TABLE OF TY_VBAP.

SELECT-OPTIONS:

SKUNNR FOR ST_KNA1-KUNNR.

START-OF-SELECTION.

PERFORM GETCUST_DATA.

IF IT_KNA1 IS NOT INITIAL.

LOOP AT IT_KNA1 INTO ST_KNA1.

WRITE:/ ST_KNA1-KUNNR,ST_KNA1-LAND1,ST_KNA1-NAME1,ST_KNA1-ORT01.

ENDLOOP.

ENDIF.

TOP-OF-PAGE.

WRITE:/1'CUSTOMER NO',12'CUSTOMER NAME',42'CITY',62'COUNTRY'.

AT LINE-SELECTION.

CASE SY-LSIND.

WHEN 1.

WRITE:/ 'READY TO DISPLAY SALES DETAILS'.

ENDCASE.

Here when 1 . I have to get the above message.

Else i want to write the statement, no sales details.

how to write that else condition here.

Re: Sy-Lsind

former_member188827 — Thu, 16 Aug 2007 10:20:54 GMT

CASE SY-LSIND.

WHEN 1.

WRITE:/ 'READY TO DISPLAY SALES DETAILS'.

when others.

write:/ 'no sales details'.

ENDCASE.

reward points if it helps

Re: Sy-Lsind

former_member194669 — Thu, 16 Aug 2007 10:21:36 GMT

Hi,


AT LINE-SELECTION.

IF SY-LSIND EQ 1.
WRITE:/ 'READY TO DISPLAY SALES DETAILS'.
ELSE.
  WRITE :/ 'XXXXXXXXXXXXXXX'.
ENDIF.

ArS

Re: Sy-Lsind

Former Member — Thu, 16 Aug 2007 10:22:13 GMT

Hi Rams

AT LINE-SELECTION.

CASE SY-LSIND.

WHEN 1.

WRITE:/ 'READY TO DISPLAY SALES DETAILS'.

when others.

write:/ ' no sales order'.

ENDCASE.

reward points to all helpful answers

kiran.M

Re: Sy-Lsind

Former Member — Thu, 16 Aug 2007 10:22:16 GMT

Use following code :

CASE SY-LSIND.

WHEN 1.

WRITE:/ 'READY TO DISPLAY SALES DETAILS'.

WHIN 2.

WRITE:/ 'NO SALES DETAILS'.

ENDCASE.

Reward points if helpful.

Regards.

Srikanta Gope

Re: Sy-Lsind

Former Member — Thu, 16 Aug 2007 10:22:24 GMT

HI,

CASE SY-LSIND.

WHEN 1.

WRITE:/ 'READY TO DISPLAY SALES DETAILS'.

WHEN OTHERS.

Write:/ 'no sales details'.

ENDCASE.

Re: Sy-Lsind

Former Member — Thu, 16 Aug 2007 10:22:25 GMT

Give like this.

Case sy-lsind.

when others.

write:/ 'No Sales Details'.

endcase.

Here when sy-lsind is not equal to 1 it will display the above write statement.

Regards

Haritha.

Re: Sy-Lsind

former_member404244 — Thu, 16 Aug 2007 10:22:48 GMT

hi,

write

when others.

write:/ 'no sales details'.

regards,

nagaraj

Re: Sy-Lsind

Former Member — Thu, 16 Aug 2007 10:23:03 GMT

CASE SY-LSIND.

WHEN 1.

WRITE:/ 'READY TO DISPLAY SALES DETAILS'.

when Others:

Write:/ 'No Sales details'.

ENDCASE.

it would be better if you use..if else here..

if sy-lsind = '1'.

WRITE:/ 'READY TO DISPLAY SALES DETAILS'.

else.

Write:/ 'No Sales details'.

endif.

Regards

Suruchi

Re: Sy-Lsind

varma_narayana — Thu, 16 Aug 2007 10:25:12 GMT

Hi..

This is the code .. check the Changes in BOLD

TYPES:

BEGIN OF TY_KNA1,

KUNNR TYPE KNA1-KUNNR,

LAND1 TYPE KNA1-LAND1,

NAME1 TYPE KNA1-NAME1,

ORT01 TYPE KNA1-ORT01,

END OF TY_KNA1,

BEGIN OF TY_VBAK,

VBELN TYPE VBAK-VBELN,

AUDAT TYPE VBAK-AUDAT,

AUART TYPE VBAK-AUART,

NETWR TYPE VBAK-NETWR,

END OF TY_VBAK,

BEGIN OF TY_VBAP,

POSNR TYPE VBAP-POSNR,

MATNR TYPE VBAP-MATNR,

ARKTX TYPE VBAP-ARKTX,

NETPR TYPE VBAP-NETPR,

NETWR TYPE VBAP-NETWR,

END OF TY_VBAP.

DATA:

ST_KNA1 TYPE TY_KNA1,

IT_KNA1 TYPE TABLE OF TY_KNA1,

ST_VBAK TYPE TY_VBAK,

IT_VBAK TYPE TABLE OF TY_VBAK,

ST_VBAP TYPE TY_VBAP,

IT_VBAP TYPE TABLE OF TY_VBAP.

SELECT-OPTIONS:

SKUNNR FOR ST_KNA1-KUNNR.

START-OF-SELECTION.

PERFORM GETCUST_DATA.

IF IT_KNA1 IS NOT INITIAL.

LOOP AT IT_KNA1 INTO ST_KNA1.

WRITE:/ ST_KNA1-KUNNR,

ST_KNA1-LAND1,

ST_KNA1-NAME1,

ST_KNA1-ORT01.

HIDE ST_KNA1-KUNNR.

ENDLOOP.

CLEAR: ST_KNA1.

ENDIF.

TOP-OF-PAGE.

WRITE:/1'CUSTOMER NO',12'CUSTOMER NAME',42'CITY',62'COUNTRY'.

AT LINE-SELECTION.

CASE SY-LSIND.

WHEN 1.

IF ST_KNA1-KUNNR IS NOT INITIAL.

SELECT VBELN AUDAT AUART NETWR FROM VBAK

INTO TABLE IT_VBAK

WHERE KUNNR = ST_KNA1-KUNNR.

IF SY-SUBRC = 0.

WRITE:/ 'READY TO DISPLAY SALES DETAILS'.

ELSE.

WRITE:/ 'NO SALES DATA FOUND'.

ENDIF.

ENDCASE.

Reward if Helpful

Re: Sy-Lsind

Former Member — Thu, 16 Aug 2007 10:56:00 GMT

if SY-LSIND eq 1.

WRITE:/ 'READY TO DISPLAY SALES DETAILS'.

else.

write:/ 'No data to display'.

Endif.

Reward points if useful.

Get back in case of query....