11-22-2007 12:49 PM
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?
11-22-2007 12:51 PM
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>
11-22-2007 12:51 PM
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>