Base de Conhecimento

Cross Segmento - TOTVS Backoffice (Línea Protheus) - MI - Compras (SIGACOM) – Execauto para generación de factura de flete - MATA101N


time.png Tiempo aproximado para lectura: 1:30 min

Duda
Ejemplo de ExecAuto para generación de factura de flete a través de la rutina MATA101N

Ambiente
Cross Segmento - TOTVS Backoffice (Línea Protheus) - MI - Compras (SIGACOM) – Versión 12

Solución
Sigue ejemplo de MsExecAuto para generación de Factura de Flete mediante rutina MATA101N:

#INCLUDE "RWMAKE.CH" 
#INCLUDE "TBICONN.CH"

//Exemplo de Factura de Entrada - Tipo - Conhecimento de Frete //

User Function xMt101nf()

Local _aCabec := {} //Array com dados do cabecalho
Local _aItens := {} //Array com dados do item
Local aLinha := {} //Array de trabalho
Private aRecsSF1 := {} //Array para vinculo de Notas
Private lMsErroAuto := .f. //Controle de execucao da Rotina

//Prepara ambiente de Exemplo //
PREPARE ENVIRONMENT EMPRESA "01" FILIAL "01" MODULO "COM" TABLES "SF1", "SD1"

//Cabecalho
aadd(_aCabec,{"F1_FILIAL","01"})
aadd(_aCabec,{"F1_DOC","0000231101006"})
aadd(_aCabec,{"F1_SERIE","FL"})
aadd(_aCabec,{"F1_FORNECE","000001"})
aadd(_aCabec,{"F1_LOJA","01"})
aadd(_aCabec,{"F1_TIPO","N"})
aadd(_aCabec,{"F1_FORMUL","N"})
aadd(_aCabec,{"F1_EMISSAO",dDataBase})
aadd(_aCabec,{"F1_TXMOEDA",1})
aadd(_aCabec,{"F1_ESPECIE","NF"})
aadd(_aCabec,{"F1_COND","001"})
aadd(_aCabec,{"F1_TIPODOC","14"})

//Itens
aadd(_aItens,{"D1_COD","000001 ",nil})
aadd(_aItens,{"D1_VUNIT",50,nil})
aadd(_aItens,{"D1_TOTAL",50,nil})
aadd(_aItens,{"D1_TES","201",nil})
aadd(_AItens,{"D1_TIPO","C",nil})
aadd(_aItens,{"D1_NFORI","0000231101005",nil})
aadd(_aItens,{"D1_SERIORI","NF ",nil})
aadd(_aItens,{"D1_ITEMORI","0001",nil})

aadd(aLinha,_aItens)

//Array de Registro com a Nota de Origem
aadd(aRecsSF1,5)

//Executa rotina
MsExecAuto({|x, y, z| Mata101N(x, y, z)}, _aCabec, aLinha, 3)

//Finalizacao
If lMsErroAuto
MostraErro()
Endif

RESET ENVIRONMENT

Return


Conozca más

Para adquirir más conocimiento, acceda al siguiente enlace:
TDN: ExecAuto - MATA101N - Factura de conocimiento de flete

¿Fue útil este artículo?
Usuarios a los que les pareció útil: 0 de 0

0 Comentarios

Inicie sesión para dejar un comentario.
X Fechar

Olá ,

Há pendência referente a um de seus produtos contratados para a empresa ().

Entre em contato com o Centro de Serviços TOTVS para tratativa.

Ligue! 4003-0015 opção 4 e 9 ou registre uma solicitação para CST – Cobrança – Verificação de pendências financeiras . clique aqui.

TOTVS

X Fechar

Olá ,

Seu contato não está cadastrado no Portal do Cliente como um perfil autorizado a solicitar consultoria telefônica.

Por gentileza, acione o administrador do Portal de sua empresa para: (1)configurar o seu acesso ou (2)buscar um perfil autorizado para registro desse atendimento.

Em caso de dúvidas sobre a identificação do contato administrador do Portal, ligue (11) 4003-0015, opção 7 e, em seguida, opção 4 para buscar o suporte com o time de Assessoria ao Portal do Cliente. . clique aqui.

TOTVS

X Fechar

Olá ,

Para o atendimento de "Consultoria Telefônica" você deverá estar de acordo com o Faturamento.

TOTVS

X Fechar

Olá,

Algo inesperado ocorreu, e o usuario nao foi reconhecido ou você nao se encontra logado

Por favor realize um novo login

Em caso de dúvidas, entre em contato com o administrador do Portal de Clientes de sua empresa para verificação do seu usuário, ou Centro de Serviços TOTVS.

Ligue! 4003-0015 opção 4 e 9 ou registre uma solicitação para CST – Cadastros . clique aqui.

TOTVS

Chat _

Rellene los campos siguientes para iniciar el chat:

Chat _