PC Toledo

amigos...

como saber quais aplicativos estão aberto na barra do windows (harbour123)?

#pragma begindump
/*
Harbour CRC-16/CCITT-FALSE checksum implementaion
Pete D. - Jun 2022
*/
#include "hbapi.h"
#include "hbapierr.h"
HB_U16 crc16ccitt( const char * pData, HB_SIZE length)
/* slightly modified code found here: https://gist.github.com/tijnkooijmans/10981093 */
{
HB_U8 i;
HB_U16 ...

Fernando queiroz escreveu:o que voce precisa é somente isso

hb_numtohex(hb_crcct(cString, 0xFFFF, 0x11021))

onde acho essa lib para essa Função para xHarbour123, para poder compilar junto a aplicação!

Esse erro ocorre quando o sistema tenta acessar o índice e o índice não está mais disponível. Pode ser por vários motivos, claro, incluindo o fato dele ter sido fechado.

Quando migrei de NTX para CDX eu tive esse problema no início em um cliente, e ocorria sempre no mesmo dia da semana e sempre no ...

amigos

alguém tem essa função em xharbour?

Jairo Maia escreveu:Olá juniorcamilo,

juniorcamilo escreveu:Mas o que causa esse problema!

Isso ocorre também no servidor ou somente nas estações?

aconteceu novamente em outro cliente!

Sim no servidor Funciona Normalmente! nos terminais da essa msg!

Foi observando em dois terminais! Ai pedi para reorganizar o arquivo! Não tive ideia na hr de verificar no servidor! Raramente isso acontece

Amigos.. sei q algo com indice!

Mas o que causa esse problema!

Itamar M. Lins Jr. escreveu:Olá!
Eu uso assim:

Código: Selecionar todos

   index on dtos(entrada)      tag os06 to servicos.cdx  descending eval {||oBar:Set(,Recno()),.t.}

Saudações,
Itamar M. Lins Jr.

Obrigado Itamar! funcionou perfeitamente!

testei também a alternativa do Quintas(não funcionou)!
desta forma:
INDEX ON Dtos(DATA) + HORA DESCEND

paiva_dbdc escreveu: tente separar descend(dtod... + descend(hora)
Paiva

sem sucesso! mesma coisa!

Ola amigos.

estou com um problema de índice usando o descend!
resumindo o código:

if use_arqex5("ARQAUD01","AUDITOR",,"DBFCDX","1") == .f.
AUD->( __DBpack() )
Ferase('IAUDIT01.CDX')
Index on descend(dtos(DATA)+HORA) tag TAG1 to IAUDIT01
AUDITOR->(Dbclosearea())
endif

pelo sistema ...

funcionou perfeitamente!
obrigado pela excelente aula!

Esse "não está em branco", ficou confuso se é combinado com o anterior, ou apenas ver se está em branco, ou ver se um ou todos estão em branco, etc.

EMPTY() MESMO, ou seja, exemplo basico!

...
aMatriz := {{},{},{},{}}
for nCont = 1 to Len(aMatriz[1])
if !empty(Matriz[3,nCont])
exit
endif ...

E se quer comparar os elementos 3, 4 e 5, coloca 3, 4, e 5


nPos := AScan( aDados, { | x | x[ 3 ] == cFor .OR. x[ 4 ] == cFor .OR. x[ 5 ] == cFor } )


bom dia José Quintas!

como eu faria uma ascan com expressão para saber se dentro de uma matriz tem conteúdo, ou seja, c em uma posição da ...

Olá meu amigo, consegue me mostrar como fez?
Estou precisando disso também.

procedure EXECUTEDOWNLOADTRAVA(net,mArq)
if Valtype(net) == "L"
if net == .t.
net := "net online"
else
net := "net offline"
endif
endif
if at(":",CLDADOS) == 0
ccomando := '"'+CURDRIVE()+':'+CLDADOS+EXENAME ...