Tabela/Campo RE1001A1 - aba Totais II

41 views

Skip to first unread message

o.esa...@gmail.com

unread,

May 19, 2023, 6:41:38 AM5/19/23

to Progress - 4GL

Pessoal, bom dia.

Por favor alguém saberia dizer em qual tabela/campo ficam registradas as informações pertinentes aos totais dos itens e a respectiva diferença ?

Exemplo:

Base Cálculo ICMS Total da Nota (ok) Total dos Itens (?) Diferença (?)

Base Cálculo IPI Total da Nota (ok) Total dos Itens (?) Diferença (?)

Muito Obrigado pelo apoio.

Orlando Junior

Sidival Nascimento

unread,

May 19, 2023, 11:47:55 AM5/19/23

to progre...@googlegroups.com

Boa Tarde Orlando,

Tabela it-nota-fisc, sobre os campo to um pouco com duvida mas usa o programa abaixo trocando ali no for each pela sua nota que o programa vai gerar um csv mostrando os campos e os valores de cada campo :).

output to c:\temp\it-nota-fisc.csv .

put "cod-estabel ;
serie ;
nr-nota-fis ;
nr-seq-fat ;
it-codigo ;
peso-liq-fat ;
peso-bruto ;
qt-faturada[1] ;
qt-faturada[2] ;
un-fatur[1] ;
un-fatur[2] ;
vl-pretab ;
vl-preori ;
vl-preuni ;
vl-merc-tab ;
vl-merc-ori ;
vl-merc-liq ;
vl-tot-item ;
per-des-item ;
nr-ordem ;
parcela ;
ind-imp-desc ;
baixa-estoq ;
tipo-con-est ;
cod-depos ;
nat-operacao ;
cd-trib-ipi ;
aliquota-ipi ;
perc-red-ipi ;
cd-trib-iss ;
aliquota-ISS ;
cd-trib-icm ;
aliquota-icm ;
perc-red-icm ;
atual-estat ;
vl-despes-it ;
vl-bicms-it ;
vl-icms-it ;
vl-icmsnt-it ;
vl-icmsou-it ;
vl-bipi-it ;
vl-ipi-it ;
vl-ipint-it ;
vl-ipiou-it ;
vl-biss-it ;
vl-iss-it ;
vl-issnt-it ;
vl-issou-it ;
vl-bsubs-it ;
vl-icmsub-it ;
manut-icm-it ;
manut-ipi-it ;
nr-pedido ;
vl-reajuste ;
vl-cuscontab ;
tipo-contr ;
vl-precon ;
perc-red-iss ;
ind-icm-ret ;
ct-cuscon ;
sc-cuscon ;
ct-cusven ;
sc-cusven ;
ind-imprenda ;
vl-irf-it ;
vl-merc-sicm ;
no-ab-vend ;
nr-ord-produ ;
dt-retorno ;
cd-vendedor ;
dt-cancela ;
dt-confirma ;
dt-emis-nota ;
codigo-rejei ;
desc-devol ;
nr-ficha-cq ;
per-des-icms ;
tipo-atend ;
ind-componen ;
vl-ir-adic ;
class-fiscal ;
ind-sit-nota ;
cod-servico ;
vl-finsocial ;
vl-pis ;
nr-nota-ant ;
serie-ant ;
cod-refer ;
nr-seq-ped ;
nr-pedcli ;
nome-ab-cli ;
vl-pretab-e[1] ;
vl-pretab-e[2] ;
vl-pretab-e[3] ;
vl-preori-e[1] ;
vl-preori-e[2] ;
vl-preori-e[3] ;
vl-preuni-e[1] ;
vl-preuni-e[2] ;
vl-preuni-e[3] ;
vl-merctab-e[1] ;
vl-merctab-e[2] ;
vl-merctab-e[3] ;
vl-mercori-e[1] ;
vl-mercori-e[2] ;
vl-mercori-e[3] ;
vl-mercliq-e[1] ;
vl-mercliq-e[2] ;
vl-mercliq-e[3] ;
vl-totitem-e[1] ;
vl-totitem-e[2] ;
vl-totitem-e[3] ;
vl-despesit-e[1] ;
vl-despesit-e[2] ;
vl-despesit-e[3] ;
vl-bicmsit-e[1] ;
vl-icmsit-e[1] ;
vl-icmsntit-e[1] ;
vl-icmsouit-e[1] ;
vl-bipiit-e[1] ;
vl-ipiit-e[1] ;
vl-ipintit-e[1] ;
vl-ipiouit-e[1] ;
vl-bissit-e[1] ;
vl-issit-e[1] ;
vl-issntit-e[1] ;
vl-issouit-e[1] ;
vl-bsubsit-e[1] ;
vl-icmsubit-e[1] ;
vl-reajuste-e[1] ;
vl-cuscontab-e[1];
vl-precon-e[1] ;
vl-irfit-e[1] ;
vl-mercsimc-e[1] ;
vl-bicmsit-e[2] ;
vl-icmsit-e[2] ;
vl-icmsntit-e[2] ;
vl-icmsouit-e[2] ;
vl-bipiit-e[2] ;
vl-ipiit-e[2] ;
vl-ipintit-e[2] ;
vl-ipiouit-e[2] ;
vl-bissit-e[2] ;
vl-issit-e[2] ;
vl-issntit-e[2] ;
vl-issouit-e[2] ;
vl-bsubsit-e[2] ;
vl-icmsubit-e[2] ;
vl-reajuste-e[2] ;
vl-cuscontab-e[2];
vl-precon-e[2] ;
vl-irfit-e[2] ;
vl-mercsimc-e[2] ;
vl-bicmsit-e[3] ;
vl-icmsit-e[3] ;
vl-icmsntit-e[3] ;
vl-icmsouit-e[3] ;
vl-bipiit-e[3] ;
vl-ipiit-e[3] ;
vl-ipintit-e[3] ;
vl-ipiouit-e[3] ;
vl-bissit-e[3] ;
vl-issit-e[3] ;
vl-issntit-e[3] ;
vl-issouit-e[3] ;
vl-bsubsit-e[3] ;
vl-icmsubit-e[3] ;
vl-reajuste-e[3] ;
vl-cuscontab-e[3] ;
vl-precon-e[3] ;
vl-irfit-e[3] ;
vl-mercsimc-e[3] ;
vl-ipi-dev ;
vl-sub-emp ;
vl-comp-acum ;
it-nota-fisc ;
fat-retro ;
vl-icmscomp-it ;
vl-icmscmp-it-e[1] ;
vl-icmscmp-it-e[2] ;
vl-icmscmp-it-e[3] ;
cod-est-ven ;
nr-entrega ;
cd-sit-desp ;
cd-emitente ;
nat-docum ;
nivel-restituicao ;
nr-docum ;
pc-restituicao ;
serie-docum ;
nr-ord-prod ;
ind-fat-qtfam ;
vl-preuni-zfm ;
vl-merc-liq-zfm ;
conh-frete ;
emite-duplic ;
aliquota-tax ;
cod-vat ;
cod-tax ;
vl-iva-it ;
vl-biva-it ;
referencia-ct ;
cod-localiz ;
qt-devolvida[1] ;
qt-devolvida[2] ;
vl-frete-it ;
char-1 ;
char-2 ;
dec-1 ;
dec-2 ;
int-1 ;
int-2 ;
log-1 ;
log-2 ;
data-1 ;
data-2 ;
vl-desconto ;
nr-remito ;
check-sum ;
log-usa-tabela-desconto ;
val-pct-desconto-tab-preco ;
des-pct-desconto-inform ;
val-desconto-inform ;
val-pct-desconto-total ;
val-pct-desconto-periodo ;
val-pct-desconto-prazo ;
val-desconto-total ;
val-desconto[1] ;
val-desconto[2] ;
val-desconto[3] ;
val-desconto[4] ;
val-desconto[5] ;
nr-tabpre ;
vl-pretab-me ;
vl-preori-me ;
vl-preuni-me ;
vl-merc-tab-me ;
vl-merc-ori-me ;
vl-merc-liq-me ;
vl-tot-item-me ;
vl-despes-it-me ;
vl-reajuste-me ;
vl-cuscontab-me ;
vl-precon-me ;
vl-merc-sicm-me ;
vl-iva-it-me ;
vl-frete-it-me ;
vl-biva-it-me ;
vl-desconto-me ;
ser-remito ;
nr-seq-it-rmt ;
nr-embarque ;
dec-ftconv-unest ;
num-casa-dec-unest ;
ind-origem-fator ;
val-retenc-csll ;
val-retenc-pis ;
val-retenc-cofins ;
idi-forma-calc-pis ;
idi-forma-calc-cofins ;
val-unit-pis ;
val-unit-cofins ;
log-preco-unid-medid-estoq ;
vl-preori-un-fat ;
cod-unid-negoc ;
val-sat ;
val-senar ;
cod-sit-tributar-ipi ;
cod-sit-tributar-pis ;
cod-sit-tributar-cofins ;
idi-modalid-base-icms ;
idi-modalid-base-ipi ;
idi-modalid-base-icms-st ;
num-romaneio ;
val-base-pis-substto ;
val-base-cofins-substto ;
num-seq-roman ;
nat-terc ;
cod-cta-ctbl-cust-ctbl ;
cod-cta-ctbl-cust-produt-vendido;
cdd-embarq ;
val-perc-icms-diferim ;
cod-ord-compra

" at 0 skip.

for each it-nota-fisc where nr-nota-fis = "00000000" :

export delimiter ";"
cod-estabel
serie
nr-nota-fis
nr-seq-fat
it-codigo
peso-liq-fat
peso-bruto
qt-faturada[1]
qt-faturada[2]
un-fatur[1]
un-fatur[2]
vl-pretab
vl-preori
vl-preuni
vl-merc-tab
vl-merc-ori
vl-merc-liq
vl-tot-item
per-des-item
nr-ordem
parcela
ind-imp-desc
baixa-estoq
tipo-con-est
cod-depos
nat-operacao
cd-trib-ipi
aliquota-ipi
perc-red-ipi
cd-trib-iss
aliquota-ISS
cd-trib-icm
aliquota-icm
perc-red-icm
atual-estat
vl-despes-it
vl-bicms-it
vl-icms-it
vl-icmsnt-it
vl-icmsou-it
vl-bipi-it
vl-ipi-it
vl-ipint-it
vl-ipiou-it
vl-biss-it
vl-iss-it
vl-issnt-it
vl-issou-it
vl-bsubs-it
vl-icmsub-it
manut-icm-it
manut-ipi-it
nr-pedido
vl-reajuste
vl-cuscontab
tipo-contr
vl-precon
perc-red-iss
ind-icm-ret
ct-cuscon
sc-cuscon
ct-cusven
sc-cusven
ind-imprenda
vl-irf-it
vl-merc-sicm
no-ab-vend
nr-ord-produ
dt-retorno
cd-vendedor
dt-cancela
dt-confirma
dt-emis-nota
codigo-rejei
desc-devol
nr-ficha-cq
per-des-icms
tipo-atend
ind-componen
vl-ir-adic
class-fiscal
ind-sit-nota
cod-servico
vl-finsocial
vl-pis
nr-nota-ant
serie-ant
cod-refer
nr-seq-ped
nr-pedcli
nome-ab-cli
vl-pretab-e[1]
vl-pretab-e[2]
vl-pretab-e[3]
vl-preori-e[1]
vl-preori-e[2]
vl-preori-e[3]
vl-preuni-e[1]
vl-preuni-e[2]
vl-preuni-e[3]
vl-merctab-e[1]
vl-merctab-e[2]
vl-merctab-e[3]
vl-mercori-e[1]
vl-mercori-e[2]
vl-mercori-e[3]
vl-mercliq-e[1]
vl-mercliq-e[2]
vl-mercliq-e[3]
vl-totitem-e[1]
vl-totitem-e[2]
vl-totitem-e[3]
vl-despesit-e[1]
vl-despesit-e[2]
vl-despesit-e[3]
vl-bicmsit-e[1]
vl-icmsit-e[1]
vl-icmsntit-e[1]
vl-icmsouit-e[1]
vl-bipiit-e[1]
vl-ipiit-e[1]
vl-ipintit-e[1]
vl-ipiouit-e[1]
vl-bissit-e[1]
vl-issit-e[1]
vl-issntit-e[1]
vl-issouit-e[1]
vl-bsubsit-e[1]
vl-icmsubit-e[1]
vl-reajuste-e[1]
vl-cuscontab-e[1]
vl-precon-e[1]
vl-irfit-e[1]
vl-mercsimc-e[1]
vl-bicmsit-e[2]
vl-icmsit-e[2]
vl-icmsntit-e[2]
vl-icmsouit-e[2]
vl-bipiit-e[2]
vl-ipiit-e[2]
vl-ipintit-e[2]
vl-ipiouit-e[2]
vl-bissit-e[2]
vl-issit-e[2]
vl-issntit-e[2]
vl-issouit-e[2]
vl-bsubsit-e[2]
vl-icmsubit-e[2]
vl-reajuste-e[2]
vl-cuscontab-e[2]
vl-precon-e[2]
vl-irfit-e[2]
vl-mercsimc-e[2]
vl-bicmsit-e[3]
vl-icmsit-e[3]
vl-icmsntit-e[3]
vl-icmsouit-e[3]
vl-bipiit-e[3]
vl-ipiit-e[3]
vl-ipintit-e[3]
vl-ipiouit-e[3]
vl-bissit-e[3]
vl-issit-e[3]
vl-issntit-e[3]
vl-issouit-e[3]
vl-bsubsit-e[3]
vl-icmsubit-e[3]
vl-reajuste-e[3]
vl-cuscontab-e[3]
vl-precon-e[3]
vl-irfit-e[3]
vl-mercsimc-e[3]
vl-ipi-dev
vl-sub-emp
vl-comp-acum
it-nota-fisc
fat-retro
vl-icmscomp-it
vl-icmscmp-it-e[1]
vl-icmscmp-it-e[2]
vl-icmscmp-it-e[3]
cod-est-ven
nr-entrega
cd-sit-desp
cd-emitente
nat-docum
nivel-restituicao
nr-docum
pc-restituicao
serie-docum
nr-ord-prod
ind-fat-qtfam
vl-preuni-zfm
vl-merc-liq-zfm
conh-frete
emite-duplic
aliquota-tax
cod-vat
cod-tax
vl-iva-it
vl-biva-it
referencia-ct
cod-localiz
qt-devolvida[1]
qt-devolvida[2]
vl-frete-it
char-1
char-2
dec-1
dec-2
int-1
int-2
log-1
log-2
data-1
data-2
vl-desconto
nr-remito
check-sum
log-usa-tabela-desconto
val-pct-desconto-tab-preco
des-pct-desconto-inform
val-desconto-inform
val-pct-desconto-total
val-pct-desconto-periodo
val-pct-desconto-prazo
val-desconto-total
val-desconto[1]
val-desconto[2]
val-desconto[3]
val-desconto[4]
val-desconto[5]
nr-tabpre
vl-pretab-me
vl-preori-me
vl-preuni-me
vl-merc-tab-me
vl-merc-ori-me
vl-merc-liq-me
vl-tot-item-me
vl-despes-it-me
vl-reajuste-me
vl-cuscontab-me
vl-precon-me
vl-merc-sicm-me
vl-iva-it-me
vl-frete-it-me
vl-biva-it-me
vl-desconto-me
ser-remito
nr-seq-it-rmt
nr-embarque
dec-ftconv-unest
num-casa-dec-unest
ind-origem-fator
val-retenc-csll
val-retenc-pis
val-retenc-cofins
idi-forma-calc-pis
idi-forma-calc-cofins
val-unit-pis
val-unit-cofins
log-preco-unid-medid-estoq
vl-preori-un-fat
cod-unid-negoc
val-sat
val-senar
cod-sit-tributar-ipi
cod-sit-tributar-pis
cod-sit-tributar-cofins
idi-modalid-base-icms
idi-modalid-base-ipi
idi-modalid-base-icms-st
num-romaneio
val-base-pis-substto
val-base-cofins-substto
num-seq-roman
nat-terc
cod-cta-ctbl-cust-ctbl
cod-cta-ctbl-cust-produt-vendido
cdd-embarq
val-perc-icms-diferim
cod-ord-compra .
end.
output close.

--
Recebeu esta mensagem porque subscreveu ao grupo "Progress - 4GL" do Grupos do Google.
Para anular a subscrição deste grupo e parar de receber emails do mesmo, envie um email para progress_4gl...@googlegroups.com.
Para ver este debate na Web, visite https://groups.google.com/d/msgid/progress_4gl/97e6ad87-9549-4ce8-97d3-bbb226b0ab0bn%40googlegroups.com.

Sem Mais
Sidival F. Nascimento
Analista de Sistemas
Laos Consultoria em Informatica LTDA.

Reply all

Reply to author

Forward

0 new messages