LuisLeon_FactuGES/Modulos/Inventario/Model/schInventarioClient_Intf.pas

unit schInventarioClient_Intf;

interface

uses
  Classes, DB, SysUtils, uROClasses, uDADataTable;

const
  { Data table rules ids
       Feel free to change them to something more human readable
       but make sure they are unique in the context of your application }
  RID_INVENTARIO = '{776FC2BA-F5EF-46A9-A2B9-8C521F731D63}';
  RID_INVENTARIO_Refresh = '{67A01C5F-E83B-4710-A950-4FB605D15603}';

  { Data table names }
  nme_INVENTARIO = 'INVENTARIO';
  nme_INVENTARIO_Refresh = 'INVENTARIO_Refresh';

  { INVENTARIO fields }
  fld_INVENTARIOID = 'ID';
  fld_INVENTARIOID_ALMACEN = 'ID_ALMACEN';
  fld_INVENTARIOID_ARTICULO = 'ID_ARTICULO';
  fld_INVENTARIOCANTIDAD = 'CANTIDAD';
  fld_INVENTARIOID_PEDIDO_PROVEEDOR = 'ID_PEDIDO_PROVEEDOR';
  fld_INVENTARIOID_PEDIDO_CLIENTE = 'ID_PEDIDO_CLIENTE';
  fld_INVENTARIOREFERENCIA_PED_CLI = 'REFERENCIA_PED_CLI';
  fld_INVENTARIODESCRIPCION = 'DESCRIPCION';
  fld_INVENTARIOID_EMPRESA = 'ID_EMPRESA';
  fld_INVENTARIOREFERENCIA_CLIENTE = 'REFERENCIA_CLIENTE';
  fld_INVENTARIOFAMILIA = 'FAMILIA';
  fld_INVENTARIOALMACEN = 'ALMACEN';
  fld_INVENTARIOREFERENCIA_PROVEEDOR = 'REFERENCIA_PROVEEDOR';

  { INVENTARIO field indexes }
  idx_INVENTARIOID = 0;
  idx_INVENTARIOID_ALMACEN = 1;
  idx_INVENTARIOID_ARTICULO = 2;
  idx_INVENTARIOCANTIDAD = 3;
  idx_INVENTARIOID_PEDIDO_PROVEEDOR = 4;
  idx_INVENTARIOID_PEDIDO_CLIENTE = 5;
  idx_INVENTARIOREFERENCIA_PED_CLI = 6;
  idx_INVENTARIODESCRIPCION = 7;
  idx_INVENTARIOID_EMPRESA = 8;
  idx_INVENTARIOREFERENCIA_CLIENTE = 9;
  idx_INVENTARIOFAMILIA = 10;
  idx_INVENTARIOALMACEN = 11;
  idx_INVENTARIOREFERENCIA_PROVEEDOR = 12;

  { INVENTARIO_Refresh fields }
  fld_INVENTARIO_RefreshID = 'ID';
  fld_INVENTARIO_RefreshID_ALMACEN = 'ID_ALMACEN';
  fld_INVENTARIO_RefreshID_ARTICULO = 'ID_ARTICULO';
  fld_INVENTARIO_RefreshCANTIDAD = 'CANTIDAD';
  fld_INVENTARIO_RefreshID_PEDIDO_PROVEEDOR = 'ID_PEDIDO_PROVEEDOR';
  fld_INVENTARIO_RefreshID_PEDIDO_CLIENTE = 'ID_PEDIDO_CLIENTE';
  fld_INVENTARIO_RefreshREFERENCIA_PED_CLI = 'REFERENCIA_PED_CLI';
  fld_INVENTARIO_RefreshDESCRIPCION = 'DESCRIPCION';
  fld_INVENTARIO_RefreshID_EMPRESA = 'ID_EMPRESA';
  fld_INVENTARIO_RefreshREFERENCIA_CLIENTE = 'REFERENCIA_CLIENTE';
  fld_INVENTARIO_RefreshFAMILIA = 'FAMILIA';
  fld_INVENTARIO_RefreshALMACEN = 'ALMACEN';
  fld_INVENTARIO_RefreshREFERENCIA_PROVEEDOR = 'REFERENCIA_PROVEEDOR';

  { INVENTARIO_Refresh field indexes }
  idx_INVENTARIO_RefreshID = 0;
  idx_INVENTARIO_RefreshID_ALMACEN = 1;
  idx_INVENTARIO_RefreshID_ARTICULO = 2;
  idx_INVENTARIO_RefreshCANTIDAD = 3;
  idx_INVENTARIO_RefreshID_PEDIDO_PROVEEDOR = 4;
  idx_INVENTARIO_RefreshID_PEDIDO_CLIENTE = 5;
  idx_INVENTARIO_RefreshREFERENCIA_PED_CLI = 6;
  idx_INVENTARIO_RefreshDESCRIPCION = 7;
  idx_INVENTARIO_RefreshID_EMPRESA = 8;
  idx_INVENTARIO_RefreshREFERENCIA_CLIENTE = 9;
  idx_INVENTARIO_RefreshFAMILIA = 10;
  idx_INVENTARIO_RefreshALMACEN = 11;
  idx_INVENTARIO_RefreshREFERENCIA_PROVEEDOR = 12;

type
  { IINVENTARIO }
  IINVENTARIO = interface(IDAStronglyTypedDataTable)
  ['{C48053EA-8B26-4625-A24B-4B45628EE268}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetID_ALMACENValue: Integer;
    procedure SetID_ALMACENValue(const aValue: Integer);
    function GetID_ARTICULOValue: Integer;
    procedure SetID_ARTICULOValue(const aValue: Integer);
    function GetCANTIDADValue: Integer;
    procedure SetCANTIDADValue(const aValue: Integer);
    function GetID_PEDIDO_PROVEEDORValue: Integer;
    procedure SetID_PEDIDO_PROVEEDORValue(const aValue: Integer);
    function GetID_PEDIDO_CLIENTEValue: Integer;
    procedure SetID_PEDIDO_CLIENTEValue(const aValue: Integer);
    function GetREFERENCIA_PED_CLIValue: String;
    procedure SetREFERENCIA_PED_CLIValue(const aValue: String);
    function GetDESCRIPCIONValue: String;
    procedure SetDESCRIPCIONValue(const aValue: String);
    function GetID_EMPRESAValue: Integer;
    procedure SetID_EMPRESAValue(const aValue: Integer);
    function GetREFERENCIA_CLIENTEValue: String;
    procedure SetREFERENCIA_CLIENTEValue(const aValue: String);
    function GetFAMILIAValue: String;
    procedure SetFAMILIAValue(const aValue: String);
    function GetALMACENValue: String;
    procedure SetALMACENValue(const aValue: String);
    function GetREFERENCIA_PROVEEDORValue: String;
    procedure SetREFERENCIA_PROVEEDORValue(const aValue: String);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property ID_ALMACEN: Integer read GetID_ALMACENValue write SetID_ALMACENValue;
    property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
    property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue;
    property ID_PEDIDO_PROVEEDOR: Integer read GetID_PEDIDO_PROVEEDORValue write SetID_PEDIDO_PROVEEDORValue;
    property ID_PEDIDO_CLIENTE: Integer read GetID_PEDIDO_CLIENTEValue write SetID_PEDIDO_CLIENTEValue;
    property REFERENCIA_PED_CLI: String read GetREFERENCIA_PED_CLIValue write SetREFERENCIA_PED_CLIValue;
    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property REFERENCIA_CLIENTE: String read GetREFERENCIA_CLIENTEValue write SetREFERENCIA_CLIENTEValue;
    property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue;
    property ALMACEN: String read GetALMACENValue write SetALMACENValue;
    property REFERENCIA_PROVEEDOR: String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;
  end;

  { TINVENTARIODataTableRules }
  TINVENTARIODataTableRules = class(TDADataTableRules, IINVENTARIO)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetID_ALMACENValue: Integer; virtual;
    procedure SetID_ALMACENValue(const aValue: Integer); virtual;
    function GetID_ARTICULOValue: Integer; virtual;
    procedure SetID_ARTICULOValue(const aValue: Integer); virtual;
    function GetCANTIDADValue: Integer; virtual;
    procedure SetCANTIDADValue(const aValue: Integer); virtual;
    function GetID_PEDIDO_PROVEEDORValue: Integer; virtual;
    procedure SetID_PEDIDO_PROVEEDORValue(const aValue: Integer); virtual;
    function GetID_PEDIDO_CLIENTEValue: Integer; virtual;
    procedure SetID_PEDIDO_CLIENTEValue(const aValue: Integer); virtual;
    function GetREFERENCIA_PED_CLIValue: String; virtual;
    procedure SetREFERENCIA_PED_CLIValue(const aValue: String); virtual;
    function GetDESCRIPCIONValue: String; virtual;
    procedure SetDESCRIPCIONValue(const aValue: String); virtual;
    function GetID_EMPRESAValue: Integer; virtual;
    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
    function GetREFERENCIA_CLIENTEValue: String; virtual;
    procedure SetREFERENCIA_CLIENTEValue(const aValue: String); virtual;
    function GetFAMILIAValue: String; virtual;
    procedure SetFAMILIAValue(const aValue: String); virtual;
    function GetALMACENValue: String; virtual;
    procedure SetALMACENValue(const aValue: String); virtual;
    function GetREFERENCIA_PROVEEDORValue: String; virtual;
    procedure SetREFERENCIA_PROVEEDORValue(const aValue: String); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property ID_ALMACEN: Integer read GetID_ALMACENValue write SetID_ALMACENValue;
    property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
    property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue;
    property ID_PEDIDO_PROVEEDOR: Integer read GetID_PEDIDO_PROVEEDORValue write SetID_PEDIDO_PROVEEDORValue;
    property ID_PEDIDO_CLIENTE: Integer read GetID_PEDIDO_CLIENTEValue write SetID_PEDIDO_CLIENTEValue;
    property REFERENCIA_PED_CLI: String read GetREFERENCIA_PED_CLIValue write SetREFERENCIA_PED_CLIValue;
    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property REFERENCIA_CLIENTE: String read GetREFERENCIA_CLIENTEValue write SetREFERENCIA_CLIENTEValue;
    property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue;
    property ALMACEN: String read GetALMACENValue write SetALMACENValue;
    property REFERENCIA_PROVEEDOR: String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;

  public
    constructor Create(aDataTable: TDADataTable); override;
    destructor Destroy; override;

  end;

  { IINVENTARIO_Refresh }
  IINVENTARIO_Refresh = interface(IDAStronglyTypedDataTable)
  ['{9BB25C95-C0DC-42C5-8A54-C18E693B7933}']
    { Property getters and setters }
    function GetIDValue: Integer;
    procedure SetIDValue(const aValue: Integer);
    function GetID_ALMACENValue: Integer;
    procedure SetID_ALMACENValue(const aValue: Integer);
    function GetID_ARTICULOValue: Integer;
    procedure SetID_ARTICULOValue(const aValue: Integer);
    function GetCANTIDADValue: Integer;
    procedure SetCANTIDADValue(const aValue: Integer);
    function GetID_PEDIDO_PROVEEDORValue: Integer;
    procedure SetID_PEDIDO_PROVEEDORValue(const aValue: Integer);
    function GetID_PEDIDO_CLIENTEValue: Integer;
    procedure SetID_PEDIDO_CLIENTEValue(const aValue: Integer);
    function GetREFERENCIA_PED_CLIValue: String;
    procedure SetREFERENCIA_PED_CLIValue(const aValue: String);
    function GetDESCRIPCIONValue: String;
    procedure SetDESCRIPCIONValue(const aValue: String);
    function GetID_EMPRESAValue: Integer;
    procedure SetID_EMPRESAValue(const aValue: Integer);
    function GetREFERENCIA_CLIENTEValue: String;
    procedure SetREFERENCIA_CLIENTEValue(const aValue: String);
    function GetFAMILIAValue: String;
    procedure SetFAMILIAValue(const aValue: String);
    function GetALMACENValue: String;
    procedure SetALMACENValue(const aValue: String);
    function GetREFERENCIA_PROVEEDORValue: String;
    procedure SetREFERENCIA_PROVEEDORValue(const aValue: String);


    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property ID_ALMACEN: Integer read GetID_ALMACENValue write SetID_ALMACENValue;
    property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
    property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue;
    property ID_PEDIDO_PROVEEDOR: Integer read GetID_PEDIDO_PROVEEDORValue write SetID_PEDIDO_PROVEEDORValue;
    property ID_PEDIDO_CLIENTE: Integer read GetID_PEDIDO_CLIENTEValue write SetID_PEDIDO_CLIENTEValue;
    property REFERENCIA_PED_CLI: String read GetREFERENCIA_PED_CLIValue write SetREFERENCIA_PED_CLIValue;
    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property REFERENCIA_CLIENTE: String read GetREFERENCIA_CLIENTEValue write SetREFERENCIA_CLIENTEValue;
    property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue;
    property ALMACEN: String read GetALMACENValue write SetALMACENValue;
    property REFERENCIA_PROVEEDOR: String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;
  end;

  { TINVENTARIO_RefreshDataTableRules }
  TINVENTARIO_RefreshDataTableRules = class(TDADataTableRules, IINVENTARIO_Refresh)
  private
  protected
    { Property getters and setters }
    function GetIDValue: Integer; virtual;
    procedure SetIDValue(const aValue: Integer); virtual;
    function GetID_ALMACENValue: Integer; virtual;
    procedure SetID_ALMACENValue(const aValue: Integer); virtual;
    function GetID_ARTICULOValue: Integer; virtual;
    procedure SetID_ARTICULOValue(const aValue: Integer); virtual;
    function GetCANTIDADValue: Integer; virtual;
    procedure SetCANTIDADValue(const aValue: Integer); virtual;
    function GetID_PEDIDO_PROVEEDORValue: Integer; virtual;
    procedure SetID_PEDIDO_PROVEEDORValue(const aValue: Integer); virtual;
    function GetID_PEDIDO_CLIENTEValue: Integer; virtual;
    procedure SetID_PEDIDO_CLIENTEValue(const aValue: Integer); virtual;
    function GetREFERENCIA_PED_CLIValue: String; virtual;
    procedure SetREFERENCIA_PED_CLIValue(const aValue: String); virtual;
    function GetDESCRIPCIONValue: String; virtual;
    procedure SetDESCRIPCIONValue(const aValue: String); virtual;
    function GetID_EMPRESAValue: Integer; virtual;
    procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
    function GetREFERENCIA_CLIENTEValue: String; virtual;
    procedure SetREFERENCIA_CLIENTEValue(const aValue: String); virtual;
    function GetFAMILIAValue: String; virtual;
    procedure SetFAMILIAValue(const aValue: String); virtual;
    function GetALMACENValue: String; virtual;
    procedure SetALMACENValue(const aValue: String); virtual;
    function GetREFERENCIA_PROVEEDORValue: String; virtual;
    procedure SetREFERENCIA_PROVEEDORValue(const aValue: String); virtual;

    { Properties }
    property ID: Integer read GetIDValue write SetIDValue;
    property ID_ALMACEN: Integer read GetID_ALMACENValue write SetID_ALMACENValue;
    property ID_ARTICULO: Integer read GetID_ARTICULOValue write SetID_ARTICULOValue;
    property CANTIDAD: Integer read GetCANTIDADValue write SetCANTIDADValue;
    property ID_PEDIDO_PROVEEDOR: Integer read GetID_PEDIDO_PROVEEDORValue write SetID_PEDIDO_PROVEEDORValue;
    property ID_PEDIDO_CLIENTE: Integer read GetID_PEDIDO_CLIENTEValue write SetID_PEDIDO_CLIENTEValue;
    property REFERENCIA_PED_CLI: String read GetREFERENCIA_PED_CLIValue write SetREFERENCIA_PED_CLIValue;
    property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
    property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
    property REFERENCIA_CLIENTE: String read GetREFERENCIA_CLIENTEValue write SetREFERENCIA_CLIENTEValue;
    property FAMILIA: String read GetFAMILIAValue write SetFAMILIAValue;
    property ALMACEN: String read GetALMACENValue write SetALMACENValue;
    property REFERENCIA_PROVEEDOR: String read GetREFERENCIA_PROVEEDORValue write SetREFERENCIA_PROVEEDORValue;

  public
    constructor Create(aDataTable: TDADataTable); override;
    destructor Destroy; override;

  end;

implementation

uses Variants;

{ TINVENTARIODataTableRules }
constructor TINVENTARIODataTableRules.Create(aDataTable: TDADataTable);
begin
  inherited;
end;

destructor TINVENTARIODataTableRules.Destroy;
begin
  inherited;
end;

function TINVENTARIODataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_INVENTARIOID].AsInteger;
end;

procedure TINVENTARIODataTableRules.SetIDValue(const aValue: Integer);
begin
  DataTable.Fields[idx_INVENTARIOID].AsInteger := aValue;
end;

function TINVENTARIODataTableRules.GetID_ALMACENValue: Integer;
begin
  result := DataTable.Fields[idx_INVENTARIOID_ALMACEN].AsInteger;
end;

procedure TINVENTARIODataTableRules.SetID_ALMACENValue(const aValue: Integer);
begin
  DataTable.Fields[idx_INVENTARIOID_ALMACEN].AsInteger := aValue;
end;

function TINVENTARIODataTableRules.GetID_ARTICULOValue: Integer;
begin
  result := DataTable.Fields[idx_INVENTARIOID_ARTICULO].AsInteger;
end;

procedure TINVENTARIODataTableRules.SetID_ARTICULOValue(const aValue: Integer);
begin
  DataTable.Fields[idx_INVENTARIOID_ARTICULO].AsInteger := aValue;
end;

function TINVENTARIODataTableRules.GetCANTIDADValue: Integer;
begin
  result := DataTable.Fields[idx_INVENTARIOCANTIDAD].AsInteger;
end;

procedure TINVENTARIODataTableRules.SetCANTIDADValue(const aValue: Integer);
begin
  DataTable.Fields[idx_INVENTARIOCANTIDAD].AsInteger := aValue;
end;

function TINVENTARIODataTableRules.GetID_PEDIDO_PROVEEDORValue: Integer;
begin
  result := DataTable.Fields[idx_INVENTARIOID_PEDIDO_PROVEEDOR].AsInteger;
end;

procedure TINVENTARIODataTableRules.SetID_PEDIDO_PROVEEDORValue(const aValue: Integer);
begin
  DataTable.Fields[idx_INVENTARIOID_PEDIDO_PROVEEDOR].AsInteger := aValue;
end;

function TINVENTARIODataTableRules.GetID_PEDIDO_CLIENTEValue: Integer;
begin
  result := DataTable.Fields[idx_INVENTARIOID_PEDIDO_CLIENTE].AsInteger;
end;

procedure TINVENTARIODataTableRules.SetID_PEDIDO_CLIENTEValue(const aValue: Integer);
begin
  DataTable.Fields[idx_INVENTARIOID_PEDIDO_CLIENTE].AsInteger := aValue;
end;

function TINVENTARIODataTableRules.GetREFERENCIA_PED_CLIValue: String;
begin
  result := DataTable.Fields[idx_INVENTARIOREFERENCIA_PED_CLI].AsString;
end;

procedure TINVENTARIODataTableRules.SetREFERENCIA_PED_CLIValue(const aValue: String);
begin
  DataTable.Fields[idx_INVENTARIOREFERENCIA_PED_CLI].AsString := aValue;
end;

function TINVENTARIODataTableRules.GetDESCRIPCIONValue: String;
begin
  result := DataTable.Fields[idx_INVENTARIODESCRIPCION].AsString;
end;

procedure TINVENTARIODataTableRules.SetDESCRIPCIONValue(const aValue: String);
begin
  DataTable.Fields[idx_INVENTARIODESCRIPCION].AsString := aValue;
end;

function TINVENTARIODataTableRules.GetID_EMPRESAValue: Integer;
begin
  result := DataTable.Fields[idx_INVENTARIOID_EMPRESA].AsInteger;
end;

procedure TINVENTARIODataTableRules.SetID_EMPRESAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_INVENTARIOID_EMPRESA].AsInteger := aValue;
end;

function TINVENTARIODataTableRules.GetREFERENCIA_CLIENTEValue: String;
begin
  result := DataTable.Fields[idx_INVENTARIOREFERENCIA_CLIENTE].AsString;
end;

procedure TINVENTARIODataTableRules.SetREFERENCIA_CLIENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_INVENTARIOREFERENCIA_CLIENTE].AsString := aValue;
end;

function TINVENTARIODataTableRules.GetFAMILIAValue: String;
begin
  result := DataTable.Fields[idx_INVENTARIOFAMILIA].AsString;
end;

procedure TINVENTARIODataTableRules.SetFAMILIAValue(const aValue: String);
begin
  DataTable.Fields[idx_INVENTARIOFAMILIA].AsString := aValue;
end;

function TINVENTARIODataTableRules.GetALMACENValue: String;
begin
  result := DataTable.Fields[idx_INVENTARIOALMACEN].AsString;
end;

procedure TINVENTARIODataTableRules.SetALMACENValue(const aValue: String);
begin
  DataTable.Fields[idx_INVENTARIOALMACEN].AsString := aValue;
end;

function TINVENTARIODataTableRules.GetREFERENCIA_PROVEEDORValue: String;
begin
  result := DataTable.Fields[idx_INVENTARIOREFERENCIA_PROVEEDOR].AsString;
end;

procedure TINVENTARIODataTableRules.SetREFERENCIA_PROVEEDORValue(const aValue: String);
begin
  DataTable.Fields[idx_INVENTARIOREFERENCIA_PROVEEDOR].AsString := aValue;
end;


{ TINVENTARIO_RefreshDataTableRules }
constructor TINVENTARIO_RefreshDataTableRules.Create(aDataTable: TDADataTable);
begin
  inherited;
end;

destructor TINVENTARIO_RefreshDataTableRules.Destroy;
begin
  inherited;
end;

function TINVENTARIO_RefreshDataTableRules.GetIDValue: Integer;
begin
  result := DataTable.Fields[idx_INVENTARIO_RefreshID].AsInteger;
end;

procedure TINVENTARIO_RefreshDataTableRules.SetIDValue(const aValue: Integer);
begin
  DataTable.Fields[idx_INVENTARIO_RefreshID].AsInteger := aValue;
end;

function TINVENTARIO_RefreshDataTableRules.GetID_ALMACENValue: Integer;
begin
  result := DataTable.Fields[idx_INVENTARIO_RefreshID_ALMACEN].AsInteger;
end;

procedure TINVENTARIO_RefreshDataTableRules.SetID_ALMACENValue(const aValue: Integer);
begin
  DataTable.Fields[idx_INVENTARIO_RefreshID_ALMACEN].AsInteger := aValue;
end;

function TINVENTARIO_RefreshDataTableRules.GetID_ARTICULOValue: Integer;
begin
  result := DataTable.Fields[idx_INVENTARIO_RefreshID_ARTICULO].AsInteger;
end;

procedure TINVENTARIO_RefreshDataTableRules.SetID_ARTICULOValue(const aValue: Integer);
begin
  DataTable.Fields[idx_INVENTARIO_RefreshID_ARTICULO].AsInteger := aValue;
end;

function TINVENTARIO_RefreshDataTableRules.GetCANTIDADValue: Integer;
begin
  result := DataTable.Fields[idx_INVENTARIO_RefreshCANTIDAD].AsInteger;
end;

procedure TINVENTARIO_RefreshDataTableRules.SetCANTIDADValue(const aValue: Integer);
begin
  DataTable.Fields[idx_INVENTARIO_RefreshCANTIDAD].AsInteger := aValue;
end;

function TINVENTARIO_RefreshDataTableRules.GetID_PEDIDO_PROVEEDORValue: Integer;
begin
  result := DataTable.Fields[idx_INVENTARIO_RefreshID_PEDIDO_PROVEEDOR].AsInteger;
end;

procedure TINVENTARIO_RefreshDataTableRules.SetID_PEDIDO_PROVEEDORValue(const aValue: Integer);
begin
  DataTable.Fields[idx_INVENTARIO_RefreshID_PEDIDO_PROVEEDOR].AsInteger := aValue;
end;

function TINVENTARIO_RefreshDataTableRules.GetID_PEDIDO_CLIENTEValue: Integer;
begin
  result := DataTable.Fields[idx_INVENTARIO_RefreshID_PEDIDO_CLIENTE].AsInteger;
end;

procedure TINVENTARIO_RefreshDataTableRules.SetID_PEDIDO_CLIENTEValue(const aValue: Integer);
begin
  DataTable.Fields[idx_INVENTARIO_RefreshID_PEDIDO_CLIENTE].AsInteger := aValue;
end;

function TINVENTARIO_RefreshDataTableRules.GetREFERENCIA_PED_CLIValue: String;
begin
  result := DataTable.Fields[idx_INVENTARIO_RefreshREFERENCIA_PED_CLI].AsString;
end;

procedure TINVENTARIO_RefreshDataTableRules.SetREFERENCIA_PED_CLIValue(const aValue: String);
begin
  DataTable.Fields[idx_INVENTARIO_RefreshREFERENCIA_PED_CLI].AsString := aValue;
end;

function TINVENTARIO_RefreshDataTableRules.GetDESCRIPCIONValue: String;
begin
  result := DataTable.Fields[idx_INVENTARIO_RefreshDESCRIPCION].AsString;
end;

procedure TINVENTARIO_RefreshDataTableRules.SetDESCRIPCIONValue(const aValue: String);
begin
  DataTable.Fields[idx_INVENTARIO_RefreshDESCRIPCION].AsString := aValue;
end;

function TINVENTARIO_RefreshDataTableRules.GetID_EMPRESAValue: Integer;
begin
  result := DataTable.Fields[idx_INVENTARIO_RefreshID_EMPRESA].AsInteger;
end;

procedure TINVENTARIO_RefreshDataTableRules.SetID_EMPRESAValue(const aValue: Integer);
begin
  DataTable.Fields[idx_INVENTARIO_RefreshID_EMPRESA].AsInteger := aValue;
end;

function TINVENTARIO_RefreshDataTableRules.GetREFERENCIA_CLIENTEValue: String;
begin
  result := DataTable.Fields[idx_INVENTARIO_RefreshREFERENCIA_CLIENTE].AsString;
end;

procedure TINVENTARIO_RefreshDataTableRules.SetREFERENCIA_CLIENTEValue(const aValue: String);
begin
  DataTable.Fields[idx_INVENTARIO_RefreshREFERENCIA_CLIENTE].AsString := aValue;
end;

function TINVENTARIO_RefreshDataTableRules.GetFAMILIAValue: String;
begin
  result := DataTable.Fields[idx_INVENTARIO_RefreshFAMILIA].AsString;
end;

procedure TINVENTARIO_RefreshDataTableRules.SetFAMILIAValue(const aValue: String);
begin
  DataTable.Fields[idx_INVENTARIO_RefreshFAMILIA].AsString := aValue;
end;

function TINVENTARIO_RefreshDataTableRules.GetALMACENValue: String;
begin
  result := DataTable.Fields[idx_INVENTARIO_RefreshALMACEN].AsString;
end;

procedure TINVENTARIO_RefreshDataTableRules.SetALMACENValue(const aValue: String);
begin
  DataTable.Fields[idx_INVENTARIO_RefreshALMACEN].AsString := aValue;
end;

function TINVENTARIO_RefreshDataTableRules.GetREFERENCIA_PROVEEDORValue: String;
begin
  result := DataTable.Fields[idx_INVENTARIO_RefreshREFERENCIA_PROVEEDOR].AsString;
end;

procedure TINVENTARIO_RefreshDataTableRules.SetREFERENCIA_PROVEEDORValue(const aValue: String);
begin
  DataTable.Fields[idx_INVENTARIO_RefreshREFERENCIA_PROVEEDOR].AsString := aValue;
end;


initialization
  RegisterDataTableRules(RID_INVENTARIO, TINVENTARIODataTableRules);
  RegisterDataTableRules(RID_INVENTARIO_Refresh, TINVENTARIO_RefreshDataTableRules);

end.