sig_gilberto

Vlw Alessandro.....

Isso mesmo!!

Um exemplo de como ler e colocar em um vetor, deve ajudar

PROCEDURE Main

LOCAL oXmlDoc := TXmlDocument():new()

LOCAL oXmlNode, aArqXml := {}

oXMlDoc:read( Memoread( "arquivo.xml" ) )

oXmlNode := oXmlDoc:findFirst() // Posiciona no inicio

? oXmlNode:cName // Mostrar o Campo nome

oXmlNode := oXmlDoc:findFirst( "structure" )

? oXmlNode:cName

oXmlNode := oXmlDoc:findFirst( "field" )

// Copia o Conteudo para o Array ou DBF

DO WHILE oXmlNode <> NIL

AAdd( aArqXml, { oXmlNode:aAttributes[ "name" ] , ;

oXmlNode:aAttributes[ "type" ] , ;

Val( oXmlNode:aAttributes[ "len" ] ), ;

Val( oXmlNode:aAttributes[ "dec" ] ) } )

oXmlNode := oXmlDoc:findNext()

ENDDO

AEval( aArqXml, {|a| Qout( ValToPrg(a) ) } )

RETURN

Qualquer dúvida meu emial é avelinoalessandro@gmail.com

Obrigador seu retorno Kapi...

São bons linkes!!!

Vlw

Veja se ajuda:

http://www.pctoledo.com.br/forum/viewtopic.php?f=43&t=9528

http://www.pctoledo.com.br/forum/viewtopic.php?f=1&t=1932

http://dbf-viewer-editor.com/pt/xml-to-dbf.html

Olá Desenvolvedores, boa tarde!

Peço ajuda de como importar um XML para um DBF ?

Grato e Sucesso!

Ola Amigos!

Vou usar todas as dicas de vocês !!!

Pessoal, bom dia !!!

Ao caçar as "coisas estranhas" no meu micro, achei uma pasta C:\Users\gilberto\EurekaLog e dentro tinha

um arquivo com o nome "xDevStudio_GILBERTO-PC.ELF" e um outro com o nome "EurekaLog.INI".

Renomiei a pasta para "XXXXEurekaLog" e rodou....

Dentro deste "xDevStudio_GILBERTO-PC.ELF" tinha as seguintes linhas :

Olá Kapi.....

Primeiramente, obrigado por seu retorno.

Não mudei nada não....sei lá se é o Win7...vou trocar de máquina....

Olá Desenvolvedor, boa tarde!

Estou utilizando o xDev Studio v0.65 e agora, ao carregar o projeto e mandar compilar, ele começou a travar e

mostrar uma caixa de dialogo do Windows :

[xDev Studio application file parou de funcionar]

Dái esta caixa tem 2 opções :

[Fechar o programa] ou [Depurar o programa]

Se eu optar por fechar....ele encerrar o xDev...

Se eu optar por depurar....é carrega uma caixa de dialogo com do Visual Studio 2008 com já selecionado

o debugador [New instance of Visual Studio 2008]

Como resolver isso ?

Olá Desenvolvedores, bom dia !

Acaba de ocorrer este mesmo erro no meu xdev 0.65

property makeincfile does not exist

Os amigos poderiam me ajudar ?

Grato!

vlw amigão !!!!

Olá Desenvolvedores, boa noite!

Desculpe-me se postei em lugar errado mas, algum dos amigos sabe onde acho na NET um site onde eu possa validar um código de barras de arrecadação ?

Eu sempre uso este abaixo para COMPENSAÇÃO mas, preciso URGENTEMENTE de um para ARRECADAÇÃO.

http://evandro.net/codigo_barras.html

Grato e Sucesso à Todos!

bom dia!!

primeiro, obrigado pelos retornos dos amigos....

vou ler um arquivo em TXT e "sacar" algumas informações e

imprimí-las juntamente numa imagem A4.

Dando um exemplo, melhor, é como gerar um boleto,,,eu carrego os dados variáveis e os sobreponho na imagem...

Então, quero saber como chamar, carregar uma imagem deste tipo...

________________________

Gilberto Herminio - Analista de Desenvolvimento de Sistemas

Mogi das Cruzes-SP

xHB121+Fw912 / C#/SQL2008

"Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedores, bom dia!

Uso a versão Fivewin 9.12 + xHB 121...+Windows7...máquina de 32Bits......

Será que preciso de uma máquina virtual.....

________________________

Gilberto Herminio - Analista de Desenvolvimento de Sistemas

Mogi das Cruzes-SP

xHB121+Fw912 / C#/SQL2008

"Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedores, boa noite!

Tenho que ler um arquivo com nome, endereço, etc.. e carregar uma imagem em BMP/TIF/... como fundo e imprimir em PDF formato A4, como fazer ?

________________________

Gilberto Herminio - Analista de Desenvolvimento de Sistemas

Mogi das Cruzes-SP

xHB121+Fw912 / C#/SQL2008

"Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedores, boa noite!

Tenho que ler um arquivo com nome, endereço, etc.. e carregar uma imagem em BMP/TIF/... como fundo e imprimir em PDF formato A4, como fazer ?

________________________

Gilberto Herminio - Analista de Desenvolvimento de Sistemas

Mogi das Cruzes-SP

xHB121+Fw912 / C#/SQL2008

"Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedores, boa noite!

O FWH não roda no Windows 7 ?

O que fazer ?

________________________

Gilberto Herminio - Analista de Desenvolvimento de Sistemas

Mogi das Cruzes-SP

xHB121+Fw912 / C#/SQL2008

"Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedores, boa noite!

O FWH não roda no Windows 7 ?

O que fazer ?

________________________

Gilberto Herminio - Analista de Desenvolvimento de Sistemas

Mogi das Cruzes-SP

xHB121+Fw912 / C#/SQL2008

"Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedores, bom domingo à todos!

Só pra complementar, eu consigo migar para SQL SERVER da Microsoft ? Ou seja, o FHW conversa com ele ?

________________________

Gilberto Herminio - Analista de Desenvolvimento de Sistemas

Mogi das Cruzes-SP

xHB121+Fw912 / C#/SQL2008

"Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedores, boa tarde!

Como faço para atualizar o texto do Prompt do CheckBox ?

Ele começa com a palavra "Filtro" mas, dependendo do processo, poderá vira "Filtro Ausênte"

@ 09.0,41.3 CheckBox oFiltro Var vFiltro Prompt "Filtro" Of oDlg FONT oFont2 Size 060,15 COLOR RGB(200,000,100)

oFiltro:ctooltip="Ativa filtro de Rejeição do DNE..."

oFiltro:Enable()

daí lá mais abaixo no programa, segue a seguinte situação:

ArqRej = StrTran(Alltrim(ArqSai),".001","CLE.REJ")

If !File(ArqRej)

Prompt:=SetText("Filtro Ausente:"+ArqRej+" !") <<<== AKI!!!

oFiltro:Refresh()

// oFiltro:UpDate()

Else

Sucesso!!!

________________________

Gilberto Herminio - Analista de Desenvolvimento de Sistemas

Mogi das Cruzes-SP

xHB121+Fw912 / C#/SQL2008

"Não Desenvolvo Software, crio arte Binaria...."

Editado por - sig_gilberto on 01/06/2012 13:26:55

Editado por - sig_gilberto on 01/06/2012 13:31:13

Olá Desenvolvedores, boa tarde!

Como faço para atualizar o texto do Prompt do CheckBox ?

Ele começa com a palavra "Filtro" mas, dependendo do processo, poderá vira "Filtro Ausênte"

@ 09.0,41.3 CheckBox oFiltro Var vFiltro Prompt "Filtro" Of oDlg FONT oFont2 Size 060,15 COLOR RGB(200,000,100)

oFiltro:ctooltip="Ativa filtro de Rejeição do DNE..."

oFiltro:Enable()

daí lá mais abaixo no programa, segue a seguinte situação:

ArqRej = StrTran(Alltrim(ArqSai),".001","CLE.REJ")

If !File(ArqRej)

Prompt:=SetText("Filtro Ausente:"+ArqRej+" !") <<<== AKI!!!

oFiltro:Refresh()

// oFiltro:UpDate()

Else

Sucesso!!!

________________________

Gilberto Herminio - Analista de Desenvolvimento de Sistemas

Mogi das Cruzes-SP

xHB121+Fw912 / C#/SQL2008

"Não Desenvolvo Software, crio arte Binaria...."

Editado por - sig_gilberto on 01/06/2012 13:26:55

Editado por - sig_gilberto on 01/06/2012 13:31:13

ops......

achei :

var=HB_OemToAnsi(HB_UTF8ToStr("Rede de Hotéis Costeiros"))

Obrigado!!!

________________________

Gilberto Herminio - Analista de Desenvolvimento de Sistemas

Mogi das Cruzes-SP

xHB121+Fw912 / C#/SQL2008

"Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedores, boa tarde!

Estou com problemas na importação de um arquivo TXT para DBF, e não sei como resolvê-lo :

Exemplo :

Linha do TXT "Rede de Hotéis Costeiros"

Quando aplico o Append From para um DBF..

Coluna do DBF "Rede de Hotéis Costeiros"

Alguêm poderia me dar esta "LUZ" ?

Sucesso!!

________________________

Gilberto Herminio - Analista de Desenvolvimento de Sistemas

Mogi das Cruzes-SP

xHB121+Fw912 / C#/SQL2008

"Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedores, boa tarde!

Estou com problemas na importação de um arquivo TXT para DBF, e não sei como resolvê-lo :

Exemplo :

Linha do TXT "Rede de Hotéis Costeiros"

Quando aplico o Append From para um DBF..

Coluna do DBF "Rede de Hotéis Costeiros"

Alguêm poderia me dar esta "LUZ" ?

Sucesso!!

________________________

Gilberto Herminio - Analista de Desenvolvimento de Sistemas

Mogi das Cruzes-SP

xHB121+Fw912 / C#/SQL2008

"Não Desenvolvo Software, crio arte Binaria...."

Oziel,

Caso possa me mate uma dúvida.

No meu micro que é Win7, ao conectar esta impressora, na lista de aparelhos, ela aparece como USB 2.0 To COM Device.

Ao tantar instalar ou atualizar o Driver apontando pra pasrta onde baixei a BEMAFI32.dll, não corre...

Pode me ajudar ?

________________________

Gilberto Herminio - Analista de Desenvolvimento de Sistemas

Mogi das Cruzes-SP

xHB121+Fw912 / C#/SQL2008

"Não Desenvolvo Software, crio arte Binaria...."

Oziel, Grato pela sua atenção...

Vou testar e lhe dou retorno.

Grato!

________________________

Gilberto Herminio - Analista de Desenvolvimento de Sistemas

Mogi das Cruzes-SP

xHB121+Fw912 / C#/SQL2008

"Não Desenvolvo Software, crio arte Binaria...."

Olá Desenvolvedor, bom dia!

Onde posso achar o driver de instalação da impressora Bematech MP 20 ?

Ela será usada no Windows 7 e XP.

Sucesso!!

________________________

Gilberto Herminio - Analista de Desenvolvimento de Sistemas

Mogi das Cruzes-SP

xHB121+Fw912 / C#/SQL2008

"Não Desenvolvo Software, crio arte Binaria...."

Editado por - sig_gilberto on 31/10/2011 09:48:01

Editado por - sig_gilberto on 31/10/2011 09:48:31