Trecho do ponto de entrada que faz a chamada para o Ponto de Entrada que o cliente renomeia para XMT103CLAS
Local aInParamIxb := aClone(ParamIxb)
If lRet .And. !l103Auto
IF ((ExistBlock("XMT103DNF")) )
If (! ExecBlock("XMT103DNF",.F.,.F.,aInParamIxb) )
lRet := .F.
EndIf
EndIf
Endif
Documentação oficial no TDN
| Linha de Produto: | Microsiga Protheus |
|---|---|
| Segmento: | Serviços |
| Módulo: | Compras (SIGACOM) |
| Rotina: | RotinaNome TécnicoDocumento de EntradaMATA103 |
| Ponto de Entrada: | MT103DNF |
| País(es): | Brasil |
| Banco(s) de Dados: | Todos |
| Tabelas utilizadas: | SF1 - SD1 |
| Sistema(s) operacional(is): | Windows/Linux |
| Descrição: | O Ponto de Entrada MT103DNF permite validar os campos das abas "Nota Fiscal Eletrônica" e "Informações Danfe". |
|---|---|
| Localização: | Ao confirmar o documento de entrada |
| Eventos: | O Ponto de entrada é executado antes da confirmação do documento, afim de validar se deve ou não ser incluído. |
| Programa Fonte: | MATA103 |
| Função: | A103NFISCAL |
| Parâmetros: | NomeTipoDescriçãoObrigatórioPARAMIXBArrayInformações da Danfe |
| [01]: Cod. Transportadora | |
| [02]: Peso Líquido | |
| [03]: Peso Bruto | |
| [04]: Espécie 1 | |
| [05]: Volume 1 | |
| [06]: Espécie 2 | |
| [07]: Volume 2 | |
| [08]: Espécie 3 | |
| [09]: Volume 3 | |
| [10]: Espécie 4 | |
| [11]: Volume 4 | |
| [12]: Placa | |
| [13]: Chave Danfe | |
| [14]: Tipo Frete | |
| [15]: Valor Pedágio | |
| [16]: Fornecedor Retirada | |
| [17]: Loja Retirada | |
| [18]: Tipo Cte | |
| [19]: Fornecedor Entrega | |
| [20]: Loja Entrega | |
| [21]: N. AIDF | |
| [22]: Ano AIDF | |
| [23]: Modalidade | |
| [24]: Devolução Mercadoria não recebida XPARAMIXBArrayInformações da Nota Fiscal Eletrônica | |
| [01]: Nota Fiscal Eletrônica | |
| [02]: Código verificação NF-e | |
| [03]: Emissão da NF Eletrônica | |
| [04]: Hora da emissão da NF-e | |
| [05]: Crédito concedido NF-e | |
| [06]: Número do RPS | |
| [07]: Mensagem para Nota Fiscal | |
| [08]: Mensagem Padrao 1 X | |
| Retorno: | NomeTipoDescriçãoObrigatóriolRetLogico.T. = Documento valida com sucesso |
| .F. = Existe alguma pendencia X |
Exemplo:
#Include 'Protheus.ch'
User Function MT103DNF()
Local aAbaDanfe := PARAMIXB[1]