Skip to Content

Archived discussions are read-only. Learn more about SAP Q&A

SCREEN ERROR

dEAR FRIENDS

I HAVE DEVOLOPED A MODULE POOL PROGRAM FOR SAVING DATA IN A TABLE THROUGH TABLE CONTROL

MY TABLE CONTROL NAME IS VCONTROL

AND FOLLOWING IS MY CODING

THE CODING IS RUNNING SUCCESSFULLY BUT WHEN I ACTIVATE MY TRANSACTION FOLLOEING ERROR COMES

("FX097: INTERNAL TABLE UNDEFINED"

SCREEN NAME 'ZFEEDBACK_2'

SCREEN NUMBER 0100

THIS ERROR IS CONNECTED TO THE PROCESSING OF AN INTERNAL TABLE WITH THE FIELD OR VARIABLE ITAB AND WAS TRIGGERED WITHIN IN THE PROGRAM")

FOLLOWINGIS MY CODING

PLEASE TEL ME WHERE I WILL HAVE TO MAKE CHANGES

&----


*& Module Pool ZFEEDBACK_2

*&

&----


*&

*&

&----


PROGRAM ZFEEDBACK_2.

TABLES : ZCUSTmr1.

CONTROLS : VCONTROL TYPE TABLEVIEW USING SCREEN '0100'.

*CONTROLS CUSTOMER_ENQUARY TYPE TABLEVIEW USING SCREEN 200.

TYPES: BEGIN OF ST_ZCUSTMR1,

CUSTOMER TYPE ZCUSTMR1-CUSTOMER,

NAME TYPE ZCUSTMR1-NAME,

CITY TYPE ZCUSTMR1-CITY,

TELEPHONENO TYPE ZCUSTMR1-TELEPHONENO,

COUNTRY TYPE ZCUSTMR1-COUNTRY,

END OF ST_ZCUSTMR1.

DATA: IT_ST TYPE TABLE OF ST_ZCUSTMR1,

WA_ST TYPE ST_ZCUSTMR1,

IT_ZCUSTMR1 TYPE ZCUSTMR1,

WA_ZCUSTMR1 TYPE ZCUSTMR1,

OK_CODE LIKE SY-UCOMM.

&----


*& Module USER_COMMAND_0100 INPUT

&----


  • text

----


module USER_COMMAND_0100 input.

CASE SY-UCOMM.

*CASE OK_CODE.

WHEN 'SAVE'.

WA_ST-CUSTOMER = ZCUSTMR1-CUSTOMER.

WA_ST-NAME = ZCUSTMR1-NAME.

WA_ST-CITY = ZCUSTMR1-CITY.

WA_ST-TELEPHONENO = ZCUSTMR1-TELEPHONENO.

WA_ST-COUNTRY = ZCUSTMR1-COUNTRY.

MOVE-CORRESPONDING WA_ST TO WA_ZCUSTMR1.

INSERT INTO ZCUSTMR1 VALUES WA_ZCUSTMR1.

WHEN 'DELETE'.

WA_ST-CUSTOMER = ZCUSTMR1-CUSTOMER.

WA_ST-NAME = ZCUSTMR1-NAME.

WA_ST-CITY = ZCUSTMR1-CITY.

WA_ST-TELEPHONENO = ZCUSTMR1-TELEPHONENO.

WA_ST-COUNTRY = ZCUSTMR1-COUNTRY.

MOVE-CORRESPONDING WA_ST TO WA_ZCUSTMR1.

DELETE ZCUSTMR1 FROM WA_ZCUSTMR1.

WHEN 'MODIFY'.

WA_ST-CUSTOMER = ZCUSTMR1-CUSTOMER.

WA_ST-NAME = ZCUSTMR1-NAME.

WA_ST-CITY = ZCUSTMR1-CITY.

WA_ST-TELEPHONENO = ZCUSTMR1-TELEPHONENO.

WA_ST-COUNTRY = ZCUSTMR1-COUNTRY.

MOVE-CORRESPONDING WA_ST TO WA_ZCUSTMR1.

MODIFY ZCUSTMR1 FROM WA_ZCUSTMR1.

*ENDCASE.

ENDCASE.

ENDMODULE.

*endmodule. " USER_COMMAND_0100 INPUT

&----


*& Module STATUS_0100 OUTPUT

&----


  • text

----


module STATUS_0100 output.

SET PF-STATUS 'ZFEEDBACK_2'.

SET TITLEBAR 'ZFEEDBACK_2'.

endmodule. " STATUS_0100 OUTPUT

&----


*& Module EXIT INPUT

&----


  • text

----


module EXIT input.

IF OK_CODE = 'EXIT'.

LEAVE PROGRAM.

ENDIF.

endmodule. " EXIT INPUT

Tags:
Former Member
Not what you were looking for? View more on this topic or Ask a question