Histórico da Página
Ponto de Entrada
Descrição: | Este Ponto de Entrada será executado na rotina Painel Orçamento (OFIXA018) ao ser executada a funcionalidade Incluir do menu Pedido de Venda. A mesma permite validações para abrir ou não a tela de inclusão. | ||||||
Localização: | Atualizações \ Mov Peças \ Painel Orçamento (OFIXA018) | ||||||
Eventos: | Function OXA012I(cAlias,nReg,nOpc) // // Ponto de Entrada para validações antes de abrir a tela para Incluir If ExistBlock("OA012INI") If !ExecBlock("OA012INI", .f., .f.) Return .f. EndIf EndIf lRet = OFIXX001(NIL,NIL,NIL,100) nRecVS1020 := VS1->(Recno()) OXA012ATUVS1(nRecVS1020) // Return .t. | ||||||
Programa Fonte: | OFIXA012.PRW | ||||||
Função: | OXA012I() | ||||||
Parâmetros: | N/A | ||||||
Retorno: |
|
Exemplo:
Include totvs.ch
/*
ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
±±ÉÍÍÍÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍ»±±
±±ºPrograma ³ OA012INI º Autor ³ MIL º Data ³ 07/07/2020 º±±
±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍ͹±±
±±ºDescricao ³ PE executado na rotina Pedido de Venda (Orçamento Fases) º±±
±±º ³ (OFIXA012) para validações antes da abertura da tela para º±±
±±º ³ inclusão de Pedido de Venda º±±
±±ÈÍÍÍÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ±±
±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß
*/
User Function OA012INI()
Local lRet := .t.
MsgAlert("Ponto de Entrada OA012INI executado com sucesso!", "Atenção")
Return lRet