09-05-2008 10:49 AM
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
09-05-2008 10:59 AM
Hi,
I am not wrong, you created one module pool program and created Tcode for that.
While creating Tcode it will ask for description and type of program . You have to choose the first radiobutton(program and screen(dialog transaction) and afterwards you have to enter program name and screen number.
09-05-2008 11:18 AM
09-05-2008 11:19 AM
09-05-2008 11:31 AM
Hi,
Follow the steps below.
Go to se80 and open your program, Open the screens and double click on the screen number you will get the code for the screen. Check code is as below.
You have to define the table control both in PBO and PAI of the screen. If you want goto abapdocu Tcode and expand the tree for Screen dialogs, complex screens and table control screen with scrolling will be available.
PROCESS BEFORE OUTPUT.
MODULE mo_status_9000.
LOOP WITH CONTROL tableview_9002.
MODULE mo_export_table_control.
ENDLOOP.
MODULE mo_get_cursor.
PROCESS AFTER INPUT.
MODULE mo_export AT EXIT-COMMAND.
CHAIN.
FIELD : w_bukrs,w_butxt1,w_yy,w_mm,w_flref,w_curr,w_etd,w_exchg,
w_amt_in_fc.
MODULE mo_get_cname.
MODULE mo_yy.
MODULE mo_mm.
MODULE mo_field.
ENDCHAIN.
LOOP WITH CONTROL tableview_9002.
MODULE mo_exp_table_control.
ENDLOOP.
MODULE mo_user_command_9000.
PROCESS ON VALUE-REQUEST.
FIELD w_bukrs MODULE mo_compcode_f4help.
09-05-2008 11:38 AM
this is my screen program please correct if any problem in this
PROCESS BEFORE OUTPUT.
loop at itab with control vcontrol cursor vcontrol-current_line.
MODULE STATUS_0100.
ENDLOOP.
PROCESS AFTER INPUT.
MODULE EXIT.
LOOP AT ITAB.
MODULE USER_COMMAND_0100.
ENDLOOP.
09-05-2008 11:45 AM
hi,
Do not write the module user command 0100 in between loop and endloop.
Regards,
Sathish Reddy.
09-05-2008 11:47 AM
Hi,
I changed the code. Please try with this.
PROCESS BEFORE OUTPUT.
loop at itab with control vcontrol cursor vcontrol-current_line.
MODULE STATUS_0100.
ENDLOOP.
PROCESS AFTER INPUT.
MODULE EXIT.
LOOP AT ITAB with control vcontrol cursor vcontrol-current_line.
MODULE USER_COMMAND_0100.
ENDLOOP.
09-05-2008 12:02 PM
hi
yaar still same error is coming please help me
can u solve it by ur way please...
09-05-2008 12:07 PM
Hi,
Check the program 'demo_dynpro_tabcont_loop_at'.
Follow the same process as followed in the program
09-05-2008 12:25 PM
09-11-2008 2:33 PM