2 replies to this topic

[sir_alejandro]

bom dia a todos estou com um problemaço ..comecei agora como desenvolvedor, e a primeira bucha eh gerar um txt em vb6 que sei que ja esta ultrapassado, mas estou apanhando a beça e o prazo eh ate amanha sera que poderia me ajudar me passando uma rotina mediante a analise desses dados abaixo : agradeço desde ja

Processamento do Botão G.txt
Consiste em selecionar os Clientes , as Lista de Preço e seus produtos e demais dados.

A seguir gerar os txts conforme formato abaixo fornecido pelo Andrey.



Selecionar os Clientes

Para cada cliente conforme o filtro de Clientes informado na tela obter os campos especificados abaixo e gravar o registro no formato ITP.



Registro txt no formato ITP

Haverá um registro para cada Cliente



CNPJ do Cliente :

Com cd_empresa + cd_unidade_negocio + ‘CLI’+ Código do Cliente selecionado acessar a tabela com_entidade . onde

cd_empresa = cd_empresa

cd_unidade_negocio = cd_unidade_negocio

CLI = tp_entidade

Código Informado = cd_entidade_interna

e obter o campo cd_empresa_externa e cd_unidade_negocio_externa

Com cd_empresa_externa + cd_unidade_negocio_externa acessar a tabela

com_empresa_unid_negoc_externa e obter os campos

nu_cgc_cpf

nu_cgc_estabelecimento

nu_cgc_digito

junta-los em um único campo

CNPJ = nu_cgc_cpf + nu_cgc_estabelecimento + nu_cgc_digito



Unidade ( Dyna,DynaMG,ou DynaPr)

Com cd_unidade_negocio acessar tabela ins_unidade_negocio e obter as 7 ( sete ) primeiras posições do campo nm_unidade_negocio.

Atenção : O conteúdo do campo nm_unidade_negocio deve ser alterada nas bases de dados da Dyna conforme abaixo
Unidade Descrição

0001 YNAGR

0002 YNAMG

0005 YNAPR



Razão Social ( da Empresa Unidade da Dyna )
Com cd_empresa_externa acessar a tabela com_empresa_externa e obter o campo nm_razão_social



Registro txt no formato TA1

Haverá um registro para cada Produto Cliente



Para cada Cliente selecionado e com

cd_empresa + cd_unidade_negocio + cd_lista_preço _ nu_versão , selecionar todos os cd_item da tabela pdv_lista_preço_item





Código do Produto = cd_item

Descrição do Produto = de_item

Com cd_empresa + cd_unidade_negocio + cd_item acessar tabela itm_item e obter o campo de_item

Unidade Medida = cd_unidade

Com cd_empresa + cd_unidade_negocio + cd_item acessar tabela itm_item e obter o campo cd_unidade

Preço do Produto = va_preco_unitário

Com cd_empresa + cd_unidade_negocio + cd_lista_preço + nu_versão + cd_item acessar tabela pdv_lista_preço_item e obter o campo va_preco_unitário

Obs: O Preço do Produto deve ser gravado c/ 2 pos.decimais. Se 10,55 gravar 00...0001055 ( complementar com zeros a esquerda.

Na tabela pdv_lista_preço_item o campo va_preco_unitário possui 5 posições decimais portanto as 3 últimas devem ser despresadas.

No exemplo acima , o campo va_preco_unitário estaria gravado com 000000001055000

Portanto os 3 últimos zeros devem ser suprimidos

Peso do Produto = va_peso_bruto ( Dúvida : É peso bruto ou Líquido. Verificar. ) Se for peso líquido o campo será va_peso_liquido

Com cd_empresa + cd_unidade_negocio + cd_item acessar tabela itm_item e obter o campo va_peso_bruto ou va_peso_liquido



Registro txt no formato FTP

Haverá um registro para cada Cliente fechando o Arquivo do Cliente

A quantidade de registros deverá ser a soma dos registros tipo ITP + TA1 + FTP



Arquivo a ser gravado
O nome do arquivo a ser gravado deverá ser formado por:

PC + Código do Cliente ( cd_entidade_interna ). ANS



E deverá ser gravado na Pasta definida na tabela

ins_parametros_exportacao_sintel









Campo da pasta

nm_diretorio_saida_txt_lista_preco







Formato do Lay out




Lay out de Exportação de Lista de Preço






Segmento
Pos. Inicial
pos. Final
Descrição

ITP
1
14
Identificação do Layout Fixo: ITP60001 + 5 espaços

ITP
15
29
cnpj do Cliente

ITP
30
37
Unidade ( yna,ynaMG,ou ynaPr)

ITP
38
62
Razão Social ( da yna )

TA1
1
3
Constante TA1

TA1
4
34
Código do Produto

TA1
35
60
Descrição do Produto

TA1
61
63
Unidade Medida

TA1
64
79
Preço do Produto c/ 2pos.decimais. Se 10,55 gravar 00...0001055 ( complementar com zeros a esquerda )

TA1
80
86
Peso do Produto ( Idem a valor )

FTP
1

Preencher FTP seguido de 5 zeros + total de registros com 9 zeros + 17 zeros + 94 espaços em branco

[RonsisM]

Isoniazid online pharmacy Viagra Dapoxetine Reviews
Cos E Il Viagra Furosemide Over The Counter Substitute Usual Dosage Of Amoxicillin
Tadalafil viagra levitra cialis Cialis 20mg Einnahme

[JeffMalm]

com 20 E2 AD 90 20Black 20Viagra 20Pill 20 20Avis 20Sur 20Le 20Viagra avis sur le viagra Syria s opposition accuses Assad s government of carrying out a brutal campaign against Syrians that culminated in a nerve gas attack in suburbs of the capital, Damascus, on Aug stromectol singapore