c1=30
c2=60
@6,41 say "編輯職工檔案數據"
@9,85 say 照片
@row(),c1 say"編   號:  " get 編號
@row()+2,c1 say"姓   名:  " get 姓名
@row()+2,c1 say"性   別:  " get 性別
@row()+2,c1 say"出身日期:  " get 出生日期
@row()+2,c1 say"工作日期:  " get 工作日期
@9,c2 say"部    門:  " get 部門
@row()+2,c2 say"崗   位:  " get 崗位
@row()+2,c2 say"基本工資:  " get 基本工資
@row()+2,c2 say"婚   否:  " get 婚否
@row()+2,c2 say"獎   勵:  " get 獎勵
read 
return