- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Ponto de Entrada MT241LOK
×
Linguagem de Programação ADVPL
Perguntas Ponto de Entrada MT241LOK
- Denilson
- Autor do Tópico
- Desconectado
- Usuário está bloqueado
-
Menos
Mais
- Postagens: 32
- Obrigados Recebidos: 0
11 anos 7 meses atrás #12182
por Denilson
Ponto de Entrada MT241LOK foi criado por Denilson
Caros boa tarde;
Tinha já colocado esta dúvida mas não me lembro, tenho este ponto de entrada MT241LOK que segue, acontece que para o Internos(Mod. 2) funciona normal só que para o Internos e Produção dá um erro porque é outro programa (MATA240 - Internos / MATA250 - Produção) como devo fazer para na hora que vou lançar no internos e produção ele desconsidere este ponto (D3_TM)? Lembro que em um outro cliente tinha uma validação no D3_TM que tinha que ser colocada.
muito grato
Denilson
Tinha já colocado esta dúvida mas não me lembro, tenho este ponto de entrada MT241LOK que segue, acontece que para o Internos(Mod. 2) funciona normal só que para o Internos e Produção dá um erro porque é outro programa (MATA240 - Internos / MATA250 - Produção) como devo fazer para na hora que vou lançar no internos e produção ele desconsidere este ponto (D3_TM)? Lembro que em um outro cliente tinha uma validação no D3_TM que tinha que ser colocada.
muito grato
Denilson
Por favor Acessar ou Registrar para participar da conversa.
- lalberto
-
- Desconectado
- Administrador
-
Menos
Mais
- Postagens: 3676
- Obrigados Recebidos: 6
11 anos 7 meses atrás #12183
por lalberto
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Respondido por lalberto no tópico Ponto de Entrada MT241LOK
User Function MT241LOK()
//**********************
Local lRet := .T.
//Local n := ParamIxb[1]
Local nCod := aScan(aHeader,{|x| AllTrim(x[2])=="D3_COD"})
Local nLoc := aScan(aHeader,{|x| AllTrim(x[2])=="D3_LOCAL"})
If FunName() <> "MATA240"
Return .t.
Endif
//**********************
Local lRet := .T.
//Local n := ParamIxb[1]
Local nCod := aScan(aHeader,{|x| AllTrim(x[2])=="D3_COD"})
Local nLoc := aScan(aHeader,{|x| AllTrim(x[2])=="D3_LOCAL"})
If FunName() <> "MATA240"
Return .t.
Endif
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Ponto de Entrada MT241LOK
Tempo para a criação da página:0.118 segundos