Hi all,

I have the code above in a ComboBox INIT, and RowSourceType 5-Array, and RowSource This.aItems, the array is fill, and all the time it show .F.,

LOCAL llOK, lcAlias
WITH THISFORM
	llOK=.oCodDocumentos.ProcuraDocEncCli(.oRS1)
	IF llOK
		&& Converte ADO RecordSet para Cursor
		lcAlias=LOWER(SYS(2015))
		.Ado_Tmp_Cursor=lcAlias
		.RS2DBF(.oRS1,lcAlias)
		Select (lcAlias)
*		Go Top
		COPY TO ARRAY aItems FIELDS c_descri_3,c_codigo_2
		This.Requery()
*		DISPLAY MEMORY LIKE aItems
	 ELSE
	ENDIF
ENDWITH

João Batista