CLEAR

= procName('V1,V2,V3,V4',1,2,3,4)

PROCEDURE procName 
LPARAMETERS pList;
,	(GETWORDNUM(m.pList,1,","))	;
,	(GETWORDNUM(m.pList,2,","))	;
,	(GETWORDNUM(m.pList,3,","))	;
,	(GETWORDNUM(m.pList,4,","))

FOR k=1 TO PCOUNT()-1
   ? TRANSFORM(m.k,"@R parameter 99"), GETWORDNUM(m.pList,M.K,","),EVALUATE(GETWORDNUM(m.pList,M.K,","))
NEXT