InTouch自定义函数带参数应用

开发上位机，往往需要传递参数给一个函数，该函数执行一些功能，然后反馈执行的结果，该函数可反复调用，大大提高程序开发效率和减少冗余代码。

例如一：

新建一个函数

函数名为：SQLConnectionZY

该函数有个返回值Error，如果为0则代表连接成功，否则连接失败。

调用如下：

DIM Error AS INTEGER;Error=CALL SQLConnectionZY( );IF Error == 0  THEN    //需处理的代码ELSE    Error_SQL=Error;ENDIF;SQLDisconnect( ConnectionId );

此处增加了IF判断是否连接成功，如果成功则继续，否则报错，报错后不执行数据库的任何操作。

例如二：

新建一个函数

函数名为：ErrorInsertZY

该函数有2个参数，一个是整形参数一个是消息参数。

DIM ErrorCode_Message AS MESSAGE;ErrorCode_Message = Text (ErrorCodeZY, "#");SQLSetStatement(ConnectionId, "INSERT INTO Error (ErrorCode,ErrorDescribe,DataFlag) "); SQLAppendStatement( ConnectionId," VALUES ('"+ErrorCode_Message+"','"+ErrorDescribeZY+"',0)");SQLExecute( ConnectionId, "", 0 );

调用如下：

Errorcode=1111;ErrorDec="异常，请检查！";CALL ErrorInsertZY( Errorcode, ErrorDec);

此处传递Errorcode和ErrorDec参数给ErrorInsertZY函数，完成故障数据的插入。