LPARAMETERS vNewVal *To do: Modify this routine for the Assign method WITH THIS IF m.vNewVal AND ASCAN(.aRowSource,SPACE(1),1,-1,1) = 0 DIMENSION .aRowSource[ALEN(.aRowSource,1)+1, ALEN(.aRowSource,2) ] && add one more row AINS(.aRowSource,1) && inserts a row PRIVATE lnI FOR lnI =1 TO ALEN(.aRowSource,2) .aRowSource[m.lnI] = " " NEXT .aRowSource[2] = CAST(NULL AS C) && NULL literal it is a Logical ENDIF .lAddBlank = m.vNewVal ENDWITHAND
SET NULLDISPLAY TO "?">