Ayuda en If Then Else

[ekbadel]

Hola: Cloyza, Muchas gracias por tus Contestaciones

Me sirvio de algo para agilizar y dejarlo mas Optimizado
Respecto al comentario de la concatenacion estas en lo correcto
por cuestiones anteriores se diseño de la siguiente manera

Pagos si es de una sola expedicion

NombrePago $Importe

Si eran mas de una expedicion

NombrePago $Importe , NombrePago $Importe

He aqui donde realizaba la concatenacion

Ahora se pide de la siguiente mane

pago1 pago2 pago3 pago4 pago
100
80

150 50


Apartir de esto es el problema Principal cuando saco mis sentencias If o Case en tu caso me manda a la Ultima Opcion Haciendo la concatenacion tomando el pago4 mayoritario o ultimo por decirlo asi, quisiera saber como hacer para sustraer el valor1 y valor4 separados para asi poder asignarlo a su Lugar indicado.

Gracias...Saludos......

[calogero]

Hola en mi opinión no tienes porque concatenar el nombrepago con el importepago,
te seria mas fácil si lo manejaras de la siguiente manera en una tabla en la base de datos:

tabla pagos

idpago | nombrepago | importe
------------------------------
1 | pago1 | $0.00
2 | pago2 | $0.00
3 | pago3 | $0.00
4 | pago4 | $0.00

de esa manera obtienes cada campo por separado y asi lo podrías manipular mejor en tu query

ejemplo

var
  nombrePago: string;
  importePago: string;
  ...
   nombrePago := qryGral.FieldByName('nombrepago').asString;
   importePago := qryGral.FieldByName('importe').asString;
  ...

[ekbadel]

Empezado por calogero

Hola en mi opinión no tienes porque concatenar el nombrepago con el importepago,
te seria mas fácil si lo manejaras de la siguiente manera en una tabla en la base de datos:

tabla pagos

idpago | nombrepago | importe
------------------------------
1 | pago1 | $0.00
2 | pago2 | $0.00
3 | pago3 | $0.00
4 | pago4 | $0.00

de esa manera obtienes cada campo por separado y asi lo podrías manipular mejor en tu query

ejemplo

var
  nombrePago: string;
  importePago: string;
  ...
   nombrePago := qryGral.FieldByName('nombrepago').asString;
   importePago := qryGral.FieldByName('importe').asString;
  ...

Hola Caloguero cierto lo que dices, desafortundamente mi Table no esta de esa manera la tengo asi:

Id Folio idforpag importe
1 755 1 100
2 755 2 150
3 755 3 200

Todo esta en un EOF y quedo lanzo la query me manda los tres registros es por eso que en su momento los concatone..
Forma Pago,Nombre Pago
y me salia 1 100, 2 150, 3 200

Ahora mi problema es separalos

pago1 pago2 pago3 pago4
100 200 300

pero siempre me da el Ultimo resultado...

Lei por ahi algo de separarlos uno por uno pero no entiendo bn la metodologia podrias Orientarme al respecto


Saludos.......