|
本帖最后由 ling3882688 于 2015-8-31 14:57 编辑
M大,下面的代码我一运行就会多出一个PECMD进程,并且无法执行到MESS,帮忙看看是啥问题,是不能这么调用吗?但是我必须要把ListPPt 1 &&Fppts这句放到子过程里。
_SUB ListPPt
ENVI^ FORCELOCAL=1
SET &hd=%~1
CALC #hd=%hd%
PART list part %hd%,&&pts
SET &nall=0
SET &nmain=0
FORX * %pts%,&&pt,
{
LSTR &&c0=1,%pt%
FIND $%c0%=@, EXIT -
TEAM PART -phy# list part %hd%:%pt%,&&v1| MSTR &<p,&&ppt=<2><8>%v1%
IFEX $%ltp%<1, EXIT -
CALC nall=%nall% + 1
IFEX $%ppt%<=4, CALC nmain=%nmain% + 1
}
ENVI-ret %~2=%nall% %nmain%
_END
CALL Check
_SUB Check
ListPPt 1 &&Fppts
MESS %Fppts%
_END |
|