See ASCAN() function or you can simply loop through array.

>Days ago I was trying to get the port form a printer
>
>Now I succeed in getting it
>
>But I had to create a cursor
>
>I would apreciate if someone here help me to eliminate
>the cursor
>If not I will keep the code as it is
>
>
>
>************************************************************************
>APRINTERS(PTT1,1)
> CREATE CURSOR PTT2 (A1 C(150), A2 C(150), A3 C(150), A4 C(150) )
> APPEND FROM ARRAY PTT1
>PT3 = GETPRINTER ()
>
>SET EXACT ON
> SELECT PTT2
> LOCATE FOR ALLTRIM(A1) = ALLTRIM (PT3)
>
> = MESSAGEBOX (A2) && here is the printer port