Also I'm not sure what following 2 lines are for

	lcTable = ALLTRIM(UPPER(JUSTSTEM(ALIAS())))
	lnColumnCount = FCOUNT(lcTable)

Based on the rest of code it should be just

	lnColumnCount = FCOUNT()

>In the code below, I need to have the same block of code executed for both ELSE conditions. I never know how this should be done.
>Putting the block twice irritates my sense of oneness with the code, but I can't figure out how to handle it differently.
>

>IF !EMPTY(ALIAS())
>	LOCAL ;
>		lcTable, ;
>		lcFields, ;
>		lcOrderField
>	lcFields = ''
>	lcTable = ALLTRIM(UPPER(JUSTSTEM(ALIAS())))
>	lnColumnCount = FCOUNT(lcTable)
>	IF lnColumnCount = 2
>		FOR ix = 1 TO lnColumnCount
>			lcFields = m.lcFields + IIF(m.ix > 1, ', ','') + FIELD(ix) + ' AS Fld'+TRANSFORM(ix)
>			IF m.ix = 1
>				lcOrderField = FIELD(ix)
>			ENDIF
>		ENDFOR
>		RunSQL = 'SELECT ' + lcFields + ' FROM ' + lcTable + ' ORDER BY ' + lcOrderField + ' INTO CURSOR ReportCursor HAVING !EMPTY(Fld1)'
>		&RunSQL
>		lnTotalCodes = _TALLY
>	ELSE
>		RELEASE lnTotalCodes
>		SELECT (THIS.CurrentAlias)
>		GOTO THIS.CurrentRecNo
>		RETURN .F.
>	ENDIF
>ELSE
>	RELEASE lnTotalCodes
>	SELECT (THIS.CurrentAlias)
>	GOTO THIS.CurrentRecNo
>	RETURN .F.
>ENDIF
>