如何用粘土做手雷弹:这是什么意思?怎样修改?急!!!

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _1u40sxk1x OF _MSYSMENU PROMPT "员工信息维护" COLOR SCHEME 3
DEFINE PAD _1u40sxk1y OF _MSYSMENU PROMPT "查询" COLOR SCHEME 3
DEFINE PAD _1u40sxk1z OF _MSYSMENU PROMPT "统计" COLOR SCHEME 3
DEFINE PAD _1u40sxk20 OF _MSYSMENU PROMPT "报表" COLOR SCHEME 3
DEFINE PAD _1u40sxk21 OF _MSYSMENU PROMPT "退出" COLOR SCHEME 3
ON SELECTION PAD _1u40sxk1x OF _MSYSMENU do form ygxxwh
ON SELECTION PAD _1u40sxk1y OF _MSYSMENU do form cx
ON SELECTION PAD _1u40sxk1z OF _MSYSMENU do form tjbm
ON PAD _1u40sxk20 OF _MSYSMENU ACTIVATE POPUP 报表
ON SELECTION PAD _1u40sxk21 OF _MSYSMENU ;
DO _1u40sxk22 ;
IN LOCFILE("ZCD" ,"MPX;MPR|FXP;PRG" ,"WHERE is ZCD?")

DEFINE POPUP 报表 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 报表 PROMPT "员工信息卡片"
DEFINE BAR 2 OF 报表 PROMPT "花名册"
ON SELECTION BAR 1 OF 报表 do form ygxxkp
ON SELECTION BAR 2 OF 报表 do form hmc

* *********************************************************
* *
* * _1U40SXK22 ON SELECTION PAD
* *
* * Procedure Origin:
* *
* * From Menu: ZCD.MPR, Record: 10
* * Called By: ON SELECTION PAD
* * Prompt: 退出
* * Snippet: 1
* *
* *********************************************************
*
PROCEDURE _1u40sxk22
close all
modify window screen
set sysmenu to default
activate window command

找不到parameter语句!