create_copy.h

本文介绍了Windows应用程序中消息处理函数WndProc及对话框过程函数About的声明方式,并展示了资源标识符的定义方法,包括退出命令IDM_EXIT、测试命令IDM_TEST及关于对话框命令IDM_ABOUT。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

  name="google_ads_frame" marginwidth="0" marginheight="0" src="http://pagead2.googlesyndication.com/pagead/ads?client=ca-pub-5572165936844014&dt=1194442938015&lmt=1194190197&format=336x280_as&output=html&correlator=1194442937843&url=file%3A%2F%2F%2FC%3A%2FDocuments%2520and%2520Settings%2Flhh1%2F%E6%A1%8C%E9%9D%A2%2FCLanguage.htm&color_bg=FFFFFF&color_text=000000&color_link=000000&color_url=FFFFFF&color_border=FFFFFF&ad_type=text&ga_vid=583001034.1194442938&ga_sid=1194442938&ga_hid=1942779085&flash=9&u_h=768&u_w=1024&u_ah=740&u_aw=1024&u_cd=32&u_tz=480&u_java=true" frameborder="0" width="336" scrolling="no" height="280" allowtransparency="allowtransparency"> #define IDM_EXIT           100
#define IDM_TEST           200
#define IDM_ABOUT          301

LRESULT CALLBACK WndProc  (HWND, UINT, WPARAM, LPARAM);
LRESULT CALLBACK About    (HWND, UINT, WPARAM, LPARAM);

REPORT zfind_edit_update. TABLES: zmard_copy. DATA: ok_code LIKE sy-ucomm, save_ok LIKE sy-ucomm, g_container TYPE scrfname VALUE 'ALV_CONTAINER', g_grid TYPE REF TO cl_gui_alv_grid, g_custom_container TYPE REF TO cl_gui_custom_container, gs_layout TYPE lvc_s_layo, gt_outtab TYPE TABLE OF zmard_copy, gt_original TYPE TABLE OF zmard_copy. " 用于保存原始数据副本 " 删除选择屏幕定义 *SELECTION-SCREEN BEGIN OF SCREEN 100 AS SUBSCREEN. *SELECTION-SCREEN END OF SCREEN 100. " 直接调用屏幕100 CALL SCREEN 100 STARTING AT 1 1. MODULE pbo OUTPUT. SET PF-STATUS 'MAIN100' EXCLUDING ''. SET TITLEBAR 'MAIN100'. IF g_custom_container IS INITIAL. CREATE OBJECT g_custom_container EXPORTING container_name = g_container. CREATE OBJECT g_grid EXPORTING i_parent = g_custom_container. gs_layout-edit = 'X'. " 启用编辑模式 gs_layout-sel_mode = 'A'. " 允许选择行 SELECT * FROM zmard_copy INTO TABLE gt_outtab UP TO 1000 ROWS. gt_original = gt_outtab. " 保存原始数据副本 CALL METHOD g_grid->set_table_for_first_display EXPORTING i_structure_name = 'zmard_copy' is_layout = gs_layout CHANGING it_outtab = gt_outtab. CALL METHOD g_grid->set_ready_for_input EXPORTING i_ready_for_input = 1. ENDIF. ENDMODULE. MODULE pai INPUT. save_ok = ok_code. CLEAR ok_code. CASE save_ok. WHEN 'EXIT'. LEAVE PROGRAM. WHEN 'SWITCH'. PERFORM switch_edit_mode. WHEN 'SAVE'. " 新增保存按钮处理 PERFORM save_data. ENDCASE. ENDMODULE. FORM switch_edit_mode. IF g_grid->is_ready_for_input( ) EQ 0. CALL METHOD g_grid->set_ready_for_input( 1 ). ELSE. CALL METHOD g_grid->set_ready_for_input( 0 ). ENDIF. ENDFORM. FORM save_data. DATA: lv_tabix TYPE sy-tabix. " 确保界面数据同步到内表 CALL METHOD g_grid->check_changed_data. " 比较当前数据与原始数据 LOOP AT gt_outtab ASSIGNING FIELD-SYMBOL(<fs_line>). lv_tabix = sy-tabix. " 检查当前行是否有修改 READ TABLE gt_original INDEX lv_tabix ASSIGNING FIELD-SYMBOL(<fs_orig>). IF <fs_line> <> <fs_orig>. " 更新数据库 UPDATE zmard_copy FROM <fs_line>. IF sy-subrc = 0. " 更新原始数据副本 <fs_orig> = <fs_line>. ELSE. MESSAGE ID sy-msgid TYPE 'E' NUMBER sy-msgno WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4. ENDIF. ENDIF. ENDLOOP. COMMIT WORK AND WAIT. IF sy-subrc = 0. MESSAGE '数据保存成功' TYPE 'S'. " 刷新ALV显示 CALL METHOD g_grid->refresh_table_display. ENDIF. ENDFORM. 基于此代码,增加功能:默认状态下禁止编辑,编辑状态下只有lgpbe可以编辑,其他字段(mandt,matnr,werks,lgort)均为主键且不可编辑
最新发布
08-06
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值