FAQs - Suporte técnico

MP - ADVPL - Rotina automática MVC (MATA020)

Dúvida
Exemplo de utilização da execauto da MATA020 em MVC

Ambiente
Protheus – ADVPL – A partir da versão 11.8

Solução

Exemplo:

#INCLUDE "RWMAKE.CH"
#INCLUDE "TBICONN.CH"
#INCLUDE 'Protheus.ch'
#INCLUDE 'FWMVCDef.ch'

//------------------------------------------------------------------------
/* EXEMPLO DE INCLUSÃO
//------------------------------------------------------------------------

User Function MT020MVC()

Local oModel := Nil
Private lMsErroAuto := .F.

PREPARE ENVIRONMENT EMPRESA "99" FILIAL "01"

oModel := FwLoadModel ("MATA020")
oModel:SetOperation(MODEL_OPERATION_INSERT)
oModel:Activate()
oModel:SetValue("SA2MASTER","A2_COD" ,"F00005")
oModel:SetValue("SA2MASTER","A2_LOJA" ,"01")
oModel:SetValue("SA2MASTER","A2_NOME" ,"FORN TESTE MVC")
oModel:SetValue("SA2MASTER","A2_NREDUZ" ,"F TESTE MVC")
oModel:SetValue("SA2MASTER","A2_END" ,"RUA MVC TESTE")
oModel:SetValue("SA2MASTER","A2_EST" ,"SP")
oModel:SetValue("SA2MASTER","A2_MUN" ,"SAO PAULO")
oModel:SetValue("SA2MASTER","A2_TIPO" ,"F")

If oModel:VldData()
oModel:CommitData()
MsgInfo("Registro INCLUIDO!", "Atenção")
Else
VarInfo("",oModel:GetErrorMessage())
EndIf

oModel:DeActivate()
oModel:Destroy()
oModel := NIL

RESET ENVIRONMENT

Return Nil

 

 

Esse artigo foi útil?
Usuários que acharam isso útil: 0 de 0

0 Comentários

Por favor, entre para comentar.
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 _

Preencha os campos abaixo para iniciar o atendimento:

Chat _