Duvida Tabela valores FCP RE0701B

Discussão em 'EMS , HCM e Totvs 11' iniciado por Marcos Bianchi, Novembro 6, 2023.

  1. Marcos Bianchi

    Marcos Bianchi Sem Pontuação

    Alguém sabe em qual tabela ficam gravadas as informações de FCP e FCP ST (alíquota, base e valor) apresentadas no RE0701B? Todos os outros impostos consegui localizar na tabela "item-doc-est", exceto o FCP.
    Marcos Bianchi, Novembro 6, 2023
    #1
  2. bootstrapmaster

    bootstrapmaster Moderator Moderador Equipe de Suporte

    Manda um print da tela, aqui no meu re0701b não achei essas informações ...
    bootstrapmaster, Novembro 6, 2023
    #2
  3. Marcos Bianchi

    Marcos Bianchi Sem Pontuação

    No RE0701B, fica na guia "Impostos", dentro de "ICMS".

    Segue print:
    upload_2023-11-6_8-53-35.png
    Marcos Bianchi, Novembro 6, 2023
    #3
  4. jdchaves

    jdchaves Membro Participativo

    Bom dia, tenta esses:
    FCP - decimal(substring(it-doc-fisc.cod-livre-1, 028, 16))
    FCP ST - decimal(substring(it-doc-fisc.cod-livre-1, 068, 16))
    jdchaves, Novembro 6, 2023
    #4
  5. bootstrapmaster

    bootstrapmaster Moderator Moderador Equipe de Suporte

    Código:
            RUN goToKey IN h-boin01017 (INPUT tt-item-doc-est.serie-docto,
                                    INPUT tt-item-doc-est.nro-docto, 
                                    INPUT tt-item-doc-est.cod-emitente,
                                    INPUT tt-item-doc-est.nat-operacao,
                                    INPUT tt-item-doc-est.sequencia, 
                                    INPUT "fcp":U).
        IF  RETURN-VALUE = "OK":U THEN DO:
            EMPTY TEMP-TABLE tt-ext-item-doc-est-fcp.
            RUN getRecord IN h-boin01017 (OUTPUT TABLE tt-ext-item-doc-est-fcp).

            FIND FIRST tt-ext-item-doc-est-fcp NO-LOCK
                 WHERE tt-ext-item-doc-est-fcp.serie-docto  = tt-item-doc-est.serie-docto
                   AND tt-ext-item-doc-est-fcp.nro-docto    = tt-item-doc-est.nro-docto  
                   AND tt-ext-item-doc-est-fcp.cod-emitente = tt-item-doc-est.cod-emitente
                   AND tt-ext-item-doc-est-fcp.nat-operacao = tt-item-doc-est.nat-operacao
                   AND tt-ext-item-doc-est-fcp.sequencia    = tt-item-doc-est.sequencia  
                   AND tt-ext-item-doc-est-fcp.cod-param    = "fcp":U NO-ERROR.
            IF AVAIL tt-ext-item-doc-est-fcp THEN
                ASSIGN vl-base-fcp:SCREEN-VALUE IN FRAME fPage0    = STRING(tt-ext-item-doc-est-fcp.val-livre-1)
                       aliq-fcp:SCREEN-VALUE IN FRAME fPage0       = STRING(tt-ext-item-doc-est-fcp.val-livre-2)
                       valor-fcp:SCREEN-VALUE IN FRAME fPage0      = STRING(tt-ext-item-doc-est-fcp.val-livre-3)
                       vl-base-fcp-st:SCREEN-VALUE IN FRAME fPage0 = STRING(tt-ext-item-doc-est-fcp.val-livre-4)
                       aliq-fcp-st:SCREEN-VALUE IN FRAME fPage0    = STRING(tt-ext-item-doc-est-fcp.val-livre-5)
                       valor-fcp-st:SCREEN-VALUE IN FRAME fPage0   = STRING(tt-ext-item-doc-est-fcp.val-livre-6).
        END.
    Se fizer assim e a totvs mudar os campos de lugar, vc ainda vai estar funcionando.
    bootstrapmaster, Novembro 6, 2023
    #5
    jdchaves curtiu isso.
  6. Marcos Bianchi

    Marcos Bianchi Sem Pontuação

    Com a tabela indicada, consegui chegar nos valores de FCP. Muito obrigado!
    Marcos Bianchi, Novembro 6, 2023
    #6
    jdchaves curtiu isso.

Compartilhe esta Página