Linha Microsiga Protheus

Árvore de páginas

Ato Cotepe 35 DF - Ponto de entrada COTCNPJ

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

SIGAFIS - Livros Fiscais

Função:

Ato Cotepe 35 DF (COTEPE35.PRW)

Situação/Requisito:

Necessidade de criação de ponto de entrada para permitir informar o CNPJ ou CPF de cliente para cupons ficais gerados sem integração com SIGALOJA.

Solução/Implementação:

Criado ponto de entrada COTCNPJ para permitir informar o CNPJ ou CPF de cliente de cupons ficais para geração dos campos 02-CPF ou 03-CNPJ do registro C600 – Cupom Fiscal/ICMS.

Observações:

Ponto de entrada executado somente para cupom fiscal, onde espécie (FT_ESPECIE) = ECF e informado PDV (FT_PDV).

Para outro tipo de documentos de saída existe o campo CNPJ/CPF (F2_CGCCLI) no documento de saída.


Ponto de entrada: COTCNPJ

Parâmetro: PARAMIXB[1] - Alias da tabela de documentos fiscais

Retorno: CNPJ ou CPF do cliente.

Exemplo: Sugestão de uso do ponto de entrada.

#INCLUDE "PROTHEUS.CH"

User Function COTCNPJ()

Local cAlias := PARAMIXB[1]

Local cRet := ""

DbSelectArea("SA1")

SA1->(DbSetOrder(1))

If SA1->(MsSeek(xFilial("SA1")+(cAlias)->(FT_CLIEFOR+FT_LOJA)))

                cRet := SA1->A1_CGC

EndIf

Return cRet


Tickets relacionados:

94633

Requisito:

DSERFIS2-2120