动态sql教程系列三.docVIP

其中， Cursor 或Procedure 是要使用的游标或过程名； DynamicDescriptionObject 是PowerBuilder 提供的一个数据类型，在PowerBuilder 中提供了一个DynamicDescriptionObject 类型的全局数据类型SQLDA，用来存 放动态SQL 语句的输入输出参数。可以用以下方法设置在PREPARE 语句中出 现的每个输入参数的类型和值。PowerBuilder 在DESCRIBE 运行时可取得 SQLDA 的属性NumInputs（可得到输入参数个数）和InParmType（可得到输入 参数类型），可用这些值和函数SetDynamicParm 给输入参数的类型和值赋值。输 入参数是任选的，若要使用它们，应在运行OPEN 或EXECUTE 语句之前给它 们赋值。可以用以下方法取得PREPARE 语句中的每个输出参数的类型和值。如 果使用的数据库支持输出参数描述，PowerBuilder 应用可在DESCRIBE 语句执 行时取得SQLDA 的NumOutputs 值；若数据库不支持输出参数描述，PowerBuilder 应用可在FETCH 语句执行时取得SQLDA 的NumOutputs 值。可用输出参数的号 码（NumOutputs）从输出参数类型（OutParmType）数组中获得特定参数的类型。 得到类型后，在FETCH 语句后可调用恰当的函数取出输出值。 实例： 下面是一个使用动态SQL 格式四的例子，此例有一个字符串输入参数，但 输出参数的类型和个数不定。 string ls_sql,ls_val Integer i,li_boolean ls_sql=Select * From Auths Where Auths_id=? DECLARE c1 DYNAMIC CURSOR FOR SQLSA； PREPARE SQLSA From :ls_sql; DESCRIBE SQLSA IntO SQLDA; //若DESCRIBE 成功，则输入描述符数组将包含一个输入描述符， //在打开游标前必须先给输入描述符赋值。 SetDynamicParm(SQLDA,1,A00001) //这里的“1”表示第一个参数 OPEN DYNAMIC c1 USING DESCRIPTOR SQLDA; lable: FETCH c1 USING DESCRIPTOR SQLDA; IF SQLCA.SQLCODE=0 THEN //若FETCH 成功 FOR i=1 to SQLDA.NumOutputs //SQLDA.NumOutputs 含有输出参数的个数 CHOOSE CASE SQLDA.OutParmType[i] CASE TypeString! ls_val=GetDynamicString(SQLDA,i) CASE TypeDate! ls_val=string(GetDynamicDate(SQLDA,i),dd mm yyyy) CASE TypeTime! ls_val=string(GetDynamicTime(SQLDA,i),hh:mm:ss) CASE TypeDataTime! ls_val=string(GetDynamicDateTime(SQLDA,i), dd mm yyyy hh:mm:ss) CASE TypeInteger!,TypeLong!,TypeDecimal!,TypeDouble!, TypeReal! ls_val=string(GetDynamicNumber(SQLDA,i)) CASE TypeBoolean! li_boolean=GetDynamicNumber(SQLDA,i) IF li_boolean=1 THEN ls_val=TRUE ELSE ls_val=FALSE END IF END CHOOSE …… //进行相应处理 NEXT GOTO lable //取下一条记录 ENF IF CLOSE c1； 格式四适合于所有子句都不确定的Select 语句，这是最有用的一种动态 SQL。 3 DESCRIBE语句 SQLDA 是一种由两个不同部分组成的可变长数据结构。从位于SQLDA 开 端的sd_sqln 到sd_sqld 为固定部分，用于标志该SQLDA，并规定这一特定的 SQLDA 的长度。而后是一个或多个sd_column 结构，用于标志列数据或参数。 当用SQLDA 把参数送到执行语句时，每一个参数都是一个sd_column 结构；当用 SQLDA 返回输出列信息时，每一列都是一个sd_column 结构。具体每个元素的 含义为： lSd_Sqln。分配的sd