Pagetitle |
---|
| AxInclui - Tela padrão de inclusão de registro |
---|
| 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. 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. | | | | | | | | | | |
|