Módulo: DOC. IMPORTAÇÃO
Funcionalidade: Relatórios
Data/Hora da Publicação: 14/06/2012 00:00:00
Data/Hora Última Alteração: 17/08/2012 15:35:51
Descrição da Nota: DAI - FORMATAR O CAMPO INSCRIÇÃO ESTADUAL (CDIMPORTADOR)
Sintoma
No programa /pws/zycir353, no campo referente à Inscrição Estadual (cdImportador) , formatar de
maneira que a informação de Inscrição Estadual tenha 9 caracteres:
Exemplo: Conteúdo do campo STATE_INSC na tabela J_1bbranch = 06.200.132-9
Como mandamos atualmente no XML: 00000062001329
Como devemos mandar: 062001329
Solução
Atualizado programa para converter a informação de Inscrição Estadual para caracteres para eliminar
zeros a esquerda.
9.0
Produto:
Nota
Descrição
Informações Complementares
----------------------------------------------------------------------------------------------------
Nota Número 12289 Data: 14/06/2012 Hora: 11:06:31
----------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------
Nota Número : 12289
Categoria : Melhoria
Prioridade : Baixa
Versão PW.CE : 9.0
Pacote : 00001
Agrupamento : 00116
----------------------------------------------------------------------------------------------------
Referência às notas relacionadas:
Número - Ordem - Versão - Pacote - Descrição Breve
12154 - 00001 - 8.0 - 00011 - DAI - DECLARAÇÃO AMAZONENSE DE IMPORTAÇÃO
----------------------------------------------------------------------------------------------------
DAI - FORMATAR O CAMPO INSCRIÇÃO ESTADUAL (CDIMPORTADOR)
----------------------------------------------------------------------------------------------------
Palavras Chave:
/PWS/ZYCIR353 - INSCRIÇÃO ESTADUAL DEVERÁ TER 9 CARACTERES
----------------------------------------------------------------------------------------------------
Objetos da nota:
REPS /PWS/ZYCIR353
TABD /PWS/ZYCIE518
----------------------------------------------------------------------------------------------------
Modificações efetuadas em REPS /PWS/ZYCIR353
...
FORM gerar_xml.
* >> Início da inclusão: FORM GERAR_XML
DATA: lv_inscr(9) TYPE n.
* << Fim da inclusão
CALL FUNCTION 'J_1BREAD_BRANCH_DATA'
EXPORTING
branch = p_branch
bukrs = p_bukrs
IMPORTING
branch_data = wa_j_1bbranch
EXCEPTIONS
branch_not_found = 1
address_not_found = 2
company_not_found = 3
OTHERS = 4.
itab_cab-tp_doc = '1'.
* >> Início da exclusão: FORM GERAR_XML
itab_cab-cod_import = wa_j_1bbranch-state_insc.
* << Fim da exclusão
* >> Início da inclusão: FORM GERAR_XML
lv_inscr = wa_j_1bbranch-state_insc.
itab_cab-cod_import = lv_inscr.
* << Fim da inclusão
APPEND itab_cab.
LOOP AT itab_zycit218.
itab_item-ncm = itab_zycit218-steuc.
itab_item-suframa = itab_zycit218-codigo.
itab_item-destinacao = itab_zycit218-destinacao.
itab_item-utilizacao = itab_zycit218-utilizacao.
itab_item-cod_trib = itab_zycit218-tributacao.
itab_item-nr_decreto = itab_zycit218-numdecreto.
itab_item-tp_doc = itab_zycit218-tpdoc.
itab_item-nr_doc = itab_zycit218-numdoc.
...
----------------------------------------------------------------------------------------------------
Modificações efetuadas em TABD /PWS/ZYCIE518
* Alterar o campo COD_IMPORT da Estrutura /PWS/ZYCIE518 de NUMC para CHAR
* Ele deverá ficar assim:
COD_IMPORT CHAR 14 Inscrição Estadual