JackQu的程序员博客

欢迎来的我Blog.这里记录工作学习的点滴,愿与大家分享。欢迎大家共同交流 。

导航

2008年12月19日 #

删除业务判断

摘要: [代码] 阅读全文

posted @ 2008-12-19 16:16 Qcj 阅读(178) 评论(0) 推荐(0) 编辑

取一个文本的第二、三行

摘要: [代码] 阅读全文

posted @ 2008-12-19 16:14 Qcj 阅读(285) 评论(0) 推荐(0) 编辑

检索条件时间默认 当月第一天和最后一天

摘要: [代码] 阅读全文

posted @ 2008-12-19 16:11 Qcj 阅读(311) 评论(0) 推荐(0) 编辑

显示部门下的所有员工

摘要: Code Code highlighting produced by Actipro CodeHighlighter (freeware) http://www.CodeHighlighter.com/ -->ProcedureShowDeptUsers; vars,aDept:String; aSqlQuery:TSqlQuery; begin s:='';... 阅读全文

posted @ 2008-12-19 16:09 Qcj 阅读(359) 评论(0) 推荐(0) 编辑

获得当前活动的Actid

摘要: Code Code highlighting produced by Actipro CodeHighlighter (freeware) http://www.CodeHighlighter.com/ -->varFWf:TWorkFlowPackage; FWf:=GetCurrentWorkFlowPackage; FActid:=FWf.Activityid; 阅读全文

posted @ 2008-12-19 16:08 Qcj 阅读(515) 评论(0) 推荐(0) 编辑

获取系统常量

摘要: Code Code highlighting produced by Actipro CodeHighlighter (freeware) http://www.CodeHighlighter.com/ -->表SYSPARAMS字段PTYPE=SYSCONSTS Pdesc=GetSysConst('PName','默认') 例: 1)functionGetAccBills... 阅读全文

posted @ 2008-12-19 16:05 Qcj 阅读(273) 评论(0) 推荐(0) 编辑

格式化字符串

摘要: FormatFloat('0.00;-0.00;0','') Code 阅读全文

posted @ 2008-12-19 16:03 Qcj 阅读(222) 评论(0) 推荐(0) 编辑

创建新业务实例 (非请勿入)

摘要: Code Code highlighting produced by Actipro CodeHighlighter (freeware) http://www.CodeHighlighter.com/ -->NewEntityID:=GetNewEntityID('表名'); NewBillNo:=GetBillNo(EntityID,Actid,'单据类型',0); AMould... 阅读全文

posted @ 2008-12-19 15:59 Qcj 阅读(269) 评论(0) 推荐(0) 编辑

错误 Error

摘要: Code Code highlighting produced by Actipro CodeHighlighter (freeware) http://www.CodeHighlighter.com/ -->try except showmessage(ExceptationParam) end 阅读全文

posted @ 2008-12-19 15:55 Qcj 阅读(250) 评论(1) 推荐(0) 编辑

判断字段值已经存在

摘要: Code Code highlighting produced by Actipro CodeHighlighter (freeware) http://www.CodeHighlighter.com/ -->例:MBLNO procedureMblnoChange(Sender:Tfield); varaSQLQuery:TSQLQuery; aMblno:Str... 阅读全文

posted @ 2008-12-19 15:54 Qcj 阅读(552) 评论(0) 推荐(0) 编辑

获取当前供应商的联系人信息

摘要: javascript:WebForm_DoPostBackWithOptions(new WebForm_PostBackOptions("Editor$Edit$lkbPost", "", true, "", "", false, true)) 阅读全文

posted @ 2008-12-19 15:52 Qcj 阅读(368) 评论(0) 推荐(0) 编辑

账单明细表 创建唯一索引

摘要: Code Code highlighting produced by Actipro CodeHighlighter (freeware) http://www.CodeHighlighter.com/ -->CREATEUNIQUEASCENDINGINDEXI_ACCBILLSITEMS_SRCACTIDONACCBILLSITEMS(SYSID,SRCACTID,SR... 阅读全文

posted @ 2008-12-19 15:49 Qcj 阅读(414) 评论(0) 推荐(0) 编辑

DB下拉框事件

摘要: Code Code highlighting produced by Actipro CodeHighlighter (freeware) http://www.CodeHighlighter.com/ -->procedureComboBoxSalesNameDropDown(Sender:TObject); varaSQLQuery:TSQLQuery; begin... 阅读全文

posted @ 2008-12-19 15:48 Qcj 阅读(468) 评论(0) 推荐(0) 编辑

字段值累加到字符串

摘要: Code Code highlighting produced by Actipro CodeHighlighter (freeware) http://www.CodeHighlighter.com/ -->1varsl:TStrings; 2begin 3CommitDataSet; 4sl:=TStringList.Create; 5... 阅读全文

posted @ 2008-12-19 15:46 Qcj 阅读(253) 评论(0) 推荐(0) 编辑

SQL-使用Case进行行列转换

摘要: Code Code highlighting produced by Actipro CodeHighlighter (freeware) http://www.CodeHighlighter.com/ -->selectsum(caseFcyNowhen'USD'thenfcyamtelse0end)usdfromaccbillsitems 提示错误expres... 阅读全文

posted @ 2008-12-19 15:43 Qcj 阅读(357) 评论(0) 推荐(0) 编辑

简单的函数

摘要: Code Code highlighting produced by Actipro CodeHighlighter (freeware) http://www.CodeHighlighter.com/ -->FunctionUpdateOrInsert(Fbentityid,Itemid,CNTRID:integer):boolean; varaSQLQuery:TSQLQuer... 阅读全文

posted @ 2008-12-19 15:40 Qcj 阅读(246) 评论(0) 推荐(0) 编辑

用这个方法可以看数据集字段

摘要: SaveToFile('d:\js.xml',dfXMLUTF8) SaveToFile('d:/d',dfbinary); 跟踪调试 SendToDebugMSG(' '); 阅读全文

posted @ 2008-12-19 15:38 Qcj 阅读(143) 评论(0) 推荐(0) 编辑

Blob 字段 BLOB SUB_TYPE 说明

摘要: 用sub_type子句指定子类型。最常用的子类型是0、1。 例如:Create Table Table2 (Blob1 Blob, Blob2 Blob Sub_Type 1, Blob3 Blob Sub_Type -1); 上面的语句创建了一个含有三个BLOB类型的数据表。第一个是缺省子类型0,代表无类型二进制数据;第二个子类型为1,代表是文本数据;第三个子类行为-1,代表用户自定义类型... 阅读全文

posted @ 2008-12-19 15:36 Qcj 阅读(299) 评论(0) 推荐(0) 编辑