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. |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas