复制代码代码如下所示：
**************************************************
函数ID：0014 {检测ID是否是数字类型。
功能名称：jcid
作用：检查id是否是数字类型。
参数：paravalue -————ID值被发现
返回值：如果没有数字类型返回0，返回id值
**************************************************
功能jcid（ByVal ParaValue）
如果（（不是ISNUMERIC（paravalue））或（TRIM（paravalue）=）））然后
jcid = 0
其他的
jcid = paravalue
最后如果
端功能