TPedido

<< Click to Display Table of Contents >>

Navigation:  Web Service > Funciones > Classes >

TPedido

TPedido = class(TRemotable)

private

   FNuPedido:LongInt;

 

 

{Requerido: ID de Pedido en base de datos WEB,si se asignan CERO el sistema siempre lo ingresara}

   FNuEstado:LongInt;

{

0: Sin Pago

1: Pagado

2: Token de Pago

3: Token Rechazado

4: Pagar al Recoger

5: Transferencia por Confirmar

50: Transferencia Confirmada

6: Cheque por Confirmar

60: Cheque Confirmado

7: Oxxo por Confirmar

70: Oxxo Confirmada

}

   FReferenciaPago:String[100];

{Información como referencia del pago realizado}

   FNuImpreso:LongInt;

{0: No Requiere Factura (Remisión)  

1: Requiere Factura}

   FFecha:TDate;

{Fecha en que se registra el Pedido}

   FFecha_Entrega:TDate;

{Fecha en la que se desea la Entrega del Producto al Cliente}

   FHora: TTime;

{Esta hora solo es histórica}

   FSubTotal:Double;

{Sumas Totales sin Impuesto}

   FIVA:Double;

{Sumas Totales de IVA}

   FIEPS:Double;

{Sumas Totales de IEPS}

   FTotal:Double;

{Suma Total}

   FNotas:String[300];

{Algún comentario que el Cliente Tenga sobre su compra}

   FCliente:TCliente;

{Datos del Cliente al que se hace el Pedido, aunque el Cliente ya exista deberán ir acompañados}

   FCount : Integer;

{Cantidad de Renglones de Productos en el Pedido}

   FArrayDetalle: TArrayDetalle;

{Lista de Productos que Incluye el Pedido}

   FTipoFolioCliente:Integer;

{0=Se usara el Folio independiente para el WebService para la Búsqueda, Alta y Modificación de Clientes diferente

a DisPRO (NuCliente)}

{1=Se usara el Folio que maneja DisPRO para la Búsqueda, Alta y Modificación de Clientes (NuClienteDisPRO)}

   FNuUser:LongInt;

{Numero de Usuario que levanto el Pedido}

   FNuMoneda:LongInt;

{1: Pesos   2: Dolares}

   FNuPaso: Integer;

{

0 En Captura (Usarse para Dejar En Espera)

8 En Captura (Local)

1 En Proceso (Usarse para que el depto de Ventas haga la Factura)

2 Facturado  (No se use, es exclusivo de DisPRO)

3 Denegado   (No se use, es exclusivo de DisPRO)

4 Con Error  (No se use, es exclusivo de DisPRO)

5 Cancelado por Agente  (No se use, es exclusivo de DisPRO)

6 Cancelado por Ventas  (No se use, es exclusivo de DisPRO)

7 Cancelado por Cliente (No se use, es exclusivo de DisPRO)

9 Cotización (Usar para enviar solo la cotización)

10 En Revisión (para revisar Cantidades y Totales)

11 En Espera de Pago (Falta procesar el Token de pago)

}

   {2019}


   FNuChofer: LongInt;


   FHorario: String;


   FFolioVenta: LongInt;

{Dato de Lectura, solo usado cuando se recupera la Lista de Pedidos}

   FUsoCFDI: String;

{Clave de USO de CFDI del SAT}

   FMetodoPago: String;

{Clave de Método de Pago PPD o PUE, por default si se deja en blanco será PPD}

   FFormaPago: String;

{Clave de Forma de Pago solo para PUE:

"01" Efectivo

"02" Cheque

"03" Transferencia Electrónica de Fondos

"04" Tarjeta de Crédito

"05" Monedero Electrónico

"28" Tarjeta de Débito

 

Consulte el Catalogo del SAT para mayor información

 

En las PPD será siempre "99" Por Definir}

   FFacilidad271: String;

{"F" o "T" , al ser "T" significa que sera de Crédito la Factura, pero con Forma de Pago "PUE" y Método de Pago}

   {2020}


   FNuTipoOpera: Integer;

{0:Manual controlado por Ventas  

1:Entrega a Domicilio    

2:Recoge en Tienda}

   FNuEmpresaPago: Integer;

{0:Sin Definir   1:Stripe     2:Paypal   3:SmartPayment}

   FEnvio: Real;

{Costo de Envio (solo informativo), ya debe estar incluido en el Total del Pedido}

   FTokenPago: String;

{200Chars, Token de Pago, pendiente por aplicar (stripe)}

   FURLPago: String;

{200Chars, URL de Pago, Recibo electrónico del pago (stripe)}

   FCteNombre: String;

{100Chars, Nombre del Cliente que recibe}

   FCteTelefono: String;

{10Chars, Telefoneo del Cliente que recibe}

   FCteCorreo: String;

{50Chars, Correo Electrónico del Cliente que recibe}

   FCteCalle: String;

{100Chars, Calle}

   FCteNumero: String;

{30Chars, Numero Exterior}

   FCteNumeroint: String;

{30Chars, Numero Interior}

   FCteCP: String;

{5Chars, Código Postal}

   FCteColonia: String;

{50Chars, Colonia}

   FCteCiudad: String;

{50Chars, Ciudad}

   FCteEstado: String;

FCteEstado: String;

   FCtePais : String;

{50Chars, País}

   FCteCalles: String;

{100Chars, Entre Calles, adicional del domicilio}

   FCteReferencia: String;

{100Chars, Referencia, adicional del domicilio}

   FCteRFC: String;

{15Chars, RFC en caso de factura electrónica}

   FAHORRO: Real;

{Ahorro con Impuestos, solo informativo}

   FTOTAL_SINENVIO: Real;

{Total antes de Costo de Envío}

   FREQ_AUTH:String;

{Autorización de Precios: R= Requiere Autorización   D=Denegada    A=Aprobada}

   FRET_IVA:Double;              

   FRET_ISR:Double;                  FIVA_RET:Double;                  FISR_RET:Double;                  FCteLatitud: Real;

   FCteLongitud: Real;

   FDistancia: Real;

   FDuracion: Real;

   FDistanciaText: String;

   FDuracionText: String;

 

{Suma Ret IVA}

{Suma Ret ISR}

{Tasa Ret IVA}

{Tasa Ret ISR}

{Coordenadas del Cliente}

 

 

{Distancia entre el Cliente y la Tienda}

public

  procedure SetLengthList(Value: integer);

published

  property NuPedido: longint  read FNuPedido write FNuPedido;

  property NuEstado: longint  read FNuEstado write FNuEstado;

  property ReferenciaPago:    String   read FReferenciaPago write FReferenciaPago;

  property NuImpreso:longint  read FNuImpreso write FNuImpreso;

  property Fecha:    TDate    read FFecha write FFecha;

  property Fecha_Entrega:    TDate    read FFecha_Entrega write FFecha_Entrega;

  property Hora:     TTime    read FHora write FHora;

  property SubTotal: Double   read FSubTotal write FSubTotal;

  property IVA:      Double   read FIVA write FIVA;

  property IEPS:     Double   read FIEPS write FIEPS;

  property Total:    Double   read FTotal write FTotal;

  property Notas:    String   read FNotas write FNotas;

  property Cliente:  TCliente read FCliente write FCliente;

  property Count:    integer  read FCount write FCount;

  property ArrayDetalle: TArrayDetalle    read FArrayDetalle write FArrayDetalle;

  property TipoFolioCliente: Integer read FTipoFolioCliente write FTipoFolioCliente default 0;

  property NuUser: Integer read FNuUser write FNuUser default 1;

  property NuMoneda: longint  read FNuMoneda write FNuMoneda;

  property NuPaso: longint  read FNuPaso write FNuPaso;

 

   {Nuevos campos 2019}

  property NuChofer: longint  read FNuChofer write FNuChofer;

  property Horario:  String   read FHorario write FHorario;

  property FolioVenta: longint  read FFolioVenta write FFolioVenta;

  property UsoCFDI:  String   read FUsoCFDI write FUsoCFDI;

  property MetodoPago:  String   read FMetodoPago write FMetodoPago;

  property FormaPago:  String   read FFormaPago write FFormaPago;

  property Facilidad271:     string   read FFacilidad271 write FFacilidad271;

 

   {Nuevos campos 2020}

  property NuTipoOpera : Integer read FNuTipoOpera write FNuTipoOpera;

  property NuEmpresaPago : Integer read FNuEmpresaPago write FNuEmpresaPago;

  property Envio : Real read FEnvio write FEnvio;

  property TokenPago : String read FTokenPago write FTokenPago;

  property URLPago : String read FURLPago write FURLPago;

  property CteNombre : String read FCteNombre write FCteNombre;

  property CteTelefono : String read FCteTelefono write FCteTelefono;

  property CteCorreo : String read FCteCorreo write FCteCorreo;

  property CteCalle : String read FCteCalle write FCteCalle;

  property CteNumero : String read FCteNumero write FCteNumero;

  property CteNumeroint : String read FCteNumeroint write FCteNumeroint;

  property CteCP : String read FCteCP write FCteCP;

  property CteColonia : String read FCteColonia write FCteColonia;

  property CteCiudad : String read FCteCiudad write FCteCiudad;

  property CteEstado : String read FCteEstado write FCteEstado;

  property CteCalles : String read FCteCalles write FCteCalles;

  property CteReferencia : String read FCteReferencia write FCteReferencia;

  property CteRFC : String read FCteRFC write FCteRFC;

 

 

  property CtePais : String read FCtePais write FCtePais;

  property REQ_AUTH : String read FREQ_AUTH write FREQ_AUTH;

  property AHORRO : Real read FAHORRO write FAHORRO;

  property TOTAL_SINENVIO : Real read FTOTAL_SINENVIO write FTOTAL_SINENVIO;

 

end;