TCliente

<< Click to Display Table of Contents >>

Navigation:  Web Service > Funciones > Classes >

TCliente

TCliente = class(TRemotable)

private

   FNuCliente:LongInt;            

 {Numero de Cliente que tiene asignado en la Base de Datos

 WebService, Es el consecutivo WEB}

   FNuClienteDisPRO:LongInt;      

 {Numero de Cliente en la base de datos DisPRO}

   FNombre: String;

   FRFC: String;                  

 {RFC Cuando es Publico General XAXX-010101-000}

   FCalle:String;

   FNumero:String;

   FInterior:String;

   FColonia:String;

   FCiudad:String;

   FEstado:String;

   FPais:String;

   FCP:String;

   FEmail:String;

   FTelefono:String;

   FDomicilioEntrega:String;

 {Máximo 100 Caracteres, dejar en Blanco en caso de que la

 dirección de Facturación es la misma de Entrega}

   FComercial: String;

   FNuPrecio:String;

   FSaldo:Real;

   FLimite:Real;

   FExtra1:String;

   FExtra2:String;

   FExtra3:String;

 

   FLatitud: Real;

   FLongitud: Real;

 

published

  property NuCliente: longint read FNuCliente write FNuCliente;

  property NuClienteDisPRO: longint read FNuClienteDisPRO write FNuClienteDisPRO;

  property Nombre:    string  read FNombre write FNombre;

  property Comercial: string  read FComercial write FComercial;

  property RFC:       string  read FRFC write FRFC;

  property Calle:     string  read FCalle write FCalle;

  property Numero:    string  read FNumero write FNumero;

  property Interior:  string  read FInterior write FInterior;

  property Colonia:   string  read FColonia write FColonia;

  property Ciudad:    string  read FCiudad write FCiudad;

  property Estado:    string  read FEstado write FEstado;

  property Pais  :    string  read FPais write FPais;

  property CP:        string  read FCP write FCP;

  property Email:     string  read FEmail write FEmail;

  property Telefono:     string  read FTelefono write FTelefono;

  property DomicilioEntrega:    String   read FDomicilioEntrega write FDomicilioEntrega;

  property NuPrecio:  string  read FNuPrecio write FNuPrecio;

  property Saldo:     Real  read FSaldo write FSaldo;

  property Limite:    Real  read FLimite write FLimite;

  property Extra1:  string  read FExtra1 write FExtra1;

  property Extra2:  string  read FExtra2 write FExtra2;

  property Extra3:  string  read FExtra3 write FExtra3;

  property Latitud : Real read FLatitud write FLatitud;

  property Longitud : Real read FLongitud write FLongitud;

end;