3499 - REGISTRO 1100 - REGISTRO DE INFORMAÇÕES DE EXPORTAÇÃO
Problema: Descrição do Problema: Como gerar o registro 1100 em algumas situações:
Quando ocorre / onde se aplica: Geração do SPED Fiscal
Solução: Solução: Considerar como filtro para geração do registro 1100 do Controle de Embarque, a Data de Averbação, e não mais a Data de Emissão. Com isso no registro 1100, foi implementado tratamento, para que seja gerada a Data de Averbação e não mais a Data do Controle de Embarque.
Exemplo de regra para gerar o registro 1100 com base numa tabela de usuário:
Definir Alfa IMPAREG;
Definir Alfa IMPACMDSQL;
Se (IMPAREG = 1100)
inicio
IMPAREG = 1100;
IMPACMDSQL = SELECT USU_INDDOC AS TIPDOC, USU_NRODE AS NUMDEC, USU_DATDE AS DATDEC, +
USU_NATEXP AS TIPEXP, USU_NRORE AS NUMREX, USU_DATRE AS DATREX, +
USU_CHCEMB AS NUMCEM, USU_DATCHC AS DATCEM, USU_DATAVB AS DATAVE, +
USU_TIPCHC AS TIPCTR, E006PAI.PAISIS +
FROM USU_TECF1100, E006PAI +
WHERE USU_TECF1100.USU_CODPAI = E006PAI.CODPAI AND +
USU_TECF1100.USU_CODEMP = {CODEMP} AND +
USU_TECF1100.USU_CODFIL = {CODFIL} AND +
USU_TECF1100.USU_DATAVB >= {DATINI} AND +
USU_TECF1100.USU_DATAVB <= {DATFIM};
fim;
Para gerar 1100 e 1105 para NF eletrônica:
Lancei a NF de Exportação com a Série eletrônica e espécie 55.
Lancei o Controle de Embarque e fiz a ligação dessa nota eletrônica de exportação.
Gerou o registro C100, C190, 1100 e 1105.
C100|1|0|CLI000010004|55|00|55|000144445||12072012|12072012|20000,00|2|0,00|0,00|20000,00|9|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|
|C190|000|7101|0,00|20000,00|0,00|0,00|0,00|0,00|0,00|0,00||
|1100|0|00005555555|12072012|0|000022222222|12072012|4454444|12072012|12072012|04|000|
|1105|55|NFE|000144445||12072012|PRO1101|
Quando ocorre / onde se aplica: Geração do SPED Fiscal
Solução: Solução: Considerar como filtro para geração do registro 1100 do Controle de Embarque, a Data de Averbação, e não mais a Data de Emissão. Com isso no registro 1100, foi implementado tratamento, para que seja gerada a Data de Averbação e não mais a Data do Controle de Embarque.
Exemplo de regra para gerar o registro 1100 com base numa tabela de usuário:
Definir Alfa IMPAREG;
Definir Alfa IMPACMDSQL;
Se (IMPAREG = 1100)
inicio
IMPAREG = 1100;
IMPACMDSQL = SELECT USU_INDDOC AS TIPDOC, USU_NRODE AS NUMDEC, USU_DATDE AS DATDEC, +
USU_NATEXP AS TIPEXP, USU_NRORE AS NUMREX, USU_DATRE AS DATREX, +
USU_CHCEMB AS NUMCEM, USU_DATCHC AS DATCEM, USU_DATAVB AS DATAVE, +
USU_TIPCHC AS TIPCTR, E006PAI.PAISIS +
FROM USU_TECF1100, E006PAI +
WHERE USU_TECF1100.USU_CODPAI = E006PAI.CODPAI AND +
USU_TECF1100.USU_CODEMP = {CODEMP} AND +
USU_TECF1100.USU_CODFIL = {CODFIL} AND +
USU_TECF1100.USU_DATAVB >= {DATINI} AND +
USU_TECF1100.USU_DATAVB <= {DATFIM};
fim;
Para gerar 1100 e 1105 para NF eletrônica:
Lancei a NF de Exportação com a Série eletrônica e espécie 55.
Lancei o Controle de Embarque e fiz a ligação dessa nota eletrônica de exportação.
Gerou o registro C100, C190, 1100 e 1105.
C100|1|0|CLI000010004|55|00|55|000144445||12072012|12072012|20000,00|2|0,00|0,00|20000,00|9|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|0,00|
|C190|000|7101|0,00|20000,00|0,00|0,00|0,00|0,00|0,00|0,00||
|1100|0|00005555555|12072012|0|000022222222|12072012|4454444|12072012|12072012|04|000|
|1105|55|NFE|000144445||12072012|PRO1101|