[Dialog屏幕开发] 设置方式对话框(二)

阅读该篇文章之前，可先阅读下述资料

[Dialog屏幕开发] 设置方式对话框(一)https://blog.csdn.net/Hudas/article/details/145382028上篇文章我们的屏幕已实现了如下功能

接下来我们讲解如何为Screen屏幕界面设置方式对话框

需求：点击9001屏幕的【保存】按钮，弹出对话框屏幕内容为："请确认是否修改采购订单xxxx"，如果用户点击是则调用BAPI_PO_CHANGE修改采购订单信息并提交数据库然后返回执行消息，否则退回至采购订单管理界面

创建9005屏幕

点击显示对象列表按钮，鼠标右键刚创建的对象名称ZDIALOG_GZ437，创建屏幕

填写屏幕编号9005

填写9005屏幕的简短描述以及Dynpro类型

保存并激活， 在右侧的对象列表可看到已经生成的对话框屏幕9005

在对话框屏幕9005的"元素清单"页签定义OK_CODE按钮接收变量

对9005屏幕点击按钮，进入Screen Layout Designer 

添加TEXT文本控件并为其设置属性

参照数据字典/程序字段创建屏幕元素，点击屏幕界面中的字典/程序字段窗口按钮，弹出选择窗口，点击从字典获取(Get From Dictionary)

绘制完上述屏幕元素之后，点击保存按钮，退回至程序

9001状态栏(9001_STATUS)

在INCLUDE文件ZDIALOG_GZ437_F01中添加如下代码

界面切换命令

CALL SCREEN <screen num>语句用于调用指定编号的屏幕

创建9005状态栏

鼠标右键创建的对象名称ZDIALOG_GZ437，创建GUI状态

填写"状态"以及"短文本"的相关信息，状态类型选择"对话框"

为9005_STATUS状态栏设置按钮

保存并激活， 在右侧的对象列表可看到已经生成的GUI状态9005_STATUS

在9005对话框屏幕的"逻辑流"页签下新增以下代码

在该PBO模块中的STATUS_9005编写相关代码，使用SET PF-STATUS语句设置按钮

在该PAI模块中的USER_COMMAND_9005编写相关代码

其中消息类(Z_MSG437)的内容如下所示

在INCLUDE文件ZDIALOG_GZ437_TOP中新增如下代码

在INCLUDE文件ZDIALOG_GZ437_F01中新增如下代码

保存并激活主程序，生成的屏幕页面如下所示

选择需要进行查询的采购凭证，点击"显示订单信息"按钮，会自动带出供应商，该采购凭证日期以及采购订单明细信息，选择下拉框中的选项，自动带出标签条中的相关信息，选择"交货信息"页签，更改采购订单明细中的"数量"和"库存地点"2个字段中的值，回车以后会自动更新采购订单明细中的信息数据

完成上述操作以后，点击保存按钮，会弹出采购订单管理的对话框，确认该采购订单是否需要进行更新

点击确认按钮，则修改采购订单信息并提交至数据库，并反馈更新的情况

我们可以通过事务码ME23N查看该采购订单是否已经成功进行修改