Windev21 Aulas,Estudos e Desenvolvimento: Aula 1150 WinDev Curso ErpAmarildo 8 - Botao Incluir Empresa Tabela

Video no Youtube Se Gostou clique aqui para dar joinha

Nessa aula de hoje
Vamos alterar o Codigo do Botao Incluir
na Relacao de Empresas

In this class today
Let's change the Add Button Code
In the Business Relationship

En esta clase de hoy
Cambiar el código del botao Incluir
En la Relación de Empresas

https://doc.windev.com/en-US/?3044118&name=HReset
https://doc.windev.com/en-US/?3074031&name=TableSelectPlus
https://doc.windev.com/en-US/?3074003&name=TableDisplay
https://doc.windev.com/en-US/?3038035&name=Open

HReset
Open
TableSelectPlus
TableDisplay

// SEM COMENTARIOS

HReset(empresa)
Open(WIN_Form_empresa)
TableDisplay(TABLE_QRY_RELACAO_EMPRESAS,taReExecuteQuery)
TableSelectPlus(TABLE_QRY_RELACAO_EMPRESAS,TABLE_QRY_RELACAO_EMPRESAS..Occurrence)

// COM COMENTARIOS

// VOU EXPLICAR AS LINHAS , E FAZER AS MODIFICAÇÕES PARA FUNCIONAR
// I WILL EXPLAIN THE LINES, AND MAKE THE MODIFICATIONS TO WORK
// VUELVE EXPLICAR LAS LÍNEAS, Y HACER LAS MODIFICACIONES PARA FUNCIONAR

// CRIANDO UM NOVO REGISTRO
// Create a new record
// CREANDO UN NUEVO REGISTRO
HReset(empresa)
// VOU APAGAR O IF E DEIXAR SOMENTE O OPEN
// I WILL DELETE THE IF AND LEAVE THE OPEN ONLY
// VOY APAGAR EL IF Y DEJAR SOLAMENTE OPEN
Open(WIN_Form_empresa)
// Abra o formulário do arquivo da empresa no modo de criação
// Open the form of empresa file in creation mode
// Abrir el formulario de archivo de empresa en modo de creación

// VOU APAGAR A LINHA TABLEDISPLAY
// I WILL DELETE THE TABLEDISPLAY LINE
// VUELO AJUSTE LA LÍNEA TABLEDISPLAY
// https://doc.windev.com/en-US/?3074003&name=TableDisplay
TableDisplay(TABLE_QRY_RELACAO_EMPRESAS,taReExecuteQuery)

// TABLEDISPLAY, NOME DA TABELA, VOU MANDAR EXECUTAR A QUERY NOVAMENTE,
//    E ATUALIZAR A TABELA
// TABLEDISPLAY, TABLE NAME, I WILL SEND TO QUERY AGAIN, AND UPDATE TABLE
// TABLEDISPLAY, NOMBRE DE LA TABLA, VOY MANDAR EJECUTAR A QUERY NUEVAMENTE,
//    Y ACTUALIZAR LA TABLA

// https://doc.pcsoft.fr/?3074031
// VAMOS FAZER , COM QUE QUANDO VOLTAR NA TABELA,
//      FIQUE POSICIONADO NO REGISTRO NOVO
//LET'S DO, WHEN WHEN BACK IN THE TABLE, POSITION IN THE NEW REGISTRY
//VAMOS HACER, CON QUE CUANDO VOLVER EN LA TABLA,
//     FIQUE POSICIONADO EN EL REGISTRO NUEVO

TableSelectPlus(TABLE_QRY_RELACAO_EMPRESAS,TABLE_QRY_RELACAO_EMPRESAS..Occurrence)
// TABLE_QRY_RELACAO_EMPRESAS..Occurrence
// ME FORNECE A QUANTIDADE DE REGISTROS NA TABELA,
//           E ASSIM SABER ONDE TENHO DE POSICIONAR
// I PROVIDE THE QUANTITY OF RECORDS IN THE TABLE,
//          AND SO KNOW WHERE I HAVE TO POSITION

// ME PROPORCIONA LA CANTIDAD DE REGISTROS EN LA TABLA,
//            Y ASÍ SABER DONDE TENGO DE POSICIONAR