0 %RegisteredObject #UNDEF# 1 P1:%String,P2:%String,P3:%String,P4:%String,P5:%String %String wordt <"Param1","Param2"> New Loop,Stop Set Stop=0 For Loop=$L(ParamStr):-1:0 Do Quit:(Stop) . If $E(ParamStr,Loop)'="," Do .. Set Stop=1 Set ParamStr=$E(ParamStr,1,Loop) Quit ParamStr ]]> 1 CellValue:%String %String 1 ClassName:%String,MethodName:%String,P1:%String,P2:%String,P3:%String,P4:%String,P5:%String %String 1 CodeStr:%String %String 1 Routine:%String,P1:%String,P2:%String,P3:%String,P4:%String,P5:%String %String