PERGUNTAS E RESPOSTAS
 
Bem Vindo, Visitante  Todos os Fórums
  Compras
Enviar para a impressoraImprimir  Enviar e-mail para um amigoEnviar Para um Amigo
Precisa estar Logado

Subject Assunto:
Ponto de entrada
Versão:
12.1.25
Plataforma:
Microsoft
Complemento:
DB:
SQL Server
Complemento:
LinkedIn
Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário NEWMAX NEWMAX em 12/05/2020, 17:06 h
Local: SP  Registro: 12/05/2020  Postagens: 6
Boa tarde, alguém teria um exemplo de funcionamento do PE MT131WF?


Obrigado.

Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário ROD_DIAS ROD_DIAS em 24/08/2020, 11:37 h
Local: GO  Registro: 08/04/2020  Postagens: 10
#include "rwmake.ch"
#include "TbiConn.ch"
#include "TbiCode.ch"

/******************************/
User Function MT131WF(oProcess)
/******************************/

    Local aArea := GetArea()
    Local cTexto := "Deseja anexar arquivo adicional na cotação?"
    Local cTitulo:= "Anexo Cotação"
    Local _tarq

    If oModel:GetOperation() == MODEL_OPERATION_INSERT

        If MSGYESNO( cTexto, cTitulo )
            _tarq:= U_GetFile2()
        EndIf
    EndIf
    RestArea(aArea)

Return



Rodrigo Dias

Para postar no Fórum você precisa efetuar o seu login ou se registrar

 Mudar para Fórum

 

 

 
 
   
Pagina Principal Shopping PROTHEUS Tire suas duvidas Vagas Microsiga em todo Brasil Aprofunde seus conhecimentos Noticias Online Fale Conosco Pagina Principal