Histórico da Página
01. A300BREAK - Alterar mensagem ou momento da quebra dos itens do contrato na revisão
Produto: |
| ||||||||
---|---|---|---|---|---|---|---|---|---|
Linha de Produto: |
| ||||||||
Segmento: |
| ||||||||
Módulo: | Gestão de Contratos | ||||||||
Função: | CNTA300R - Revisões de Contrato | ||||||||
Ponto de Entrada: | A300BREAK |
02. DETALHES
Descrição: | Possibilita que o desenvolvedor altere a mensagem exibida para o usuário ou se deve ou não ser realizada prosseguir com a quebra do item | |||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Eventos: | Executado antes da quebra dos itens da planilha(CNB) que tenham sido medidos no momento da revisão | |||||||||||||||||||||
Programa Fonte: | CNTA300R.PRW | |||||||||||||||||||||
Função: | A300VlrCNB | |||||||||||||||||||||
Parâmetros: |
| |||||||||||||||||||||
Retorno: |
|
Bloco de código | ||||
---|---|---|---|---|
| ||||
#INCLUDE "Protheus.ch" /*{Protheus.doc} A300BREAK() Possibilita que o desenvolvedor altere a mensagem exibida para o usuário ou se deve ou não ser realizada a quebra do item */ User Function A300BREAK() Local lQuebra := PARAMIXB[1] Local oModel := PARAMIXB[2] Local cField := PARAMIXB[3] Local nOldValue := PARAMIXB[4] Local nNewValue := PARAMIXB[5] Local cMsgAtual := PARAMIXB[6] Local aAux := Array(2) aAux[1] := lQuebra aAux[2] := "Essa é uma mensagem customizada." Return(aAux) |
Alerta exibido no momento da quebra com base no exemplo apresentado:
Bloco de código | ||||
---|---|---|---|---|
| ||||
#INCLUDE "Protheus.ch"
/*{Protheus.doc} A300BREAK()
Possibilita que o desenvolvedor altere a mensagem exibida para o usuário ou se deve ou não ser realizada a quebra do item
*/
User Function A300BREAK()
Local lQuebra := PARAMIXB[1]
Local oModel := PARAMIXB[2]
Local cField := PARAMIXB[3]
Local nOldValue := PARAMIXB[4]
Local nNewValue := PARAMIXB[5]
Local cMsgAtual := PARAMIXB[6]
Local aAux := Array(2)
If lQuebra .And. A300GTpRev() == "3" //3=Realinhamento
lQuebra := .F.
EndIf
aAux[1] := lQuebra
aAux[2] := cMsgAtual
Return(aAux) |
03. ASSUNTOS RELACIONADOS
- Não há
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas