Community
Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for 
Search instead for 
Did you mean: 
Read only

filling the fields value in one Ztable using module pool

Former Member

‎2009 Dec 03 1:48 PM

0 Likes
1,246

HI,

I have to fill the values of all the values in a ztable using module pool.

I need to develop a screen showing all the fields of the Ztable and when the user clicks SUBMIT buttons after giving all the values in the appropriate fields .....then the required fields should get populated in the ztable.

In short i have to use SM30 like function using module pool programming.

Please help.

Thanks in Advance.

8 REPLIES 8
Read only

ThomasZloch
Active Contributor

‎2009 Dec 03 2:01 PM

0 Likes
994

And why not use SM30 for this purpose? If you guys are out of work, I have tons on my desk here

Thomas

Read only

sridhar_meesala
Active Contributor

‎2009 Dec 04 4:12 AM

0 Likes
994

HI,

Please search before you post your question. Similar questions were asked several times.

HINT: Use INSERT or MODIFY to update the database table. Press F1 on those for more information.

Thanks,

Sri.

Read only

Former Member

‎2009 Dec 09 10:46 AM

0 Likes
994

Hi,

Create a module pool screen place the required field from the ztable and a 'Submit button.

In the process 'PAI' on okcode = 'SUBMIT' write a insert query to update DB and flush all the values by the end.

this would update.

And as said please search SDN before posting there are lots of threads on this.

Enjoy !!!

Hope this helps you.

Regards,

Ranjith Nambiar

Read only

Former Member

‎2009 Dec 30 12:01 PM

0 Likes
994

Dear Verma,

Please find the below Code

this may useful for u

TABLES:ZEMPL.

TYPES: BEGIN OF TY_TAB,

ID(6) TYPE C,

NAME(15) TYPE C,

DEPT(10) TYPE C,

SALARY(10) TYPE N,

DOJ TYPE D,

END OF TY_TAB.

DATA: IT_TAB TYPE TABLE OF TY_TAB,

WA TYPE TY_TAB.

DATA: ID(6) TYPE C,

NAME(15) TYPE C,

DEPT(10) TYPE C,

SALARY(10) TYPE N,

DOJ TYPE D.

&----

*& Module USER_COMMAND_0100 INPUT

&----

  • text

----

MODULE USER_COMMAND_0100 INPUT.

CASE SY-UCOMM.

WHEN 'SUBMIT'.

WA-ID = ID.

WA-NAME = NAME.

WA-DEPT = DEPT.

WA-SALARY = SALARY.

WA-DOJ = DOJ.

APPEND WA TO IT_TAB.

INSERT ZEMPL FROM TABLE IT_TAB ACCEPTING DUPLICATE KEYS.

MESSAGE 'Record successfully created..' TYPE 'S'.

CLEAR WA.

Thanks

Surendra P

Read only

Former Member

‎2009 Dec 30 12:04 PM

0 Likes
994

Dear Verma,

Please find the below Code

this may useful for u

TABLES:ZEMPL.

TYPES: BEGIN OF TY_TAB,

ID(6) TYPE C,

NAME(15) TYPE C,

DEPT(10) TYPE C,

SALARY(10) TYPE N,

DOJ TYPE D,

END OF TY_TAB.

DATA: IT_TAB TYPE TABLE OF TY_TAB,

WA TYPE TY_TAB.

DATA: ID(6) TYPE C,

NAME(15) TYPE C,

DEPT(10) TYPE C,

SALARY(10) TYPE N,

DOJ TYPE D.

&----

*& Module USER_COMMAND_0100 INPUT

&----

  • text

----

MODULE USER_COMMAND_0100 INPUT.

CASE SY-UCOMM.

WHEN 'SUBMIT'.

WA-ID = ID.

WA-NAME = NAME.

WA-DEPT = DEPT.

WA-SALARY = SALARY.

WA-DOJ = DOJ.

APPEND WA TO IT_TAB.

INSERT ZEMPL FROM TABLE IT_TAB ACCEPTING DUPLICATE KEYS.

MESSAGE 'Record successfully created..' TYPE 'S'.

CLEAR WA.

Thanks

Surendra P

Read only

Former Member

‎2009 Dec 30 12:06 PM

0 Likes
994

Dear Verma,

Please find the below Code

this may useful for u

TABLES:ZEMPL.

TYPES: BEGIN OF TY_TAB,

ID(6) TYPE C,

NAME(15) TYPE C,

DEPT(10) TYPE C,

SALARY(10) TYPE N,

DOJ TYPE D,

END OF TY_TAB.

DATA: IT_TAB TYPE TABLE OF TY_TAB,

WA TYPE TY_TAB.

DATA: ID(6) TYPE C,

NAME(15) TYPE C,

DEPT(10) TYPE C,

SALARY(10) TYPE N,

DOJ TYPE D.

&----

*& Module USER_COMMAND_0100 INPUT

&----

  • text

----

MODULE USER_COMMAND_0100 INPUT.

CASE SY-UCOMM.

WHEN 'SUBMIT'.

WA-ID = ID.

WA-NAME = NAME.

WA-DEPT = DEPT.

WA-SALARY = SALARY.

WA-DOJ = DOJ.

APPEND WA TO IT_TAB.

INSERT ZEMPL FROM TABLE IT_TAB ACCEPTING DUPLICATE KEYS.

MESSAGE 'Record successfully created..' TYPE 'S'.

CLEAR WA.

Thanks

Surendra P

Read only

Former Member

‎2009 Dec 30 12:06 PM

0 Likes
994

Dear Verma,

Please find the below Code

this may useful for u

TABLES:ZEMPL.

TYPES: BEGIN OF TY_TAB,

ID(6) TYPE C,

NAME(15) TYPE C,

DEPT(10) TYPE C,

SALARY(10) TYPE N,

DOJ TYPE D,

END OF TY_TAB.

DATA: IT_TAB TYPE TABLE OF TY_TAB,

WA TYPE TY_TAB.

DATA: ID(6) TYPE C,

NAME(15) TYPE C,

DEPT(10) TYPE C,

SALARY(10) TYPE N,

DOJ TYPE D.

&----

*& Module USER_COMMAND_0100 INPUT

&----

  • text

----

MODULE USER_COMMAND_0100 INPUT.

CASE SY-UCOMM.

WHEN 'SUBMIT'.

WA-ID = ID.

WA-NAME = NAME.

WA-DEPT = DEPT.

WA-SALARY = SALARY.

WA-DOJ = DOJ.

APPEND WA TO IT_TAB.

INSERT ZEMPL FROM TABLE IT_TAB ACCEPTING DUPLICATE KEYS.

MESSAGE 'Record successfully created..' TYPE 'S'.

CLEAR WA.

Thanks

Surendra P

Read only

Former Member

‎2009 Dec 30 12:08 PM

0 Likes
994

Dear Verma,

Please find the below Code

this may useful for u

TABLES:ZEMPL.

TYPES: BEGIN OF TY_TAB,

ID(6) TYPE C,

NAME(15) TYPE C,

DEPT(10) TYPE C,

SALARY(10) TYPE N,

DOJ TYPE D,

END OF TY_TAB.

DATA: IT_TAB TYPE TABLE OF TY_TAB,

WA TYPE TY_TAB.

DATA: ID(6) TYPE C,

NAME(15) TYPE C,

DEPT(10) TYPE C,

SALARY(10) TYPE N,

DOJ TYPE D.

&----

*& Module USER_COMMAND_0100 INPUT

&----

  • text

----

MODULE USER_COMMAND_0100 INPUT.

CASE SY-UCOMM.

WHEN 'SUBMIT'.

WA-ID = ID.

WA-NAME = NAME.

WA-DEPT = DEPT.

WA-SALARY = SALARY.

WA-DOJ = DOJ.

APPEND WA TO IT_TAB.

INSERT ZEMPL FROM TABLE IT_TAB ACCEPTING DUPLICATE KEYS.

MESSAGE 'Record successfully created..' TYPE 'S'.

CLEAR WA.

Thanks

Surendra P