Histórico da Página
Descrição: | Exemplo de Execauto para cadastro de bancos - Rotina Automática | ||||||||
Localização: | Financeiro > Atualizações > Cadastros > Bancos | ||||||||
Programa Fonte: | MATA070. | ||||||||
Retorno: |
|
Exemplo:
#INCLUDE "PROTHEUS.CH"
User Function MyMATA070()
Local nOperac := 3
Local aCab := {}
Private lMsErroAuto := .F.
aadd( aCab, {'A6_COD', '000', NIL} )
aadd( aCab, {'A6_AGENCIA', '00001', NIL} )
aadd( aCab, {'A6_NUMCON', '0000001', NIL} )
aadd( aCab, {'A6_NOME', 'BANCO TESTE', NIL} )
MsExecAuto({|a,b| MATA070(a,b)}, aCab, nOperac)
If lMsErroAuto
MsgStop("Fim", "Processo não Realizado")
Else
MsgStop("Fim", "Sucesso")
EndIf
Return()
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas