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
Showing results for 
Search instead for 
Did you mean: 
Read only

regarding table control

Former Member
0 Likes
396

Hi all,

i have an requirement that in table control when i entered the data and presses save it should save to the database(i.e. ztable) how i can achieve this.Also in table control i have created 31 fields for 31 days bcoz am working in timesheet program, how can dynamically say the days like Monday or Tuesday depends on that day fields.I have created month and year in dropdown list, when i presses save(for all triggering events) the dropdown becomes empty, i want that to be saved in the database how i can achieve this?

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
334

hi,

write this in user_command_1000 of PAI.

<b>MODULE user_command_1000 INPUT.</b>

CASE ok_code.

WHEN 'SAVE' .

IF srno IS INITIAL.

CLEAR srn.

SELECT MAX( srno ) FROM zform_track_mast INTO srn.

srn = srn + 1.

itab_mast-clnt = sy-mandt.

itab_mast-srno = srn.

itab_mast-comp_code = zform_track_mast-comp_code.

itab_mast-form_type = ifmtp-form_type.

itab_mast-form_series = form_series.

itab_mast-form_no = form_no.

itab_mast-form_date = zform_track_mast-form_date.

itab_mast-rcvd_issu = 'I'.

itab_mast-form_amt = form_amt.

INSERT INTO zform_track_mast VALUES itab_mast.

LOOP AT itab_det INTO wa_det.

IF wa_det-vend_cust_code <> ''.

MOVE-CORRESPONDING wa_det TO wa_det1.

wa_det1-clnt = sy-mandt.

wa_det1-srno = srn.

wa_det1-sub_srno = sy-tabix.

wa_det1-comp_code = zform_track_mast-comp_code.

INSERT INTO zform_track_det VALUES wa_det1.

ENDIF.

ENDLOOP.

MESSAGE s000(zmsg_fmtr) WITH srn.

ENDCASE.

<b>ENDMODULE. " USER_COMMAND_1000 INPUT</b>

1 REPLY 1
Read only

Former Member
0 Likes
335

hi,

write this in user_command_1000 of PAI.

<b>MODULE user_command_1000 INPUT.</b>

CASE ok_code.

WHEN 'SAVE' .

IF srno IS INITIAL.

CLEAR srn.

SELECT MAX( srno ) FROM zform_track_mast INTO srn.

srn = srn + 1.

itab_mast-clnt = sy-mandt.

itab_mast-srno = srn.

itab_mast-comp_code = zform_track_mast-comp_code.

itab_mast-form_type = ifmtp-form_type.

itab_mast-form_series = form_series.

itab_mast-form_no = form_no.

itab_mast-form_date = zform_track_mast-form_date.

itab_mast-rcvd_issu = 'I'.

itab_mast-form_amt = form_amt.

INSERT INTO zform_track_mast VALUES itab_mast.

LOOP AT itab_det INTO wa_det.

IF wa_det-vend_cust_code <> ''.

MOVE-CORRESPONDING wa_det TO wa_det1.

wa_det1-clnt = sy-mandt.

wa_det1-srno = srn.

wa_det1-sub_srno = sy-tabix.

wa_det1-comp_code = zform_track_mast-comp_code.

INSERT INTO zform_track_det VALUES wa_det1.

ENDIF.

ENDLOOP.

MESSAGE s000(zmsg_fmtr) WITH srn.

ENDCASE.

<b>ENDMODULE. " USER_COMMAND_1000 INPUT</b>