将父窗口的日期型值传给子窗口作为变量,该怎么处理

将父窗口的日期型值传给子窗口作为变量
在父窗口中有个em_cksj 可编辑 
如何将其值传到子窗口的open事件中  作为一个变量使用

//把此窗口的名字作为参数传给选货窗口
openwithparm(w_select_goods_fhqd,trim(parent.classname()))
------解决方案--------------------
创建结构体

global type str_a  from structure
string ls_classname
datetime ldt_cksj
end type

父窗口按钮事件：
str_a  r
r.ls_classname = trim(parent.classname())
r.ldt_cksj = datetime(em_cksj.text)
openwithparm(w_select_goods_fhqd,r)

子窗口open事件
str_a  s
s = Message.PowerObjectParm