Ver Mensaje Individual
  #1016  
Antiguo 16-05-2017
APO APO is offline
Miembro
 
Registrado: feb 2008
Posts: 121
Reputación: 17
APO Va por buen camino
Cita:
Empezado por keys Ver Mensaje
La unica forma que creo que existe es hacerte una función de retorne el numero que ocupa cada pais. Igual que para el resto de listas que hay que sumistrar, tipo facturas, etcc ya que no quieren un dato sino un índice de una tabla.

Código Delphi [-]
if CODPAIS = 'AF' then
   result := 0
 else if CODPAIS = 'AX' then result := 1
  else if CODPAIS = 'AL' then result := 2
   else if CODPAIS = 'DZ' then result := 3
    else if CODPAIS = 'AS' then result := 4
     else if CODPAIS = 'AD' then result := 5
      else if CODPAIS = 'AO' then result := 6
 etccc.

Por cierto esperate a la version 7 por que han cambiado la lista de paises.

Se puede hacer de manera directa, sin tener que preocuparnos por si cambian sus códigos internos de países o lo que sea. Por ejemplo, si quisiéramos asignar el país Francia, teniendo el código ISO (FR), sería de esta manera:

Código Delphi [-]
ARegistroLRFacturasEmitidas[ContadorFra].FacturaExpedida.Contraparte.IDOtro.CodigoPais:=SuministroFactEmitidas.CountryType2(GetEnumValue(Typ  eInfo(CountryType2),'ES'));

Si el GetEnumValue lo podemos utilizar en todos los otros tipos de campo
Responder Con Cita