FiveTech Software tech support forums

//----------------------------------------------------------------------------//
Method Guardar() Class AbmComercio
//----------------------------------------------------------------------------//

    Memvar o
   
    If( ::lOnOff )
        o : oComercio : Append()
    End 
    o : oComercio : codigo     := ::cCodigo            
    o : oComercio : compartido := ::cCompartido        
    o : oComercio : nombre     := ::cNombre            
    o : oComercio : r_social   := ::cR_social          
    o : oComercio : nrocuit    := ::cNrocuit            
    o : oComercio : respons    := ::cRespons            
    o : oComercio : domicilio  := ::cDomicilio          
    o : oComercio : puerta     := ::cPuerta            
    o : oComercio : manzana    := ::cManzana            
    o : oComercio : barrio     := ::cBarrio            
    o : oComercio : localidad  := ::cLocalidad          
    o : oComercio : c_p        := ::cC_p                
    o : oComercio : telefono   := ::cTelefono          
    o : oComercio : celular    := ::cCelular            
    o : oComercio : rendicion  := ::cRendicion          
    o : oComercio : supervisor := ::cSupervisor        
    o : oComercio : observac   := ::cObservac          
    If( ::lOnOff )
        o : oComercio : Save()
    Else
        o : oComercio : Updated()
    End
    Return 0   
 

oDbf:<fieldname> := <newvalue>
....
oDbf:Save()
 

oDbf:Blank()
oDbf:<fieldname> := <newvalue>
...
oDbf:Save()