Versão atual:

Substituir o Criatrab e DbCreate nesta função

Alguem sabe como utilizar a FWTemporaryTable nesta função?

cAliasTRB := UPPER(cBloco)+""+CriaTrab(,.F.) DbCreate(cDirSPDK+cAliasTRB,aLayout[1],LocalDriver) dbUseArea(.T.,LocalDriver,cDirSPDK+cAliasTRB,cAliasTRB,.T.) DbSelectArea(cAliasTRB) For nX := 1 to Len(aLayout[2]) Aadd(aIndice,"k"+CriaTrab(Nil,.F.)) Next nX For nX := 1 to Len(aLayout[2]) INDEX ON &(aLayout[2][nX]) TO (aIndice[nX] + OrdBagExt()) Next nX dbClearIndex() For nX := 1 to Len(aLayout[2]) dbSetIndex(aIndice[nX] + OrdBagExt()) Next nX DbSetOrder(1) EndIf

Versão (1):

Ver a versão formatada

Substituir o Criatrab e DbCreate nesta função

Comentário

new question