Clique abaixo para nos ajudar
Login

Esqueci minha senha

Estamos no Facebook
Buscar
 
 

Resultados por:
 


Rechercher Busca avançada

Quem está conectado
17 usuários online :: 1 usuário cadastrado, Nenhum Invisível e 16 Visitantes :: 2 Motores de busca

azengaroth

[ Ver toda a lista ]


O recorde de usuários online foi de 468 em 1/3/2012, 10:43
Últimos assuntos
» URGENTE - Instalação do aplicativo
Hoje à(s) 08:51 por Douglas Pascini

» Conexão Sql Server
Ontem à(s) 12:18 por Douglas Pascini

» como fazer essa imagem clicavel
22/1/2017, 13:56 por flavio dos reis

» USAR REPORT FORM
20/1/2017, 15:00 por ImRicoh

» Impressora Ticket
20/1/2017, 08:25 por ImRicoh

» Visite meu canal no Youtube
20/1/2017, 00:45 por ImRicoh

» Protocolo de comunicação porta serial
19/1/2017, 16:48 por rodiney

» Bloquear edição do ListBox
17/1/2017, 23:38 por Dipaula

» Ajuda em Script VBS
16/1/2017, 11:22 por carlosdantasf

» automação do mozilla e chrome
15/1/2017, 12:16 por Handerson Mildroz

» Aplicação Android algoritmos de aprendizagem pseudocódigo
4/1/2017, 01:09 por diegoveloper

» COMO ESTÃO DESENVOLVENDO EM WEB?
3/1/2017, 10:21 por felipe.palucoski

»  Um For não enxerga outro no DataGrid! (VIsual Basic)
2/1/2017, 12:44 por Ana Waldila

» C# criar checkBox Transparente
28/12/2016, 12:26 por flavio dos reis

» Menu lateral exemplo em VFP
28/12/2016, 11:55 por mxavier

» dll pertocheck
23/12/2016, 13:47 por FERNANDOMATRELLA

» Rota de um arquivo
23/12/2016, 09:01 por Julio

» BANIMENTO DE USUARIO
22/12/2016, 12:48 por Marcos Guedes

» USAR WEBSERVICE NO VFP9
20/12/2016, 18:33 por FAF

» CALCULO
19/12/2016, 18:48 por David Valerio

URGENTE - Instalação do aplicativo

24/1/2017, 08:51 por Douglas Pascini

Bom dia. Estou com um problema, ao fazer a instalação (colocar os arquivo) do aplicativo na …

Comentários: 0

Conexão Sql Server

23/1/2017, 12:18 por Douglas Pascini

Estou mudando meu servidor, para uma máquina remota. Até ai perfeito, o problema acontece que …

Comentários: 0

USAR REPORT FORM

30/12/2016, 09:06 por AJC

Pessoal bom dia,
Estou com um grande problema, já pesquisei muita coisa sobre report form, mas o …

Comentários: 3

Impressora Ticket

15/11/2016, 09:20 por clima238

Bom dia,
Por favor alguém me explique porque o código abaixo imprime no ecrã em vez do printer: …

Comentários: 2

Visite meu canal no Youtube

20/1/2017, 00:45 por ImRicoh

VFP Unlimited


Comentários: 0

Estatísticas
Temos 6993 usuários registrados
O último usuário registrado atende pelo nome de azengaroth

Os nossos membros postaram um total de 12 mensagens em 6 assuntos

Lei sobre manter XMLs emitidas na NET

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Em curso Lei sobre manter XMLs emitidas na NET

Mensagem por hugo em 14/6/2010, 18:52

Galera

O contador da empresa me solicitou o seguinte:

Que nossos clientes tenham a possibilidade de baixar a qualquer momento os XMLs emitidos por nos a favor do cnpj ou cpf deles da internet.

Dai venho aqui debater com voces qual a melhor forma de resolver isto!

O software terceirizado que tenho aqui deixa todos xmls numa pasta!

O nome dos arquivos sao na seguinte estrutura:
31100604700342000175550010000010671111406102-nfe.xml
31100604700342000256550010000432401111006108-ped-canc.xml

O backup é feito diariamente e a pasta esta sempre vazia para o proximo dia de trabalho.

Bom pensei num programa que que vai ler os xmls e criar um subdiretorio com o nome do cnpj ou cpf do destinatario, dai todas xmls emitidas para ele naquele dia vao ser guardadas num arquivo .rar (por exemplo) e com senha (uma ideia).

Este programa vai conectar num servidor ftp e fazer o up de todos arquivos .rar que foram gerados neste dia, (contemplando que por algum motivo posso rodar este programa e fazer dois dias), de qualquer forma os arquivos ficariam assim:

Código:
c:\
 |_xml
    |_01001001001000101
    |              |_ 2010_06_01_xmls_emit_teste_dest_teste2.rar
    |              |_ 2010_06_02_xmls_emit_teste_dest_teste2.rar
    |   
    |_02002002002000202
                  |_ 2010_06_01_xmls_emt_teste_dest_teste2.rar

Alem de que galera, ter tudo isto em FTP eh mais uma seguranca para a empresa!


abaixo o programinha em andamento

Código:
SET SCOREBOARD OFF
SET TALK OFF
SET SAFETY OFF
SET DELETED ON
SET ESCAPE OFF
SET STAT OFF
CLOSE ALL
CLEAR ALL
clear

dir="c:\xml"
arq="*-nfe.xml"
lista="lista.txt"
!dir /b &arq > &lista
USE xmls excl
ZAP
APPEND FROM &lista TYPE SDF

SELECT xmls
GO TOP

DO WHILE !EOF()
   arq='"'+ALLTRIM(linha1)+'"'
   XMLTOCURSOR(&arq,"relat",512)
   numero=LEFT(relat.dest,14)
   IF RIGHT(numero,1)$" abcdefghijklmnopqrstuvxwyzABCDEFGHIJKLMNOPQRSTUVWXYZ"
      numero=LEFT(numero,11)
   ENDIF
   dire=dir+""+"senha.dbf"
   diret=dir+""+numero+""+"senha.dbf"
   IF !file(diret)
      !md &numero
      USE &dire shar IN 0
      senha=ALLTRIM(STR(ABS(INT(VAL(numero)/1353))))
      replace senha.nrsenha WITH senha
      SELECT senha
      use
      COPY file &dire TO &diret
   ENDIF
   ? numero
   ? senha
   SELECT xmls
   COPY FILE ALLTRIM(xmls.linha1) TO dir+""+numero+""+ALLTRIM(xmls.linha1)
   DELETE FILE ALLTRIM(xmls.linha1)
   SKIP
ENDDO

clear

CLOSE ALL

quem quiser malhar em cima comigo tamo ai!


AINDA NAO TIVE TEMPO DE CRIAR A PARTE DA COMPACTACAO

valeu!


Última edição por hugo em 15/6/2010, 16:53, editado 3 vez(es)

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Em curso Re: Lei sobre manter XMLs emitidas na NET

Mensagem por hugo em 14/6/2010, 23:27

UP MARCOS

resolvi a parte da senha

falta criar agora a parte da compactacao

vou usar

arj a -jm -g &senha allt(xmls.linha1) allt(xmls.linha1)*
*(obs: so que arj)

porem ficaria melhor se fosse zip, mais amigavel

pensando em usar um script do cobian, talvez winrar



a dificuldade esta na automatizacao de conectar num ftp
e fazer o up automatico!


hehehehe

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Em curso Re: Lei sobre manter XMLs emitidas na NET

Mensagem por Marcos Guedes em 15/6/2010, 08:26

Qual linguagem pretendes utilizar?
VFP?

Espera o jogo do Brasil acabar que agente voltar para isto!
Very Happy

É hoje!!!
lol! bounce

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Em curso Re: Lei sobre manter XMLs emitidas na NET

Mensagem por hugo em 15/6/2010, 08:35

vfp eh claro

hehe

vou atualizando aqui meu codigo a medida que for caminhando
e dai vemos o que conseguimos

vou providenciar um local de armazenamento e talz

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Em curso Re: Lei sobre manter XMLs emitidas na NET

Mensagem por hugo em 15/6/2010, 16:52

up na dissertacao inicial

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum