Parametros:MV_NATDINH // Natureza DINHEIROMV_NATCHEQ // Natureza CHEQUEMV_NATCART // Natureza CARTAO DE CREDITOMV_NATTEF // Natureza CARTAO DE DEBITO AUTOMATICOMV_NATFIN // Natureza FINANCIADOMV_NATVALE // Natureza VALESMV_NATCONV // Natureza CONVENIOMV_NATOUTR // Natureza OUTRASMV_NATCRED // Natureza CREDITOMV_NATNCC // Natureza NOTA DE CREDITOMV_NATRECE // Natureza RECEBIMENTOMV_NATDEV // Natureza DEV./TROCAMV_NATTROC //Natureza Troco Criado por Marcelo Cardoso da Silva, ultima alteracao em 06 abr, 2016Ir para o inicio dos metadadosAbrangencias:Todas versoesVersoes:TodasCompativel Paises:TodosSistemas Operacionais:TodosCompativel as Bases de Dados:TodosNivel de Acesso:Nivel 1 (Acesso Clientes)Descricao:Funcao utilizada para montar a tela padrao da mbrowse (modelo 1).Programa Fonte:MATXATU.PRXSintaxe:AxCadastro - Tela padrao da mBrowse ( [ cAlias ] [ cTitle ] [ cDel ] [ cOk ] [ aRotAdic ] [ bPre ] [ bOK ] [ bTTS ] [ bNoTTS ] [ aAuto ] [ nOpcAuto ] [ aButtons ] [ aACS ] [ cTela ] )Retorno:()12345678910111213141516171819202122ExemplosUser Function TesteCad() Local aRotAdic :={} Local bPre := {||MsgAlert('Chamada antes da funcao')} Local bOK := {||MsgAlert('Chamada ao clicar em OK'), .T.} Local bTTS := {||MsgAlert('Chamada durante transacao')} Local bNoTTS := {||MsgAlert('Chamada apos transacao')} Local aButtons := {}//adiciona botoes na tela de inclusao, alteracao, visualizacao e exclusao aadd(aButtons,{ "PRODUTO", {|| MsgAlert("Teste")}, "Teste", "Botao Teste" } ) //adiciona chamada no aRotina aadd(aRotAdic,{ "Adicional","U_Adic", 0 , 6 }) AxCadastro("SA1", "Clientes", "U_DelOk()", "U_COK()", aRotAdic, bPre, bOK, bTTS, bNoTTS, , , aButtons, , ) Return(.T.) User Function DelOk() MsgAlert("Chamada antes do delete") Return User Function COK() MsgAlert("Clicou botao OK") Return .t. User Function Adic() MsgAlert("Rotina adicional") Return Parametros: Nome Tipo Descricao Default Obrigatorio Referencia cAlias Caracter Alias da Tabela cadastrada no dicionario (SX2) que sera baseada a mBrowse. cTitle Array of Record Titulo da janela. cDel Array of Record Funcao a ser executada ao deletar o registro. cOk Array of Record Funcao a ser executada ao clicar no botao OK para gravar o registro(inclusao e alteracao). aRotAdic Array of Record Array contendo as rotinas adicionais para ser acrescentado ao array aRotina. bPre Array of Record Codeblock a ser executado antes da abertura do dialogo de inclusao, alteracao ou exclusao. bOK Array of Record Codeblock a ser executado ao clicar no botao OK do dialogo de inclusao, alteracao ou exclusao. bTTS Array of Record Codeblock a ser executado durante a transacao de inclusao, alteracao ou exclusao. bNoTTS Array of Record Codeblock a ser executado apos a transacao de inclusao, alteracao ou exclusao. aAuto Array of Record Array com os campos a serem considerados pela rotina automatica. nOpcAuto Array of Record Numero da opcao selecionada (Inclusao, Alteracao, Exclusao, Visualizacao) para a rotina automatica. aButtons Array of Record Array contendo os botoes da EnchoiceBar com a seguinte estrutura: aButtons[1][1] Nome do arquivo da imagem do botao.aButtons[1][2] Bloco de execucao.aButtons[1][3] Mensagem de exibicao no ToolTip.aButtons[1][4] Nome do botao. aACS Array of Record Array que substitui o controle de acessos das funcoes basicas do aRotina (Pesquisar, Visualizar, Incluir, Alterar, Excluir).Ex: aACS := { , , , ,3 }No exemplo acima a opcao de excluir ira respeitar o 3o acesso da lista de acessos do usuario conforme link abaixo:Relacao de Acessos x Rotina cTela Array of Record Nome da variavel tipo "private" que a enchoice utilizara no lugar