Application Terminated错误
Error:Object file m_anal is out of date,must beconverted to current version at line 2 in create event of object w_main
提示以上的错误!!
下面是open代码:
///***************************************
//**'查初始化文件并设置全局变量__96/11/7'
//**
//****************************************/
string ls_cmd,ls_sys
int li_pos
ls_cmd=commandline
li_pos=pos(ls_cmd,'sys=')
gs_sysname='s_gds'//商品流转
gi_defmenu=1
gs_inifile='beyond.ini'
if fl_file_exists('',gs_inifile)=-1 then
halt
end if
if fl_connect_trans(gs_inifile,'sqlca',sqlca)=-1 then
halt
end if
gt_cfg=sqlca
if afs_init_global()=-1 then
halt
end if
datetime ldt_dt
//select getdate() into :ldt_dt from tb_mktinfo;
//if afs_chk_sql_state( gt_cfg,'获取系统时间' )<>-1 then
// fs_set_sys_time(ldt_dt)
//end if
open(w_main)
//bill change 99-9-6
if isnull(li_pos) or li_pos=0 then
// gs_sysname='s_anal'//促销管理
// gs_sysname='s_attract'//促销管理
// gs_sysname='employee'//人事管理
// gs_sysname='s_sales'//销售
// gs_sysname='s_system'//系统维护
// gs_sysname='gds_flow'//商品流转
// gs_sysname='s_bill'//商品流转
gs_sysname='s_gds'//商品流转
// gs_sysname='s_test'//测试
// gs_sysname='s_init'//测试
// gs_sysname='s_cust'//顾客查询
// gs_sysname='s_outer_card'//外部磁卡接口
else
messagebox('bb','bb')
ls_sys=trim(mid(ls_cmd,li_pos+4))
li_pos=pos(ls_cmd,' ')
if isnull(li_pos) or li_pos=0 then
gs_sysname=ls_sys
else
gs_sysname=left(ls_sys,li_pos - 1)
end if
end if
gi_defmenu=1
gs_inifile='beyond.ini'
if fl_file_exists('',gs_inifile)=-1 then
halt
end if
//gt_cfg=create transaction
//
//if fl_connect_trans(gs_inifile,'cfg_tran',gt_cfg)=-1 then
// halt
//end if
if fl_connect_trans(gs_inifile,'sqlca',sqlca)=-1 then
halt
end if
gt_cfg=sqlca
if afs_init_global()=-1 then
halt
end if