Frameworksp

Atalhos

Páginas filhas
  • AxInclui - Tela padrão de inclusão de registro

Função: AxInclui - Tela padrão de inclusão de registro
Abrangências: Microsiga Protheus 8.11 , Protheus 10
Versões: Microsiga Protheus 8.11 , Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Nível de Acesso: Nível 1 (Acesso Clientes)
Descrição: 
Função utilizada para montar a tela padrão de inclusão de registro na tabela passada como parâmetro.
Programa Fonte: 
MATXATU.PRX
Sintaxe:

AxInclui - Tela padrão de inclusão de registro ( [ cAlias ] [ nReg ] [ nOpc ] [ aAcho ] [ cFunc ] [ aCpos ] [ cTudoOk ] [ lF3 ] [ cTransact ] [ aButtons ] [ aParam ] [ aAuto ] [ lVirtual ] [ lMaximized ] [ cTela ] [ lPanelFin ] [ oFather ] [ aDim ] [ uArea ] ) --> nOpca

Retorno:
    nOpca(numerico)
  • Retorna 1 se usuário clicou no botão OK da Enchoice, 2 se clicou em Cancelar.
Exemplos 
User Function TesteCad()Private aRotina := 	{{ "Pesquisar"  ,"u_Pesqui",0 , 1},;  //"Pesquisar"			{ "Visualizar" ,"u_Visual", 0 , 2},;  //"Visualizar"			{ "Incluir"    ,"u_Inclui", 0 , 3},;  //"Incluir"			{ "Alterar"    ,"u_Altera", 0 , 4 },;  //"Alterar"			{ "Excluir"    ,"u_Deleta", 0 , 5 }}  //"Excluir"mBrowse(6, 1,22,75,"SA1",,,,,,)Return(.T.)            User Function Before()  	MsgAlert("Chamada antes da função")ReturnUser Function Inclui()                    Local nOpca := 0  Local aParam := {} Private  aButtons := {}Private cCadastro := "123" // título da tela                                                                     //adiciona botoes na Enchoice                       aAdd( aButtons, { "PRODUTO", {|| MsgAlert("Teste")}, "Teste", "Botão Teste" } ) //adiciona codeblock a ser executado no inicio, meio e fimaAdd( aParam,  {|| U_Before() } )  //antes da aberturaaAdd( aParam,  {|| U_TudoOK() } )  //ao clicar no botao okaAdd( aParam,  {|| U_Transaction() } )  //durante a transacaoaAdd( aParam,  {|| U_Fim() } )       //termino da transacaodbSelectArea("SA1")//AxInclui( cAlias, nReg, nOpc, aAcho, cFunc, aCpos, cTudoOk, lF3, cTransact, aButtons, aParam, aAuto, lVirtual, lMaximized, cTela, lPanelFin, oFather, aDim, uArea) nOpca := AxInclui("SA1",SA1->(Recno()), 3,, "U_Before",, "U_TudoOk()", .F., "U_Transaction", aButtons, aParam,,,.T.,,,,,)                                                                       Return nOpcaUser function TudoOK()	MsgAlert("Clicou botao ok")Return .T.    User function Transaction()	MsgAlert("Chamada durante transacao")Return .T.                              User function Fim()	MsgAlert("Fim transacao")Return .T.
Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
cAlias Caracter Alias da Tabela cadastrada no dicionário (SX2) que haverá a inclusão.
nReg Numérico Número do registro posicionado.
nOpc Numérico Numero da opção selecionada (Inclusão, Alteração, Exclusão, Visualização).
aAcho Array of Record Array com os campos a serem exibidos. Se não informado, serão exibidos todos os campos cadastrados como Usado no SX3. Os campos de usuários sempre serão exibidos.
cFunc Caracter Função a ser executada antes de entrar na tela.
aCpos Array of Record Array com os campos que permite edição.
cTudoOk Caracter Nome da função a ser executada ao clicar no botão Ok. ".T."
lF3 Lógico Indica se a enchoice foi criada em uma consulta F3 para utilizar variáveis de memória na edição. .F.
cTransact Caracter Nome da função a ser executada dentro da transação de gravação dos dados na tabela.
aButtons Array of Record Array com os botões da EnchoiceBar com a seguinte estrutura: aButtons[1][1] – Nome do arquivo da imagem do botão.aButtons[1][2] – Bloco de execução.aButtons[1][3] – Mensagem de exibição no ToolTip.aButtons[1][4] – Nome do botão.
aParam Array of Record Array contendo os codeblocks de execução com a seguinte estrutura:aParam[1]- Codeblock a ser executado antes da abertura do diálogo.aParam[2]-Codeblock a ser executado ao clicar no botão Ok.aParam[3]- Codeblock a ser executado dentro da transação.aParam[4]- Codeblock a ser executado após a transação.
aAuto Array of Record Array com os campos a ser considerados pela rotina automática.
lVirtual Lógico Carrega os campos virtuais? (.T.=Sim/.F.=Não). Qdo .F. carrega inicializador padrão nos campos virtuais. .F.
lMaximized Lógico .T. Abrir o dialogo maximizado. .T.
cTela Caracter Nome da variável tipo "private" que a enchoice utilizará no lugar da variável aTela.
lPanelFin Lógico Quando .T. cria o painel Gestor Financeiro. .F.
oFather Objeto Quando lPanelFin = .T., cria o dialogo painel do Gestor Financeiro dentro da janela oFather informado.
aDim Array of Record Array com as dimensões do dialogo do painel Gestor Financeiro quando lPanelFin = .T.
uArea Qualquer Quando lPanelFin = .T., utilizado para a função FinVisual do painel Gestor Financeiro.

  • Sem rótulos