SII -Nuevo sistema de la Agencia Tributaria española de envío de datos vía Webservice

[josecarrillo]

Me respondo a mi mismo por si le sirve a alguien.
Es un tipo enumerado y hay funciones específicas.
Seguro que hay alguna forma mas simple, pero esta me funciona.
De esta forma si cambia la lista en versiones futuras, seguirá funcionando.

uses ..., typinfo ;

var
idpais,ci:integer;
codigopais:string;

begin
CodigoPais:='IT';
idpais:=-1;
for ci := ord(Low(countrytype2)) to ord(High(countrytype2)) do
if CodigoPais= GetEnumName(TypeInfo(countrytype2),ci) then
begin
idpais:=ci;
ShowMessage( GetEnumName(TypeInfo(countrytype2),ci)); // solo para comprobar valor.
end;
...

if idPais>-1 then
ARegLRFacturasEmitidas[0].FacturaExpedida.Contraparte.IDOtro.CodigoPais:=CountryType2(idpais);

...

[aposi]

Hola,
En las facturas recibidas hay algun campo para indicar nuestro numero de factura interno?

[CMB]

Empezado por aposi

Hola,
En las facturas recibidas hay algun campo para indicar nuestro numero de factura interno?

Creo que no, pero en FechaRegContable puedes poner la fecha de recepción, que viene a ser algo parecido.

[keys]

Empezado por CMB

Creo que no, pero en FechaRegContable puedes poner la fecha de recepción, que viene a ser algo parecido.

A hacienda le da igual el número interno que tu le des a la factura.
Siempre puedes utilizar el campo descripcion

[nachoexe]

Empezado por josecarrillo

Me respondo a mi mismo por si le sirve a alguien.
Es un tipo enumerado y hay funciones específicas.
Seguro que hay alguna forma mas simple, pero esta me funciona.
De esta forma si cambia la lista en versiones futuras, seguirá funcionando.

uses ..., typinfo ;

var
idpais,ci:integer;
codigopais:string;

begin
CodigoPais:='IT';
idpais:=-1;
for ci := ord(Low(countrytype2)) to ord(High(countrytype2)) do
if CodigoPais= GetEnumName(TypeInfo(countrytype2),ci) then
begin
idpais:=ci;
ShowMessage( GetEnumName(TypeInfo(countrytype2),ci)); // solo para comprobar valor.
end;
...

if idPais>-1 then
ARegLRFacturasEmitidas[0].FacturaExpedida.Contraparte.IDOtro.CodigoPais:=CountryType2(idpais);

...

Muy buena idea el trabajar directamente con la el type de paises, así si lo cambian no pasa nada.
Solo una sugerencia, ten en cuenta que en el countrytype2 hay paises con 3 letras, aunque seguramente no se utilicen en la vida, así que deberías coger solo las dos primeras posiciones