Cómo leer datos

[_Io]

Buenas Tardes.

La variables Specified, son privadas.

 RespuestaDatosRegistroFacturacionType = class(TRemotable)
  private

    ...

    FRefExterna_Specified: boolean;
    FSubsanacion_Specified: boolean;
    FRechazoPrevio_Specified: boolean;

   ....

Voy a hacer esta prueba a ver si funciona

 RespuestaDatosRegistroFacturacionType = class(TRemotable)
  private

    ...

    FRefExterna_Specified: boolean;
    FSubsanacion_Specified: boolean;
    FRechazoPrevio_Specified: boolean;

   ....

  public

    property Subsanacion_Especificada: boolean read  FSubsanacion_Specified;
    property RechazoPrevio_Especificada: boolean read  FRechazoPrevio_Specified;

En teoría podría acceder a sus valores sin tener que modificar la operativa de la clase
Saludos.

[_Io]

Hola.

Probado, y funciona.
Un poco rollo buscar las clases a modificar, pero ya está.

Salu2.

[rci]

Empezado por _Io

Hola.

Probado, y funciona.
Un poco rollo buscar las clases a modificar, pero ya está.

Salu2.

Hola _Io, en mi caso no he modificado nada de las clases que genera la importación del WSDL y las propiedades Specified son publicas (en c#). Te paso una parte del fichero Reference.cs creado al importar el WSDL:

private bool macrodatoFieldSpecified;

....

public bool MacrodatoSpecified 
{
   get 
   {
          return this.macrodatoFieldSpecified;
   }
   set 
   {
          this.macrodatoFieldSpecified = value;
          this.RaisePropertyChanged("MacrodatoSpecified");
   }
}

[_Io]

Empezado por rci

Hola _Io, en mi caso no he modificado nada de las clases que genera la importación del WSDL y las propiedades Specified son publicas (en c#). Te paso una parte del fichero Reference.cs creado al importar el WSDL:

private bool macrodatoFieldSpecified;

....

public bool MacrodatoSpecified 
{
   get 
   {
          return this.macrodatoFieldSpecified;
   }
   set 
   {
          this.macrodatoFieldSpecified = value;
          this.RaisePropertyChanged("MacrodatoSpecified");
   }
}

Hola.

Yo utilizo Delphi 12, y en la importación me crea estas propiedades como privadas, por eso lo de la chapucilla.

Sinceramente no sé si en las opciones de importación existe alguna opción para que saque estas propiedades como públicas.

También puede ser, que se pueda acceder a ellas y yo desconozca el cómo

Una Clase de la importación del WDSL:

  RespuestaBaseType = class(TRemotable)
  private
    FCSV: string;
    FCSV_Specified: boolean;
    FDatosPresentacion: DatosPresentacionType;
    FDatosPresentacion_Specified: boolean;
    FCabecera: CabeceraType;
    FTiempoEsperaEnvio: Tipo6Type;
    FEstadoEnvio: EstadoEnvioType;
    procedure SetCSV(Index: Integer; const Astring: string);
    function  CSV_Specified(Index: Integer): boolean;
    procedure SetDatosPresentacion(Index: Integer; const ADatosPresentacionType: DatosPresentacionType);
    function  DatosPresentacion_Specified(Index: Integer): boolean;
  public
    destructor Destroy; override;
  published
    property CSV:               string                 Index (IS_OPTN) read FCSV write SetCSV stored CSV_Specified;
    property DatosPresentacion: DatosPresentacionType  Index (IS_OPTN) read FDatosPresentacion write SetDatosPresentacion stored DatosPresentacion_Specified;
    property Cabecera:          CabeceraType           read FCabecera write FCabecera;
    property TiempoEsperaEnvio: Tipo6Type              read FTiempoEsperaEnvio write FTiempoEsperaEnvio;
    property EstadoEnvio:       EstadoEnvioType        read FEstadoEnvio write FEstadoEnvio;
  end;

Aquí pongo la modificación:

  RespuestaBaseType = class(TRemotable)
  private
    FCSV: string;
    FCSV_Specified: boolean;
    FDatosPresentacion: DatosPresentacionType;
    FDatosPresentacion_Specified: boolean;
    FCabecera: CabeceraType;
    FTiempoEsperaEnvio: Tipo6Type;
    FEstadoEnvio: EstadoEnvioType;
    procedure SetCSV(Index: Integer; const Astring: string);
    function  CSV_Specified(Index: Integer): boolean;
    procedure SetDatosPresentacion(Index: Integer; const ADatosPresentacionType: DatosPresentacionType);
    function  DatosPresentacion_Specified(Index: Integer): boolean;
  public
    property CSV_Especificada: boolean read FCSV_Specified;
    property DatosPresentacion_Especificada: boolean read FDatosPresentacion_Specified;
  public
    destructor Destroy; override;
  published
    property CSV:               string                 Index (IS_OPTN) read FCSV write SetCSV stored CSV_Specified;
    property DatosPresentacion: DatosPresentacionType  Index (IS_OPTN) read FDatosPresentacion write SetDatosPresentacion stored DatosPresentacion_Specified;
    property Cabecera:          CabeceraType           read FCabecera write FCabecera;
    property TiempoEsperaEnvio: Tipo6Type              read FTiempoEsperaEnvio write FTiempoEsperaEnvio;
    property EstadoEnvio:       EstadoEnvioType        read FEstadoEnvio write FEstadoEnvio;
  end;

Saludos !!!

[bmfranky]

Empezado por rci

Hola _Io, en mi caso no he modificado nada de las clases que genera la importación del WSDL y las propiedades Specified son publicas (en c#). Te paso una parte del fichero Reference.cs creado al importar el WSDL:

private bool macrodatoFieldSpecified;

....

public bool MacrodatoSpecified 
{
   get 
   {
          return this.macrodatoFieldSpecified;
   }
   set 
   {
          this.macrodatoFieldSpecified = value;
          this.RaisePropertyChanged("MacrodatoSpecified");
   }
}

Hola, yo cambio el timestamp a string porque al pasear introducía milisegundos, y daba error al enviar, a ti no te pasa?

[rci]

Empezado por bmfranky

Hola, yo cambio el timestamp a string porque al pasear introducía milisegundos, y daba error al enviar, a ti no te pasa?

Hola bmfranky, no modifico nada de las clases creadas al importar el wsdl porque sinó lo tendría que hacer cada vez que lo importo

No se exactamente a que propiedades te refieres con esto de los milisegundos, pero supongo que no me ocurre el error porque al rellenar todas las propiedades de fecha ya les doy el formato esperado.

Saludos

[bmfranky]

Empezado por rci

Hola bmfranky, no modifico nada de las clases creadas al importar el wsdl porque sinó lo tendría que hacer cada vez que lo importo

No se exactamente a que propiedades te refieres con esto de los milisegundos, pero supongo que no me ocurre el error porque al rellenar todas las propiedades de fecha ya les doy el formato esperado.

Saludos

Hola, buenos dias el parametro FechaHoraUsoGenREgistro es un System.DateTime , si lo paso directamente, me genera el xml, asi:

 <FechaHoraHusoGenRegistro >2024-10-01T15:05:26.908824+02:00</FechaHoraHusoGenRegistro>

Al enviar daba error de la fecha no correcta.

<EstadoRegistro>AceptadoConErrores</EstadoRegistro>
<CodigoErrorRegistro>2004</CodigoErrorRegistro>
<DescripcionErrorRegistro>El valor del campo FechaHoraHusoGenRegistro debe ser la fecha actual del sistema de la AEAT, admitiéndose un margen de error de: 120 segundos.</DescripcionErrorRegistro>

Como no hay forma de evitarlo por codigo,. lo cambie a string.


Por lo menos en c# VisualStudio 2015, que es la version que yo uso, pero ya te comente que la 2022, es diferente, en muchas cosas.

[rci]

Empezado por bmfranky

Hola, buenos dias el parametro FechaHoraUsoGenREgistro es un System.DateTime , si lo paso directamente, me genera el xml, asi:

 <FechaHoraHusoGenRegistro >2024-10-01T15:05:26.908824+02:00</FechaHoraHusoGenRegistro>

Al enviar daba error de la fecha no correcta.

<EstadoRegistro>AceptadoConErrores</EstadoRegistro>
<CodigoErrorRegistro>2004</CodigoErrorRegistro>
<DescripcionErrorRegistro>El valor del campo FechaHoraHusoGenRegistro debe ser la fecha actual del sistema de la AEAT, admitiéndose un margen de error de: 120 segundos.</DescripcionErrorRegistro>

Como no hay forma de evitarlo por codigo,. lo cambie a string.


Por lo menos en c# VisualStudio 2015, que es la version que yo uso, pero ya te comente que la 2022, es diferente, en muchas cosas.

Hola bmfranky, Puedes adaptarlo a lo que necesites:

DateTime currentDateTime = GetDateTime(); // Coge la fecha y hora de internet o del ordenador

// Convert to Veri*Factu FORMAT EXPECTED: YYYY-MM-DDThh:mm:ssTZD (ej: 2024-01-01T19:20:30+01:00) (ISO 8601)
var creationDateTime = new DateTime(currentDateTime.Year, currentDateTime.Month, currentDateTime.Day, currentDateTime.Hour, currentDateTime.Minute, currentDateTime.Second, DateTimeKind.Local);

registroFacturacionAlta.FechaHoraHusoGenRegistro = creationDateTime;

Prueba a ver si te sirve, creo que no depende de la versión del VisualStudio que tengas

Saludos