martes, 6 de octubre de 2020

Botón Browse

 // Open the vision window
IF Open(WIN_VISION_DB_Socio) = True THEN
    
    // Refresh the content of the DB_Socio combo box
    //    ListDisplay(COMBO_IdDB_Socio, taCurrentFirst)
    COMBO_IdSocio = DB_Socio.IdSocio
    STC_RazonSocial = DB_Socio.RazonSocial
    gdFechaNacimiento     = DB_Socio.FechaNacimiento
    
END

No hay comentarios.:

Publicar un comentario

Try catch end

 // -------------------------------------------------- // Procedure principal que executa uma query com tratamento de exceção // -----------...