Error

[Former Member]

Hi,

This is my program and iam getting error that

You cannot use an internal table as a work area.

This is my program. Plz correct me.

• T Y P E S

TYPES:

BEGIN OF TYVBAK,

VBELN TYPE VBAK-VBELN,

AUART TYPE VBAK-AUART,

AUDAT TYPE VBAK-AUDAT,

KUNNR TYPE VBAK-KUNNR,

NETWR TYPE VBAK-NETWR,

END OF TYVBAK.

• D A T A D E C L A R A T I O N S

DATA:

STVBAK TYPE TYVBAK,

ITVBAK TYPE TABLE OF TYVBAK.

• S E L E C T I O N S C R E E N

SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT001.

SELECT-OPTIONS:

SKUNNR FOR STVBAK-KUNNR.

SELECTION-SCREEN END OF BLOCK B1.

• I N I T I A L I Z A T I O N

INITIALIZATION.

• FILLING SELECT OPTIONS WITH DEFAULTS

SKUNNR-SIGN = 'I'.

SKUNNR-OPTION = 'BT'.

SKUNNR-LOW = '1'.

SKUNNR-HIGH = '4000000'.

APPEND SKUNNR.

• S T A R T O F S E L E C T I O N

START-OF-SELECTION.

FORM GETDATA.

SELECT VBELN "SALES DOCUMENT NUMBER

AUART "DOCUMENT TYPE

AUDAT "SALES DOCUMENT DATE

KUNNR "SOLD TO PARTY

NETWR "NETWORTH

FROM VBAK

INTO ITVBAK

WHERE KUNNR IN SKUNNR.

ENDFORM.

error is You cannot use an internal table as a work area.

I want to create the TEXT, with this statement.

SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT001

When i double clicked it is taking me to the program. I want to create the TEXT for the object TEXT001.

[former_member223537]

• T Y P E S

TYPES:

BEGIN OF TYVBAK,

VBELN TYPE VBAK-VBELN,

AUART TYPE VBAK-AUART,

AUDAT TYPE VBAK-AUDAT,

KUNNR TYPE VBAK-KUNNR,

NETWR TYPE VBAK-NETWR,

END OF TYVBAK.

• D A T A D E C L A R A T I O N S

DATA:

STVBAK TYPE TYVBAK,

ITVBAK TYPE <b>STANDARD</b> TABLE OF TYVBAK.

• S E L E C T I O N S C R E E N

SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT001.

SELECT-OPTIONS:

SKUNNR FOR STVBAK-KUNNR.

SELECTION-SCREEN END OF BLOCK B1.

• I N I T I A L I Z A T I O N

INITIALIZATION.

• FILLING SELECT OPTIONS WITH DEFAULTS

SKUNNR-SIGN = 'I'.

SKUNNR-OPTION = 'BT'.

SKUNNR-LOW = '1'.

SKUNNR-HIGH = '4000000'.

APPEND SKUNNR.

• S T A R T O F S E L E C T I O N

START-OF-SELECTION.

FORM GETDATA.

SELECT VBELN "SALES DOCUMENT NUMBER

AUART "DOCUMENT TYPE

AUDAT "SALES DOCUMENT DATE

KUNNR "SOLD TO PARTY

NETWR "NETWORTH

FROM VBAK

INTO <b>TABLE</b> ITVBAK

WHERE KUNNR IN SKUNNR.

ENDFORM.

[Former Member]

Hi,

This is because table ITVBAK does not have a header line. it is defined as

ITVBAK TYPE TABLE OF TYVBAK.

And in the select statement, it is trying to populate the data into the header line.For directly getting the data in table, u need to code as follows:

SELECT VBELN "SALES DOCUMENT NUMBER

AUART "DOCUMENT TYPE

AUDAT "SALES DOCUMENT DATE

KUNNR "SOLD TO PARTY

NETWR "NETWORTH

FROM VBAK

<b>INTO TABLE ITVBAK</b>

WHERE KUNNR IN SKUNNR<b></b>

Regarding the creation of TEXT, u goto SE38 --> Goto --> text Elements --> Text symbols. It will give u a table control in which write 001 in the first column and the text in the other.

Actiate it and u hv created a text.

Regards,

Himanshu

Message was edited by:

Himanshu Aggarwal

[Former Member]

HI ,

in select query u have to write into table itvbak.

SELECT VBELN "SALES DOCUMENT NUMBER

AUART "DOCUMENT TYPE

AUDAT "SALES DOCUMENT DATE

KUNNR "SOLD TO PARTY

NETWR "NETWORTH

FROM VBAK

INTO table ITVBAK

WHERE KUNNR IN SKUNNR.

thanks,

CSR.

****reward points if helpful.

[Former Member]

Hi,

here are the changes which you need to do

* T Y P E S
TYPES:
BEGIN OF TYVBAK,
VBELN TYPE VBAK-VBELN,
AUART TYPE VBAK-AUART,
AUDAT TYPE VBAK-AUDAT,
KUNNR TYPE VBAK-KUNNR,
NETWR TYPE VBAK-NETWR,
END OF TYVBAK.

* D A T A D E C L A R A T I O N S
DATA:
STVBAK TYPE TYVBAK,
ITVBAK TYPE STANDARD TABLE OF TYVBAK.  " You need to add Standard

* S E L E C T I O N S C R E E N
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT001.
SELECT-OPTIONS:
SKUNNR FOR STVBAK-KUNNR.
SELECTION-SCREEN END OF BLOCK B1.

* I N I T I A L I Z A T I O N
INITIALIZATION.

* FILLING SELECT OPTIONS WITH DEFAULTS

SKUNNR-SIGN = 'I'.
SKUNNR-OPTION = 'BT'.
SKUNNR-LOW = '1'.
SKUNNR-HIGH = '4000000'.
APPEND SKUNNR.

* S T A R T O F S E L E C T I O N

START-OF-SELECTION.
FORM GETDATA.
SELECT VBELN "SALES DOCUMENT NUMBER
AUART "DOCUMENT TYPE
AUDAT "SALES DOCUMENT DATE
KUNNR "SOLD TO PARTY
NETWR "NETWORTH
FROM VBAK
INTO ITVBAK
WHERE KUNNR IN SKUNNR.
ENDFORM.

Regards

Sudheer

[Former Member]

Hi,

Check i have modified

FORM GETDATA.

SELECT VBELN "SALES DOCUMENT NUMBER

AUART "DOCUMENT TYPE

AUDAT "SALES DOCUMENT DATE

KUNNR "SOLD TO PARTY

NETWR "NETWORTH

FROM VBAK

INTO <b>table</b> ITVBAK

WHERE KUNNR IN SKUNNR.

ENDFORM.

Reward if useful!

[Former Member]

Hi,

also plz tell me how to create the TEXT using the object TEXT001.in my program.

[Former Member]

Hi,

Plz see my updated text.

Regards,

Himanshu

[Former Member]

hi,

double click on text-001 then it will show textelements screen there write your message.

or

go to se38 screen

then menu goto-->text element->text-symbols.

write your message and activate.

thanks,

CSR.

*******reward points if helpful.

[Former Member]

Hi,

I created TEXT, still it is not getting displayed after executing.

In text elements, in text symbols

001 CUSTOMER RANGE

In slecetion texts

SKUNNR CUSTOMER NUMBER.

But these texts are not displayed in the selection screen.

Thanks

[Former Member]

Hi,

Hv u activated the text symbol as well as the Selection texts.

If so, then they shud be displayed.

U need to activate the texts and the program separately.

Regards,

Himanshu.

[Former Member]

Hello,

Dont' forget to activate the test element after creating it.

Hope this will work, I did this with your code.

Regards,

Rakesh.

[Former Member]

hi ,

if u want to create it for selection parameters or select options you have to write that message in goto->textelements->selection texts.

save it and activate u can see that message in your selection screen instead of skunnr,.

[Former Member]

Hello,

There is asimple error. Modify the code as follows

<b>Please reward if found helpfull</b>

Regards,

Rakesh.

<b>For creating text</b>

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.

<b>Change your form</b>

FORM getdata.
  SELECT vbeln "SALES DOCUMENT NUMBER
  auart "DOCUMENT TYPE
  audat "SALES DOCUMENT DATE
  kunnr "SOLD TO PARTY
  netwr "NETWORTH
  FROM vbak
  INTO TABLE itvbak
  WHERE kunnr IN skunnr.
ENDFORM.                    "GETDATA

[Former Member]

Hi,

see this code now.

TYPES:

BEGIN OF TYVBAK,

VBELN TYPE VBAK-VBELN,

AUART TYPE VBAK-AUART,

AUDAT TYPE VBAK-AUDAT,

KUNNR TYPE VBAK-KUNNR,

NETWR TYPE VBAK-NETWR,

END OF TYVBAK.

• D A T A D E C L A R A T I O N S

DATA:

STVBAK TYPE TYVBAK,

ITVBAK TYPE TABLE OF TYVBAK.

• S E L E C T I O N S C R E E N

SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT001.

SELECT-OPTIONS:

SKUNNR FOR STVBAK-KUNNR.

SELECTION-SCREEN END OF BLOCK B1.

• I N I T I A L I Z A T I O N

INITIALIZATION.

• FILLING SELECT OPTIONS WITH DEFAULTS

SKUNNR-SIGN = 'I'.

SKUNNR-OPTION = 'BT'.

SKUNNR-LOW = '1'.

SKUNNR-HIGH = '4000000'.

APPEND SKUNNR.

• S T A R T O F S E L E C T I O N

START-OF-SELECTION.

FORM GETDATA.

SELECT VBELN "SALES DOCUMENT NUMBER

AUART "DOCUMENT TYPE

AUDAT "SALES DOCUMENT DATE

KUNNR "SOLD TO PARTY

NETWR "NETWORTH

FROM VBAK

INTO <b>CORRESPONDING FIELDS OF TABLE</b> ITVBAK(this is for moving the selected contents to corresponding fields of itab)

WHERE KUNNR IN SKUNNR.

ENDFORM.

rgds,

bharat.