第5章 程序设计基础.ppt

2. 过程与用户自定义函数的调用 格式1：DO Procedure [IN FileName] [WITH ParameterList] IN子句用于指定过程或用户自定义函数所在的过程文件 WITH子句用于指定传递给过程或用户自定义函数的参数 如：DO tarea WITH 2,3,4 格式2：与系统函数的调用方式相同，这种调用方式有返回值。 如：tarea(2,3,4) 5.5 过程和用户自定义函数 说明： (1)形参和实参的数目一般应一致，发生调用时对应位置的实参与形参 一一传递。 (2)也可以形参的数目多于实参，在这种情况下，剩余的形式参数就被 初始化为.F.。 (3)如果实参数目多于形参，运行程序时系统会提示出错。 3. 实参与形参 将在PARAMETERS语句ParameterList中的参数称为“形式参数” 在调用语句中的参数称为“实际参数” 5.5 过程和用户自定义函数 n=1 t=1/n s=0 DO WHILE t0.0001 s=s+t n=n+2 t=1/jc(n) n为实参 ENDDO ?”数列的和是：”,s 例16： 计算数列1/1!、1/3!、1/5!、…、1/n!的和，当某项的值小 于0.0001时停止计算。 FUNCTION jc PARA m m为形参 ss=1 FOR i=1 TO m ss=ss*i ENDFOR RETURN ss ENDFUNC 5.5 过程和用户自定义函数 （1）默认情况下，采用格式1方式调用时，数据传递是传址方式 （引用），而采用格式2方式调用时，是传值方式。 （2）如果实参是一个常数或一个表达式时，不管采用什么方式调用， 传递方式只能是传值。 参数传递： 传值，即实参变量对形参变量的数据传递是“值传递”，即单向传递，只由实参将其内容传给形参，而不能由形参将其内容传回给实参。 传址，即实参变量对形参变量的数据传递是“地址传递”，即双向传递，将实参在内存中的地址传递给形参，形参的内容一经改变，实参的内容也跟着改变。 说明： 5.5 过程和用户自定义函数 例17： 计算数列1/1!、1/3!、1/5!、…、1/n!的和，当某项的值小 于0.0001时停止计算。采用DO命令调用用户自定义函数jc n=1 t=1/n s=0 DO WHILE t0.0001 s=s+t n=n+2 p=1 DO jc WITH n,p t=1/p ENDDO ?”数列的和是：”,s FUNCTION jc PARA m,ss FOR i=1 TO m ss=ss*i ENDFOR ENDFUNC 5.5 过程和用户自定义函数 若要按值方式传递参数，在调用UDF之前，执行命令： SET UDFPARMS TO VALUE 若要按引用方式传递参数，在调用UDF之前，执行命令： SET UDFPARMS TO REFERENCE SET UDFPARMS TO 命令 功能：用来改变参数传递的方式。 注意： （1）使用DO命令调用，用WITH子句传递参数时，不受 SET UDFPARMS 命令的影响。 （2）也可以不管SET UDFPARMS的设置，强制设定以值传递方式 或引用传递方式传递参数：如果用括号括起一个变量，设定按 值传递；在一个变量前加@符号，则设定引用传递方式。 5.5 过程和用户自定义函数 例18：分析以下2段程序的运行结果。 程序段1： SET UDFPARMS TO VALUE STORE 1 TO x ?”函数返回值：”+STR(j1(x)) ?”变量x的值：”+STR(x) FUNCTION j1 PARAMETERS a a=a+1 RETURN a ENDFUNC 程序段2： SET UDFPARMS TO VALUE STORE 1 TO x ?”函数返回值：”+STR(j1(@x)) ?”变量x的值：”+STR(x) FUNCTION j1 PARAMETERS a a=a+1 RETURN a ENDFUNC 5.5 过程和用户自定义函数 4．变量的作用域 内存变量可分为: 全局变量，私有变量和本地变量三类。 全局变量