摘要: static void CretateForm(Args _args) { Args args; Form form; FormRun formRun; FormBuildDesign formBuildDesign; FormBuildDataSource formBuildDataSource; FormBuildGridControl formBuildGridControl; ... 阅读全文
posted @ 2011-07-27 12:07 perock 阅读(294) 评论(0) 推荐(0) 编辑
摘要: DictEnum de; int i; ; de = new DictEnum(enumName2Id("ActionType")); for (i=0; i < de.values(); i++) { print int2str(i) + ", " + de.index2Name(i); } 阅读全文
posted @ 2011-07-27 12:03 perock 阅读(336) 评论(0) 推荐(0) 编辑
摘要: 按照MSDN的解释: Overridden. Increases the number of references to a FormRun object. This increase prevents the release of the object memory during garbage collection when the FormRun object goes out of sco... 阅读全文
posted @ 2011-07-27 10:51 perock 阅读(359) 评论(0) 推荐(0) 编辑
摘要: void addPicBox() { FormWindowControl c; DocuRef tmpDocuRef; Image tmpImage; int i = 1; int j, maxControl; container tmpBitmap; ; element.lock(); maxControl = groupPics.controlCount(); //获取gro... 阅读全文
posted @ 2011-07-26 17:37 perock 阅读(240) 评论(0) 推荐(0) 编辑
摘要: Container类型累加其实是添加元素。 如: Container c; ; C = [‘a’]; C +=[‘b’] 此时C中有两个元素分别为 [‘a’,’b’] 阅读全文
posted @ 2011-07-26 16:23 perock 阅读(296) 评论(0) 推荐(0) 编辑
摘要: static void ShowNum2Str(Args _args) { Real Num; ; Num = 2.001; info(Num2Str(Num,0,3,1,2)); //输出2.001 } ShowNum2Str参数介绍: ShowNum2Str(待转real,文本长度,小数位,小数点分隔符,千位分隔符) 文本长度:意指转换后的文本长度,不足位将用空格填充; 小数位:小数长... 阅读全文
posted @ 2011-07-26 15:22 perock 阅读(7377) 评论(0) 推荐(0) 编辑
摘要: static void ShowDate2Str(Args _args) { Date FrDate; ; FrDate = SystemDateGet(); info(date2str(FrDate,213,2,3,2,3,4)); //输出结果:05-26-2011 } Date2Str()参数说明: Date2Str(待转日期,日期格式,天长度,天分隔符,月长度,月分隔符,年长度)... 阅读全文
posted @ 2011-07-26 15:02 perock 阅读(3148) 评论(0) 推荐(0) 编辑
摘要: --查询生产单PO的位置Declare @tmpWrkCtrId VarChar(20)Declare curWrkCtrID# Cursor For Select WRKCTRID From ACT_JOBTABLE a inner join ACT_JOBTRANS b on b.ACT_JobId = a.ACT_JobId Where PRODID = 'WR0073262' and WRKCTRID != 'WC-PL' and b.ItemId = 'PO' group by WRKCTRIDIF EXISTS(SELECT Name 阅读全文
posted @ 2011-07-23 11:14 perock 阅读(269) 评论(0) 推荐(0) 编辑
摘要: static void AXD_CallQuery_SalesInfo(Args _args){SysQueryRun queryRun = new SysQueryRun(querystr(AXD_SalesInfo));SalesLine m_salesLine;InventTable m_InventTable;;if (queryRun.prompt()) { while (queryRun.next()) { m_salesLine = queryRun.get(tableNum(salesLine)); m_InventTable = queryRun.get(tableNum(I 阅读全文
posted @ 2011-04-01 11:32 perock 阅读(201) 评论(0) 推荐(0) 编辑
摘要: public void run{ CustTable custTable, tmpDatasource;; // Ensure RLS is used custTable.recordLevelSecurity(true); while select custTable { tmpDataSource.data(custTable); tmpDataSource.insert(); } formDataSource.setTmp(); formDataSource.checkRecord(false); formDataSource.setTmpData(tmpDatasource); sup 阅读全文
posted @ 2011-03-31 10:32 perock 阅读(404) 评论(0) 推荐(0) 编辑