Adalberto_sis

Acompanho este fórum a muito tempo, mesmo não sabendo muito de fivewin, não entendo este usuário Eric, nunca vi ele contribuindo em nada, talvez não tenha conhecimento suficiente para isto, que é o meu caso, mais entrar nos tópico com toda esta arrogância, com certeza é o tipo de usuário que só suga informações aqui, poderia pelo menos ser mais humilde e não dar palpite nos tópico...fica a dica Adalberto

citação:Feliz dia do amigos a todos os amigos!!! []'s id=quote>id=quote>Companheiro só por curiosidade, você não é aquele cara que sacaneou com varios aqui no forum pegando dinheiro para um congresso... Adalberto

Obrigado a todos pela força, irei testar as soluções aqui apresentada... Adalberto

Companheiros alguém saberia me dizer se existe algum soft, aonde eu posso comparar o conteudo(registros) de dois DBFs e ver a diferenças entre eles... Adalberto

Companheiros alguém saberia me dizer se existe algum soft, aonde eu posso comparar o conteudo(registros) de dois DBFs e ver a diferenças entre eles... Adalberto

Companheiros veja esta situação, tenho uma dialog com código do produto e valor unitário, ao digitar o código já me trás o valor unitário para o campo seguinte, gostaria de saber se ao dar o enter se o usuário alterou este valor, pensei em criar duas variáveis e fazer a comparação mais parece que existe um comando próprio para saber se houve alteração. Obrigado a todos Adalberto fwh612

Companheiros veja esta situação, tenho uma dialog com código do produto e valor unitário, ao digitar o código já me trás o valor unitário para o campo seguinte, gostaria de saber se ao dar o enter se o usuário alterou este valor, pensei em criar duas variáveis e fazer a comparação mais parece que existe um comando próprio para saber se houve alteração. Obrigado a todos Adalberto fwh612

ALE_SB obrigado pelas informações, já tinha anotado alguns exemplo aqui no fórum com == mais não sabia sua funcionalidade, fazendo desta forma deu certo. Adalberto FWH612

Companheiros, veja se alguém pode me ajudar if alltrim(forma->tipo)='CHEQUE' ? '1' elseif alltrim(forma->tipo)='CHEQUE-PRE' ? '2' id=code>id=code>abrindo o banco de dados o campo TIPO do registro tal esta como CHEQUE-PRE mais na comparação acima ele sempre para na primeira opção como se fosse CHEQUE... Obrigado a todos Adalberto FWH612

Companheiros, veja se alguém pode me ajudar if alltrim(forma->tipo)='CHEQUE' ? '1' elseif alltrim(forma->tipo)='CHEQUE-PRE' ? '2' id=code>id=code>abrindo o banco de dados o campo TIPO do registro tal esta como CHEQUE-PRE mais na comparação acima ele sempre para na primeira opção como se fosse CHEQUE... Obrigado a todos Adalberto FWH612

Gostaria de agradecer aos amigos pela ajuda, a rotina ficou assim. cFile := "C:\PRO.TXT" oFile := TTxtFile():New( cFile ) oFile:GoTop() while !oFile:lEof() cLine:=oFile:ReadLine() aTemp:=HB_aTokens(cLine," ") mprodu:=strzero(val(aTemp[1]),6) mdescri:=STRTRAN(aTemp[2],'"','') munidade:=strtran(aTemp[6],'"','') produto->(dbappend()) produto->codigo:=mprodu produto->descricao:=mdescri produto->tipo:=munidade oFile:skip() enddo oFile:end() id=code>id=code>Obs: pelo tamanho da cidade de Leme, tem muito programdor em fivewin, coisa rara, aqui em mogi não conheço ninguém... Adalberto fw612

Companheiros tenho que integrar um arquivo texto para meu banco de dados ,eu sempre usei para fazer isto um substr, mais neste caso não tem alinhamento esta seprado por " ", pior que são mais de 2 mil intens para alinhar manual, caso alguém tiver alguma dica... 1033 "CARTCUHO COMPATIVEL T-038 TB" "[584487]#" "" 0,10 "UN" 12,00 1019 "CARTUCHO CANON PG 30(PRETO)ORIGINAL" "[547530]#" "" 0,10 "UN" 1,00 1020 "CARTUCHO CANON PG 31 (TRICOLOR) ORIGINAL" "[395294]#" "" 0,10 "UN" 1,00 1022 "CARTUCHO CANON PG 40(PRETO) ORIGINAL" "[696151]#" "" 0,10 "UN" 1,00 1026 "CARTUCHO COMAPTIVEL 51629(29)MAGIC LASER" "[882292]#" "" 0,10 "UN" 1,00 1023 "CARTUCHO COMPATIVEL 22 MAGIC LASER" "[537429]#" "" 0,10 "UN" 3,00 571 "CARTUCHO COMPATIVEL 28 MAGIC LASER" "[560516]#" "" 49,00 "UN" 2,00 574 "CARTUCHO COMPATIVEL 49 51649 MAGIC LASER" "[593169]#" "" 35,00 "UN" 0,00 1029 "CARTUCHO COMPATIVEL 51629 WESTCORES" "[385559]#" "" 0,10 "UN" 1,00 1024 "CARTUCHO COMPATIVEL 51629(29) FABER-CASTELL" "[172333]#" "" 0,10 "UN" 2,00 1027 "CARTUCHO COMPATIVEL 51629(29) MASTERPRINT" "[412704]#" "" 0,10 "UN" 7,00 1028 "CARTUCHO COMPATIVEL 51629(29) MULTILASER" "[520751]#" "" 0,10 "UN" 21,00 573 "CARTUCHO COMPATIVEL 51645 WESTCORES" "[397293]#" "" 35,00 "UN" 0,00 id=code>id=code>Obrigado a Todos Adalberto

Companheiros tenho que integrar um arquivo texto para meu banco de dados ,eu sempre usei para fazer isto um substr, mais neste caso não tem alinhamento esta seprado por " ", pior que são mais de 2 mil intens para alinhar manual, caso alguém tiver alguma dica... 1033 "CARTCUHO COMPATIVEL T-038 TB" "[584487]#" "" 0,10 "UN" 12,00 1019 "CARTUCHO CANON PG 30(PRETO)ORIGINAL" "[547530]#" "" 0,10 "UN" 1,00 1020 "CARTUCHO CANON PG 31 (TRICOLOR) ORIGINAL" "[395294]#" "" 0,10 "UN" 1,00 1022 "CARTUCHO CANON PG 40(PRETO) ORIGINAL" "[696151]#" "" 0,10 "UN" 1,00 1026 "CARTUCHO COMAPTIVEL 51629(29)MAGIC LASER" "[882292]#" "" 0,10 "UN" 1,00 1023 "CARTUCHO COMPATIVEL 22 MAGIC LASER" "[537429]#" "" 0,10 "UN" 3,00 571 "CARTUCHO COMPATIVEL 28 MAGIC LASER" "[560516]#" "" 49,00 "UN" 2,00 574 "CARTUCHO COMPATIVEL 49 51649 MAGIC LASER" "[593169]#" "" 35,00 "UN" 0,00 1029 "CARTUCHO COMPATIVEL 51629 WESTCORES" "[385559]#" "" 0,10 "UN" 1,00 1024 "CARTUCHO COMPATIVEL 51629(29) FABER-CASTELL" "[172333]#" "" 0,10 "UN" 2,00 1027 "CARTUCHO COMPATIVEL 51629(29) MASTERPRINT" "[412704]#" "" 0,10 "UN" 7,00 1028 "CARTUCHO COMPATIVEL 51629(29) MULTILASER" "[520751]#" "" 0,10 "UN" 21,00 573 "CARTUCHO COMPATIVEL 51645 WESTCORES" "[397293]#" "" 35,00 "UN" 0,00 id=code>id=code>Obrigado a Todos Adalberto

Companheiros não consigo lembrar o comando do velho clipper para saber se um numero é inteiro Ex: 2 inteiro 2,34 fracionado caso alguém lembrar e poder me ajudar Obrigado Adalberto FHW 612

Companheiros não consigo lembrar o comando do velho clipper para saber se um numero é inteiro Ex: 2 inteiro 2,34 fracionado caso alguém lembrar e poder me ajudar Obrigado Adalberto FHW 612