你这个程序问题很大，涉及(1)变量定义，(2)数组定义，(3)变量赋值，(4)变量作用域，(5)子程序(过程)，等一系列问题。主程序中变量x,y,m是本程序定义的私有变量，n,n1是本程序没有定义的变量，而子程序中却没有指出这些变量是全局变量。p1子程序把m当作参数使用，而随后的操作中m又当作数组使用。p2子程序类似。
建议：弄清楚(1)程序想做什么，(2)如何定义和使用变量，(3)主程序和子程序之间的关系是什么

收到的鲜花

• tlliqi 于 2014-03-12 09:30 送鲜花  20朵   附言：说得好

clear
set udfparms to reference
input "x=" to x
input "y=" to y
declare m(x,y)
STORE 1 TO m,n,n1  &&(1)新增
p1(@m)  &&(2)修改
p2(@m)  &&(3)修改
if n=n1
?n
else
?"no"
endif
return

procedure p1
parameters m
n=1
for a=1 to y
  for i=1 to x
    if n<m(i,a)  &&这里报错的
      n= m(i,a)
    endif
  endfor
endfor
return n

procedure p2
parameters m
n1=1
for i=1to x
  for a=1 to y
    if n1>m(i,a)
    n1 = m(i,a)
    endif
  endfor
endfor
return n1