FXApp/ws_objects/l1_uo.pbl.src/l1_uo.sra

$PBExportHeader$l1_uo.sra
$PBExportComments$Generated Application Object
forward
global type l1_uo from application
end type
global transaction sqlca
global dynamicdescriptionarea sqlda
global dynamicstagingarea sqlsa
global error error
global message message
end forward

global variables
String publ_operator = "" //操作员名
String publ_userid                      //操作员id
String sys_right                        //权限串
String sys_psw                          //用户密码
String sys_cardno								 //卡号
String sys_superpsw = 'supersupersuper' //超级密码
String sys_user_storagestr              //仓库串-查询
String sys_user_storagestr_new          //仓库串-建单
String sys_user_storagestr_audit        //仓库串-审核
Long   sys_user_storageid[]             //仓库数组_查询
Long   sys_user_storageid_new[]             //仓库数组_建立
Long   sys_user_storageid_audit[]             //仓库数组_审核
Long   sys_all_storageid[]             //全部仓库数组
String sys_user_spttypestr //供应商类别串
String sys_user_gzitemstr //工资项目串
Long sys_user_spttype[] // 供应商类别数组
Long sys_user_gzitem[] // 工资项目数组
String sys_user_pluginsstr //外挂串
Long sys_user_plugins[] //外挂数组
String sys_user_wkpstr //车间串
Long sys_user_wkps[] //车间数组

String sys_user_workgroupstr //工组串
Long sys_user_workgroups[] //工组数组

String sys_user_pricetypestr
Long sys_user_pricetype[]

String sys_user_outrepstr //业务员串
String sys_user_outrep[] //业务员数组

int sys_user_knwldgencrypttype //加密级别
int sys_user_knwldgtchnlogytype //技术级别
string sys_user_KnwldgRgtStr //知识库列表权限串


String sys_shortcut //快捷方式串
String sys_areastr                      //区域串
Long   sys_areaid[]                     //区域数组
String sys_user_scstr                   //分部权限串
Long sys_user_scid[]                  //分部数组
Long sys_scid = 0                       //分部ID -1 全部[历史]
Long sys_empid = 0                      //当前操作员ID
Boolean if_hisdb = FALSE                //是否历史数据库
String sys_computer_key
String sys_user_priceliststr
Long sys_user_pricelist[]
Boolean if_idle = FALSE

String sys_user_reportstr // 模板式自定义报表串
Long sys_user_report[] // 模板式自定义报表数组


s_sys_option s_sys_opt[] //系统选项数组
s_dw_uc_col s_sys_uccol[]       //dwuc必填字段数组


Boolean sys_power_issuper = FALSE
//超级用户标志

String sys_super_name = '超级用户'
String sys_super_id = 'super'
//超级用户id

String sys_inifilename = 'ljerp_wiz.ini'
//指定系统ini文件

String sys_power_key =     '123457851239866'
string sys_power_key_new = '987654321380084'
String sys_system_id = '600001ljerpv1.0'

//版本
String sys_prg_id = '600001'
String sys_cur_version = '2.0.110423'
String sys_Allow_version = '1.0.060601'
string sys_erp_build_version = '2.0.110509'

//权限版本
String sys_pwr_version = '2011051001'

//系统信息
String sys_message_username = '有限公司'
String sys_message_title = "龙嘉L1-ERP V2"
String sys_message_report_title = "有限公司"
String sys_message_customer_tel = ""
String sys_message_customer_sit = ""
String sys_message_customer_sitcode = ""
String sys_message_customer_bank = ""
String sys_message_customer_bankname = ""
String sys_message_customer_fax = ""

String sys_message_maker = "顺德区龙嘉软件有限公司"
String sys_message_copyright_inc = "2001-04-10"
String sys_message_copyright_ine = ""
String sys_message_version = "v1"
String sys_cur_path = ''
String sys_message_copytime = "2001-04-10"
String sys_message_timeoutdate = "2001.08.01"
Date sys_begin_date = 2001-04-13

Int sys_show_bsn = 0 //0-显示业务内容 1-只显示售价管理
String sys_flashbmpname = 'flashwinpic.bmp' //开始窗口的图片名称
DateTime sys_showsaledata_mindt


//系统选项
//系统
Boolean local_retrieve_all = FALSE     //分页显示-----true:不分页,false:分页
Int sys_option_cusarea = 0             //区域限制

Int sys_option_outrep = 0 //业务员限制

Int sys_option_if_oa = 0 //单据使用审批流程

int sys_option_if_oa_saletask = 0 //销售订单使用OA审核流程
int sys_option_if_oa_saletask_fore = 0 //销售预测单使用OA审核流程
int sys_option_if_oa_buytask = 0 //材料采购订单使用OA审核流程
int sys_option_if_oa_buytask_cp = 0 //成品采购订单使用OA审核流程
int sys_option_if_oa_order_ml = 0 //生产计划使用OA审核流程
int sys_option_if_oa_order_zl = 0 //生产指令单使用OA审核流程


Int sys_option_use_msttake = 1         //系统使用应收帐模块
Int sys_option_use_mstpay = 1          //系统使用应付帐模块
Int sys_option_scid_msttake_mstpay = 0 //应收应付帐按分部查询
Int sys_option_aloweditstatus = 0      //规格颜色先定义
Int sys_option_input_days = 60         //单据录入天数限制
Int sys_option_timeout = 300           //系统注消时间
Long sys_option_dlsecends = 15         //刷卡后等待登陆时限
String sys_option_change_status = ''	//颜色文本
String sys_option_change_pcode = ''		//面料文本
String sys_option_change_woodcode = '' //材质文本
String sys_option_change_mtrlsectype = '' //自定义1
String sys_option_change_zxmtrlmode = ''  //自定义2
String sys_option_change_usermtrlmode = ''  //自定义3
Int sys_option_use_wkp = 0             //车间权限限制

Int sys_option_unit_dec = 5 //单位转换小数点
Int sys_option_cost_dec = 5            //库存成本价小数点

Decimal sys_option_cust_rate = 1 //客户最低返率
//Int sys_option_real_status = 1         //配置字段 1-status,2-woodcode,3-pcode
String sys_option_winrar_path = 'c:\program files\winrar\' //winrar路径
Int sys_option_produce_dec = 5  //生产运算小数位
Int sys_option_spttype = 0             //供应商类别限制
Int sys_option_halt = 120           //注消后自动退出系统时间

Int sys_option_iflimitprice = 0 //产品与物料新建默认收货限价
Int sys_option_inout_type = 0 //进出仓高级选项  0 - 直接产品出仓, 1 - 包件出仓 2 - 条码进出仓

Int sys_option_barcode_outwaremove_paudit = 0 //900仓库使用条码流程,仓库调拨单使用先确认扫描后审核流程
Int sys_option_barcode_outwareother_paudit = 0 //901仓库使用条码流程,其它出仓单使用先确认后审核流程
Int sys_option_barcode_inwareother_paudit = 0 //902仓库使用条码流程,其它进仓单使用先确认后审核流程
Int sys_option_barcode_inwarecp_paudit = 0 //903仓库使用条码流程,生产进仓单使用先确认后审核流程
Int sys_option_barcode_inwarebuy_paudit = 0 //904仓库使用条码流程,采购收货单使用先确认后审核流程

Int sys_option_order_mtrlware = 0 //生产计划审核增加0库存
Int sys_option_titleclick_sort = 0 //单据明细编辑状态使用右键排序 0 - 否 1 - 是
Int sys_option_warebalc_checksale = 0 //盘点结存限制日期前不能有未审发货单
Int sys_option_mtrlware_autocmp = 0 //自动计算库存包件可装数
Int sys_option_use_suliao = 0 //启用注塑功能
Int sys_option_use_machining_ll = 0//启用来料加工模块
Int sys_option_use_mtrlware_assign = 0 //系统使用库存分配模块
Int sys_option_check_mtrltype_code = 1 //物料分类保存时检查编码是否重复

Int sys_option_check_mtrl_pf = 0 //物料清单保存时检查下级清单是否已审核

Int sys_option_ouware_sale_check_nof = 0 //销售发货单按订货开单保存时检查相同未发订单
Int sys_option_inware_cp_check_nof = 0   //生产进仓单按指令开单保存时检查相同未完成指令
Int sys_option_inware_buy_check_nof = 0  //采购进仓单按订单开单保存时检查相同未完成订单
Int sys_option_inware_wfjg_check_nof = 0  //外协进仓单按订单开单保存时检查相同未完成订单
int sys_option_if_sql2008 = 0 //是否使用sql server 2008

int sys_option_emp_audit = 0 //员工资料需要审核

int sys_option_warepdb_check_inware = 0 //盘点表扫描时未扫描进仓单限制盘点

//销售
Int sys_option_if_msg = 0              //单据使用消自息确认
Int sys_option_saletask_secaudit = 0   //销售订单二级审核
Int sys_option_taskaudit_dprice = 0    //销售订单审核前必须有定价
Int sys_option_auditprint_saletask = 1 //销售订单先审核后打印
Int sys_option_m_msttake = 0           //系统使用多币种应收帐
Int sys_option_otheramt_msttake = 0    //优惠金额多币种
String sys_option_change_otheramt = ''	//销售发货单优惠金额文本
Int sys_option_saletask_addware = 0    //订单审核自动加0库存
Int sys_option_price_if_mod = 0        //销售发货单按订单时不能改单价
Int sys_option_mtrlware_limit = 0      //客户库存选择不限制
Int sys_option_taskplancode = 0        //使用客户批号库存
Int sys_option_taskplancode_auto = 1   //订单生产批号自动按订单号
Int sys_option_auditprint_sale = 0     //销售单先确认后打印
Int sys_option_auditprint_sale_yfmx = 0     //销售发货单仓审窗口先确认后打印
Int sys_option_confirmaudit_sale = 0   //销售单先确认后审核
Int sys_option_price_if_status = 0     //销售价按颜色约束
Int sys_option_autowaste = 0           //自动废弃销售单
Int sys_option_checkprice_native = 0   //销售价按本位币限价
Int sys_option_allow_edit_outrep = 0   //销售订单/发货单允许修改业务员
Int sys_option_saletask_auto_ddaudit = 0 //销售订单直接调度
Int sys_option_saletask_price_if_mod = 0        //销售订单不能改单价
Int sys_option_cusrepamt_limit = 0 //销售发货单限制信用额
Int sys_option_saletask_pzch = 0 //销售订单使用配置选择窗口
Int sys_option_saletask_fore_secaudit = 0   //销售预测单二级审核
Int sys_option_if_givebackrate = 1   //返利单按返利率返利 0 - 返利金额手动输入,1 - 按返利率
Int sys_option_sale_if_scid = 0 //销售发货单可跨分部发货 0 -否  1 - 是
Int sys_option_sale_use_planqty = 0 //销售发货单使用计划发货数 0 -否  1 - 是
Int sys_option_pricelist_ifpower = 0 //销售价格表分权限管理
Int sys_option_price_if_pz = 0 //组合配套产品销售价考虑配置1,配置2 0 - 否, 1 - 是
String sys_option_sale_mxdscrp = '' //销售订单明细备注附加说明 
String sys_option_sale_mxdscrp2 = '' //销售订单明细备注2附加说明 
Int sys_option_ddautit_pack = 0 //调度可同时建主生产计划及物料运算
Int sys_option_outware_saleout = 0 //使用销售出仓单
Int sys_option_if_pricetype = 0 //启用价格分类
Int sys_option_if_outware_price_order = 0 //发货单价格按价格指令
Int sys_option_quote_cusprice = 0 //销售报价单审核更新客户价格
Int sys_option_saletask_cusprice_his = 0 //销售订单只能选价格历史产品

Int sys_option_saletask_importnewprice = 0 //销售订单选产品默认带客户最新价 0 - 带价格表, 1 - 带最新价

Int sys_option_saletask_requiredate_null = 0 //销售订单明细交货日期默认为空值 0 - 否,1 - 是

Int sys_option_outware_sale_ifmating = 0 //销售发货单仓审时是否检查配套出仓
Int sys_option_outware_if_saleqty = 0 //销售发货单使用实际销售数

Int sys_option_if_saleout = 0 //使用发货通知单

Int sys_option_saletask_set_planprice = 0 //销售订单/预测单审核前必须设定计划价
int sys_option_reissue_secaudit = 0 //客户费用单使用二级审核

int sys_option_auditprint_reissue = 0 //客户费用单先初审后打印



//来料加工
Int sys_option_taskplancode_auto_ll = 0 //来料加工订单生产批号自动按订单号
Int sys_option_confirmaudit_sale_ll = 0   //来料加工发货单先确认后审核

//生产
Int sys_option_def_workprice = 0       //先定义工价表
Int sys_option_def_bom = 0             //先定义BOM
Int sys_option_ml_wkp = 0              //生产计划车间直接确认
Int sys_option_scll_limit = 0          //领料单允许超数量 0 - 不允许,1-允许
Int sys_option_scll_secaudit = 0       //领料单二级审核
Int sys_option_secaudit_inputcode_scll  = 0 //领料单输单号财审
Int sys_option_task_noorder  = 0       //计件单直接选产品
Int sys_option_abnormity_noorder  = 0  //异常计件单不选返工单
Int sys_option_check_scwg_taskwork_money = 1 //工作组计件单工资分配审核检查金额相符
Int sys_option_autocreate_buy = 0     //生产计划审核自动建立申购单
Int sys_option_autocreate_wfjg = 0     //生产计划审核自动建立外协申请单
Int sys_option_wkpmtrlware = 0        //核算车间库存
Int sys_option_taskwork_price_limit = 0  //计件单工价不允许编辑
Int sys_option_taskwork_procode_order = 0  //计件单按生产计划工序
Int sys_option_order_allow_mod_procode = 0 //生产计划可修改工序
Int sys_option_confirmaudit_scll = 0     //生产领料单先确认后审核
Int sys_option_bomtree_pfgroup_not_display = 1 //物料清单树,部件名称不显示
Int sys_option_bom_audituse = 1 //物料清单审核才能使用
Int sys_option_unite_order_ml = 0 //生产计划合并排产
Int sys_option_unite_order_ml_zl = 0 //生产指令单合并排产
String sys_option_order_ml_print = ',1,2,3,4,5,6,7,8,9,10,11,12' //生产计划打印选项
String sys_option_order_ml_print_zl = ',1,2,3,4,5,6,7,8,9,10,13' //生产指令单打印选项
Int sys_option_mtrlware_dscrp = 1 //库存表摘要1-无,2-按生产计划号,3-排产号,4-相关号,5-手动录入
Int sys_option_order_ml_scll_secaudit = 0 //生产计划用料二级审
Int sys_option_order_ml_mrp_use_pstatus = 0 //生产计划运算的按生产指令单半成品按计划产品配置
Int sys_option_order_ml_use_zl = 0 //系统使用指令单排产
Int sys_option_order_bh_use_yc = 0 //备货生产计划选销售预测单
Int sys_option_inwarecp_allow_edit_pz = 1 //备货生产计划进仓时可修改配置
Int sys_option_taskwork_price_if_mod = 0 //计件单工价限价 0 - 不限, 1-限
Int sys_option_bom_affirm = 0 //物料清单使用确认功能 0 - 不用, 1-用
Int sys_option_no_order_relcode = 0 //生产计划和生产指令单可以不填相关号  0 - 要填 1-可以不填
Int sys_option_scll_ch_less = 0 //领料单选择窗口使用简洁模式
Int sys_option_scll_ch_nomtrlware = 1 //领料单选计划自动列物料列出无库存纪录的信息
Int sys_option_scll_realqty = 0 //领料单开单实领数默认为零 
Int sys_option_ifovertask_cp = 1         //用超生产计划进仓
Int sys_option_autocreate_buy_cp = 1 //销售订单调度审核自动建立成品申购单
Int sys_option_orderworkgroup_time = 0 //工组交接时间精确到小时. 0 - 否 1 - 是
Int sys_option_order_zl_orderdate = 0 //车间生产指令单建立时,日期默认取运算数据. 0 - 否, 1 - 是
Int sys_dismantle_install_check = 0 //拆装单检查拆装数量
Int sys_sc_workhour_ifaction = 0 //工序工时用工序动作时间合计
Int sys_option_scll_use_planqty = 0 //领料单使用计划领料数 0 -否  1 - 是
Int sys_option_auto_wrkdate = 0 //生产计划,生产指令自动计算工组开始日期,结束日期 0-否,1-是
Int sys_option_inware_sc_ws = 0 //生产进仓单使用车间限制 0-否,1-是
Int sys_option_ifover_rqqty = 0 //生产计划运算允许修改需求数超用料数
Int sys_option_inware_mtrlcuscode = 0 //生产进仓单产品批号策略按指令单号 0-否,1-是
Int sys_option_orderrqwp_union = 0 //
Dec sys_option_pf_Sonscale_dftvalue = 0 //物料清单用料量默认值
Int sys_option_ifwkpmtrlware_wkp = 0 //车间仓库存按工组分开
Int sys_option_inware_sc_location = 0 //车间领料进仓仓位按工组名称
Int sys_option_ifuse_ordersdate = 0 //使用主生产计划日期推算
Int sys_option_ifuse_order_plan = 0 //系统使用工组派工流程
Int sys_option_order_ml_ifcg = 1 //生产计划可以排产采购来源的物料 0 - 不可以 1 - 可以
Int sys_option_order_zl_enough = 0 //足料才能排指令单
Int sys_option_order_ml_paddzl_barcode = 0 //生产计划建立指令单同时生成条码
Int sys_option_order_wkp_barcode = 0 //使用工组条码进度
Int sys_option_use_sc_date = 0 //工组进度按小时统计
Int sys_option_order_ml_add_use_wkp = 0 //生产计划新建时显示工作量
Int sys_option_workgroup_jd = 0 //使用工作中心进度 
Int sys_option_outware_scll_bu_all = 0 //生产补料单可选未开始领料的内容
Int sys_option_scll_wrkgrpid_limit = 0 //生产领料单领料按指令单工组进度工作中心限制

int sys_option_orderworkgroup_num_cp = 1 //工组完工单使用仓库审
int sys_option_order_plan_scll = 0 //工组派工单使用自动领料功能

int sys_option_barcode_cp_workgroup = 0 //成品条码先交接后进仓

int sys_option_order_ml_save_reccl = 1 //生产指令单保存时计算用料
int sys_option_order_ml_cpfp_noreltask = 0 //生产进仓库存分配时不考虑计划相关订单,只考相同配置的订单

int sys_option_order_ml_secaudit = 0 //生产计划使用二级审核
int sys_option_order_ml_zl_secaudit = 0 //生产指令单使用二级审核

//注塑
Int sys_option_skl_overscll = 0 //是否允许水口料超领料数入库 0 - 不允许,1-允许且无限制, 2- 允许但按比例限制
Decimal sys_option_management_cost = 0 //月设备总管理费
Decimal sys_option_ect_price = 0 //电费单价
Decimal sys_option_skl_rate = 0.7 //水口料折价

Decimal sys_option_machine_value = 0 //设备总价值
Decimal sys_option_pipe = 0 // 管类计算参数
Decimal sys_option_board = 0 // 板类计算参数
Decimal sys_option_line = 0 // 线类计算参数

Int sys_option_quote_accont = 0 //销售报价单使用塑料报价计算模式
Decimal sys_option_skl_overscll_rate = 0.0 //水口料超计划回收比例


//采购
Int sys_option_buyprice_ifbj = 0      //收货按报价
Int sys_option_auditprint = 1         //收货单先审核后打印
Int sys_option_mustprint = 1          //单据逐单清除
Int sys_option_ifovertask = 1         //用超订货收货
String sys_option_change_otheramt_buy = '' //采购收货单优惠金额文本

Int sys_option_wfjg_out_pay = 0 //外加工出仓单默认记帐
Int sys_option_secaudit_inputcode  = 0//收货单输单号财审
Int sys_option_buyprice_buytask_notlimit = 0      //采购订单不限制价格
Int sys_option_storage_buy_limit = 0 //收货单仓库严格按订单
Int sys_option_request_cl_secaudit = 0   //材料申购单二级审核
Int sys_option_request_cp_secaudit = 0 //成品申购单二级审核
Int sys_option_buytask_cl_secaudit = 0 //材料采购订单二级审核
Int sys_option_buytask_cp_secaudit = 0 //成品采购订单二级审核
Int sys_option_request_wfjg_secaudit = 0 //外协申请单二级审核
Int sys_option_buytask_spt = 0 //采购订单供应商严格按申购单
Int sys_option_requestbuy_hz = 0 //申购单汇总采购
Int sys_option_check_buyin = 0 //采购先质检后进仓
Int sys_option_request_buy_ifunit = 0 //申购使用默认采购单位

Int sys_option_buy_cp_ifzj = 1 //成品采购可以采购自制来源物料 0 - 否 1 - 是

Int sys_option_buy_sptprice_sec = 0 //采购收货单财审更新供应商最新价
Int sys_option_buytaskmx_storageid_limit = 0 //采购订单选申购单时限制修改仓库

Int sys_option_buy_zero = 0 //采购收货单允许保存零数量

Int sys_option_sptrate = 0 //使用供应商分配比例 
Int sys_option_inware_buy_not_cust = 0 //成品采购订单收货时不考虑客户

int sys_option_reissue_spt_secaudit = 0 //供应商费用单使用二级审核


//外协
Int sys_option_2unit = 0 //外协双单位核算
Int sys_option_wfjg_outmx = 0 //外协订单,收货单必须有外协商库存明细 0-不限,1-限
Int sys_option_autocreate_outware = 0 //外协订单审核自动生成仓库外协发出单 
Int sys_option_wfjgware_nocost = 0 //外协商库存结存不核算金额 0 - 核算 1-不核算
Int sys_option_2unit_ch = 1 //外协双单位使用物料定义辅助单位. 1 - 是. 0-选择单位定义资料
Int sys_option_requestwfjg_hz = 0 //外协申请单汇总外协
Int sys_option_wfjg_spt = 0 //外协订单供应商严格按外协申请单
Int sys_option_check_wfjgin = 0 //外协选质检后进仓

Int sys_option_wfjg_sptprice_sec = 0 //外协收货单财审更新供应商最新价

Int sys_option_wfjg_zero = 0 //外协收货单允许保存零数量


//财务
Int sys_option_msttake_inputdate = 0 //应收对数手动录入对数日期
Int sys_option_mstpay_inputdate = 0 //应付对数手动录入对数日期
Int sys_option_msttake_saletask = 0 //应收帐按订单
Int sys_option_msttake_cusarea = 0  //应收帐区域限制
Int sys_option_msttake_takeamt_secaudit = 0 //客户收款单使用二级审核

Int sys_option_cusamt_sendsms = 0 //客户收款单审核后发送短信


//工资
Int sys_option_taskwork_not_affirm = 0 // 计件单无需确认  0 - 要确认 1-不用确认
Int sys_option_taskwork2_noorder = 1 //月分配计件单可以不选计划 0 - 否 1 - 是 
Int sys_option_taskwork_day_noorder = 1 //日分配计件单可以不选计划 0 - 否 1 - 是 
Int sys_option_taskwork_person_noorder = 1 //个人产品计件单可以不选计划 0 - 否 1 - 是 

Int sys_option_if_taskwork_emp_rule = 0 //个人产品计件单使用默认员工规则 0 -否 1 - 是

Int sys_option_if_taskwork_acmpqty = 0 //计件单选生产计划时按已进仓数限制

////////


Transaction mainw_sqlca,id_sqlca

//s_sys_tntblinfo s_tntblinfo[600] //系统数据表信息
//
//dw2xls变量
String   gs_path

//日期控件　
Date id_date_selected

//主界面树
datastore sys_ds_funcinfo
datastore sys_ds_maininfo

window w_curwin

String xltpath

//考核机
Long sys_wage
Long sys_port
Long sys_mac = 0

//OA
s_oa_flow_settype s_oaflow_settype[100]
s_oa_flow s_oaflow_def[100]

//file
Transaction sys_fileDB_sqlca                     //文件附件数据库连接
String sys_user_class_edit_str                   //附件编辑权限串
String sys_user_class_view_str                   //附件查看权限串
String ins_fjtemppath = 'fjtemp'                 //附件下载路径

//email
Transaction sys_email_sqlca

//xls bill
String sys_user_xls_print_str                   //xls单据打印 权限串 '0' 则全部允许
String sys_user_xls_send_str                    //xls单据 发送 权限串 '0' 则全部允许
Int    sys_option_xls_ifuse_passwd = 1                 //0，随机密码；1,用sys_option_xls_user_passwd设置的密码
String sys_option_xls_user_passwd = ''              //xls输出的加密密码 
Int    sys_option_xls_lock = 0                      //xls输出是否锁定,0-锁,1-不锁

//window
s_sys_win s_sys_win_open[]

//订餐
//s_meal_time sys_meal_time_now
Boolean sys_autoapp_restart_flag = FALSE
String sys_clock_pwd = 'ffffffffffff'
String sys_clock_CtrlWord = 'FF078069'
String sys_kq_exportfilepath = 'exportkqmx'

//公共变量(密码)结构
//s_sys_password s_sys_pass

String ins_compname = '' //计算机名
String  sys_right_rpt  = '0'						//自定义单据打印格式权限串

//WinSock   ws
//uo_Socket_Client   uo_Client
String sys_DBMS //= ProfileString (sys_inifilename, "database", "dbms",       "")
String sys_ServerName //= ProfileString (sys_inifilename, "database", "servername", "")
String sys_userid //= ProfileString (sys_inifilename, "database", "userid",     "")
String sys_dbpass //= ProfileString (sys_inifilename, "database", "dbpass",     "")//加密的
String sys_DataBase //= ProfileString (sys_inifilename, "database", "database",   "")
String sys_LoginID //= ProfileString (sys_inifilename, "database", "logid",      "")
String sys_LoginPwd //= ProfileString (sys_inifilename, "database", "LogPassWord", "")//加密的
String sys_dbparm //= ProfileString (sys_inifilename, "database", "dbparm",     "")//加密的

String sys_help_chm = '龙嘉L1-ERP帮助.chm'


Boolean sys_login = FALSE //标识是否登陆系统;

///////////////////////////////////////////////////
Integer sys_HeartBeatSec = 240 //心跳时间(要结合w_ws的timer的时间使用)
Integer sys_Status = 0 //系统使用状态 0使用中 1暂停中(登陆窗口锁定) //w_sys_dl_new

//uo_ljws_cmd sys_wsc
//s_msgFrame sys_buf_s_msgFrame
Boolean sys_buf_new = FALSE
Integer sys_retritime = 20

Long sys_maxconnect = 10
Long sys_listenport = 7896
Long sys_maxframe_size = 4000 //数据包大小上限



Integer sys_db_spid = 0 //当前连接数据库spid

//s_sys_billname s_sys_bill[]

Int sys_if_register = 1
String sys_option_cmpl_status_qty = '' //属性计算关键字


Int sys_option_order_ml_printnum = 0 //生产计划打印次数

String sys_log_xml = 'l1_log.xml' //更新日志

String sys_pwrstr,sys_optionstr

string sys_msg_pow = ''

long sys_project = 0 // 0-L1 1-企精灵


long sys_version = 0 //102001 标准版;  102002 企业版
int sys_user_grade = 3 //用户级别

int sys_ifreg //0 未注册; 1 已注册
int sys_ifdog //0 无狗; 1 有狗

int sys_ifnewserver

end variables
global type l1_uo from application
string appname = "l1_uo"
end type
global l1_uo l1_uo

on l1_uo.create
appname="l1_uo"
message=create message
sqlca=create transaction
sqlda=create dynamicdescriptionarea
sqlsa=create dynamicstagingarea
error=create error
end on

on l1_uo.destroy
destroy(sqlca)
destroy(sqlda)
destroy(sqlsa)
destroy(error)
destroy(message)
end on