Sobre o letodb.ini... acabei de copiar conforme me passou e funcionou... devia ser alguma coisa no arquivo...tenho que habilitar alguma opção para enxergar as tabelas dentro do DATAPATH, pois por enquanto, estou tendo que copiar tudo na pasta principal, ou seja, se eu configurar DATAPATH=C:\TESTE\, esta lendo apenas o que esta em C:\TESTE\..... o que esta dentro das sub-pastas, não acha...alguma sugestão ?
Sobre o que relatei da função CRIPTO, agi assim:
Em um arquivo chamado LETOUDF.PRG ficou assim:
FUNCTION UDF_CRIPTO( nUserStru, aString, vTipo, Serie )
// aString -- String a ser criptografada/descriptografada
// vTipo -- Tipo 'C' Criptografa - 'R' Descriptografa
// Serie -- Utilizada como base no calculo
LOCAL cWord, cChave, nPos := 1, vChave := 0, nCnt, Chave := ""
LOCAL cString := aString, nSerie, cRetr := ""
nSerie := STRZERO( Serie, 6 )
nSerie := VAL( SUBSTR( nSerie, 1, 1 ) ) + VAL( SUBSTR( nSerie, 2, 1 ) ) +;
VAL( SUBSTR( nSerie, 3, 1 ) ) + VAL( SUBSTR( nSerie, 4, 1 ) ) +;
VAL( SUBSTR( nSerie, 5, 1 ) ) + VAL( SUBSTR( nSerie, 6, 1 ) )
FOR nCnt = 10 TO 60
Chave += CHR( nCnt + nSerie )
NEXT nCnt
DO WHILE nPos <= LEN( cString )
cWord := SUBSTR( cString, nPos, 1 )
cChave := SUBSTR( Chave, nPos, 1 )
IF vTipo = "C"
vChave := vChave + ASC( cChave )
cRetr := cRetr + CHR( ASC( cWord ) + vChave )
ELSEIF vTipo = "R"
vChave := vChave - ASC( cChave )
cRetr := cRetr + CHR( ASC( cWord ) + vChave )
ENDIF
nPos++
ENDDO
RETURN( cRetr )
Dai compilei dessa forma:
harbour letoudf.prg -gh -n -w -iC:\HARBOUR\INCLUDE
Gerou o arquivo letoudf.hrb, que coloquei na pasta que esta o letodb.exe... baixo o serviço e carrego novamente o serviço... consequentemente ele lê o arquivo com as funções e coloca no log assim:
04/09/15 23:16:12: Leto DB Server has been started.
Leto DB Server v.2.15 ! INIT: DataPath=c:\ff, ShareTables=1, MaxUsers=500, MaxTables=5000, CacheRecords=100
04/09/15 23:16:12: C:\FFSoft\DESENV\hmg\letodb\bin\letoudf.hrb has been loaded.
Dai como demonstrei acima, executando o LETO_UDF("UDF_CRIPTO",NOME."C")...funciona normal...só da erro quando tento gerar um indice.......o que poderia ser ???
Segui o que o TOLEDO, informou uns posts atrás, será que não fiz alguma coisa ???
F.Freire