页面编辑区 功能 菜单下有定额调整功能。（该功能仅适用于专业版）
宏函数执行顺序为:
FORCETZ()执行一次 然后每页执行一次PageTz()每个定额执行一次DeTZ(deh)最后执行一次ENDTZ()
可用函数除标准的PsMarco语言外，还支持以下函数:
SETCALCDE(n: Integr) ;将当前页的第N个定额设为当前计算定额
GETTICKCOUNT:LongInt 系统开机时间：单位毫秒
DECLSL(deh,cldm):double 当前计算页中指定定额指定材料代码的用量
PageType([nType]):Integer 当前页面的类型号，可以支持一个文档中不同的类型号分别定义输出方案；
SETDECLSL(deh, cldm, sl)
CLCount():Integer 本页材料总数
CLDM(num):string 当前计算定额第num个材料的代码,num=1,2,..n,num超界时返回''
CLMC(num):string 返回当前计算定额第num个材料的名称,num=1,2,..n,num超界时返回'',不过该名称在材料表改过后可能不可靠。
CLDW(num):string 返回当前计算定额第num个材料的单位,num=1,2,..n,num超界时返回'',不过该名称在材料表改过后可能不可靠。
InsertCL(pos, cldm) 为一页增加一种材料，pos为插入位置,pos=1,2...
DeleteCL(cldm) 删除本页中的一种材料
ExchangeCL(n1,n2) 交换页面材料位置
CLBMC(cldm) 根据材料代码返回材料名称
CLBDW(cldm) 根据材料代码返回材料单位
CLBLX(cldm) 根据材料代码返回材料类型
CLBDJ(cldm) 根据材料代码返回材料单价
CLSTATUS(n) 第n个材料的状态
SORTCL() 按材料类型排序
RELOADCL() 重新从系统材料表中载入页面材料信息
GOTOPAGE(n) 显示第n页
PAGEHAVECLDM(cldm) 本页是否含有材料代码,返回布尔
ISJJCL(cldm) 在本页是否是计价材料
SETCLSTATUS(n, Status) 设置第n个材料的状态
材料状态值表示意义,值最好小于256 二进制
0--正常状态 000000000
1--不打印（奇数） 000000001
2--估价表解析出来的材料 000000010
3--估价表解析出来 + 不打印 000000011
4--配合比表解析出来 000000100
5--配合比表解析出来 + 不打印 000000101
6--配合 + 估价 000000110
7--配合 + 估价 + 不打印 000000111
GZNR() 取工作内容
SetGZNR(s):string 设置工作内容并返回原来的工作内容
JZ()
SetJZ()
PageDW():string 返回当前页的页面单位
SetPageDW(dw):string 设置当前页的页面单位
ZJName([s:string]):string 取或设 当前页的章节名称
BT(n):string 取第n个标题 n=1..4
SetBT(n, bt):string 设置第n个标题 n=1..4
ExtSM(): string 返回页面说明内容（V3.2.12.315以后支持）
SetExtSM( SM: string):string 设置页的页面说明，并返回之前的内容
EXTXMMC(n):string 取第n个扩展项目名称 n=1..4
SetEXTXMMC(n, mc):string 设第n扩展项目名称 n=1..4
PAGECTRL():string 取页面控制描述的宏
SetPAGECTRL(s: string):string 设置页面宏
UpDataCL(dm, mc, gg, dw, dj, lx [,rgf ,clf, jxf])更新材料，如果代码不存在则添加 V3.3.1.340中加入
DECOUNT():Integer 返回本页定额总数
GetDeh(n):string 返回本页第N个定额的定额号
PAGESIZEINFO() 取页设置信息
PAGESIZEINFO(bNewPAge, bForceSetSize, pHeight, pwidth)设页面尺寸
DELFZCMD(s) 删除方正控制符号
CLTAGBYDM(cldm, tag) 用于自定义输出方式定义材料分类，但此变量不能保存，仅在当次打开时有作用
LOADTXTFROMFILE(Fn):string;将文本文件读入为字符串 2010-8-2增加以下3个函数
SAVETXTTOFILE(Fn, String):Boolean;将字符串保存为文本文件
DOCFILENAME:string;当前使用的DPG的全文件名
可用全局变量
YM: Integer 页码，屏幕右下脚显示的第几页页码，每一个Pagetz时，YM变量自动变化
DeTZ(deh) 可用上述函数外还可用
ZHGR():Double 返回当前计算定额的综合工日
SetZHGR(v) 修改当前计算定额的综合工日
CLSL(cldm):double 返回当前计算定额指定材料代码的用量,材料找不到时返回0
SetCLSL(cldm, v) 修改当前计算定额指定材料代码的用量
DEJJ():double 返回当前计算定额的基价 SETDEJJ
DERGF():double 返回当前计算定额的人工费 SETDERGF
DECLF():double 返回当前计算定额的材料费 SETDECLF
DEJXF():double 返回当前计算定额的机械费 SETDEJXF
Xmmc(n) 项目名称n
SetXmmc(n, mc) 设置项目名称n
SetDEH(deh) 设置定额号
ZHF(n) 综合费n=1..5
SetZhf(n, v) 设置综合费n=1..5
QDH() 清单号
QDH(bh) 设置清单号
ReadOnly([boolean]) 取[设]定额只读状态
LOCKDEH(), LOCKDEH(Boolean) 取或设编号锁定
DESM(), DESM(S) 取或设定额说明
DEDW(), SetDeDW(dw) 取或设定额单位
DeclHlStr(cldm[, txt]):string; 取或设定额材料耗量的文本格式内容！
RecDeh, RecSetDeh(deh): string ; 取和设内部定额号，此号仅用于导入导出和内部计算使用
RecXMMC, RecSetXMMC(deh): string ; 取和设内部项目名称，此名称仅用于导入导出和内部计算使用
//以下10个Rec存储内部函数n作为1~3时，需要使用子定额价时SysUseSubDe=True方可保存操作数据 n为0表示显示及使用的，相当于不要参数n时的无Rec函数
RECDEJJ(n): Double n :0~3
RECDERGF(n): Double n :0~3
RECDECLF(n): Double n :0~3
RECDEJXF(n): Double n :0~3
RECSetDEJJ(n, jg): Double n :0~3 n超出范围时返回当前使用的价格
RECSetDERGF(n, jg): Double n :0~3
RECSetDECLF(n, jg): Double n :0~3
RECSetDEJXF(n, jg): Double n :0~3
RecDeZHF(m, n):Double m:1~5, n:0~3
RecSetDeZHF(m, n, jg):Double m:1~5, n:0~3
DEStatus()和 DEStatus(n: integer)取和设置定额状态值，整型。
宏函数可能随着版本升级逐渐增加或调整，可联系鹏业软件公司获取最新的函数手册！