lnStart = Thisform.Edit1.SelStart lcCrLf = CHR(13) + CHR(10) lnOccurence = OCCURS(lcCrLf, LEFT(Thisform.Edit1.Text, lnStart)) lcCommand = STREXTRACT(lcCrLf + Thisform.Edit1.Text, lcCrLf ,lcCrLf, lnOccurence + 1,2)>
>LIST[CR&LF] >DISP MEMO[CR&LF] >LIST ALL FOR;[CR&LF] >empty(client_id)[CR&LF] >BROWSE[CR&LF] >PACK[CR&LF] >>