&PATTRN=&PROFILE

tqm_thl

这句话编译不过去，PROFILE超过六位应该是什么呀？最后也出错，请高手帮忙编译一下
源代码

ENTITY/OBJ(25),SURF1(5000),cbnd(90),BEID
ENTITY/surf2(5000)
NUMBER/NUM
L00:
PARAM/'请您输入料厚数据',$'
输入料厚数据',LH,RSP
JUMP/L00:,,,RSP
MESSG/'请选择加工几何体'
L10:   
IDENT/'请选择加工面',surf1,CNT,NUM,$   
CURSOR,X,Y,Z,RSP   
JUMP/L10:,L20:,,RSP   
L20:
MESSG/'请选择加工边界'
mask/3
ident/'选择曲线边界',cbnd,cnt,cbnd_cnt,rspu
JUMP/O4:,O9:,,rspu
&MODULE = &MACH   $$ 激活加工模块$$
&MCS=&WCS          $$ 使用当前坐标为加工坐标$$
      $$ 以下为选择使用的模版及要生成的操作名称$$
$$标记A
&OPTSET='D:\resource\template_set\nc_grip.opt'
OPER/NEW, OPNAME, 'c.50','cam_metric_template', 'c.50'
TOOL/'B30',MILL,30,15,100    $$刀具设置，具体为‘MILL’类$
                           $$的直径30，半径15，刀长100
&tname='B30'           $$选择使用该刀具
TAXIS/0,0,1             $$刀轴方向，使用I,J,K方式。
OPGEOM/GLIST, PART
OPGEOM/GITEM, surf1(1..NUM)   $$选择加工几何体
OPGEOM/BND,PART,START          $$边界选择开始
&BNDTYP=&CLOSED                 $$边界为封闭
&CMTSID=&OUTSID                 $$加工内侧
DO/O6:,j,1,cbnd_cnt,1            $$依次选择各个轮廓
OPGEOM/BNDITM,cbnd(j)
&TOOLOC = &ON                     $$使用ON边界   
O6:                      $$ 结束循环
&FSTOCK=LH           $$余量设置，此处设置等于料厚
&cuttyp=&ZZ          $$刀具轨迹样式，此处沿边
&PATTRN=&PROFILE
&CUTANG=45
&stpty=&CNSTEP      $$步距设置为固定步距
&STEP=10              $$步距为10
OPGEOM/BND,END       $$边界选择结束
&GENPTH=&YES         $$生成刀轨
OPER/ SAVE$$           $$保存操作
$$...
　　$$从标记A开始到该位置的内容可以多次复制，产生多个 OPERATION，$$仅仅修改余量，刀具等参数内容，即可产生不同的操作，通过多个操作$$的组合，完成一个工艺过程。
HALT