norma 58 (remesas) componente

[Neftali [Germán.Estévez]]

Acabo de subir al FTP los ejemplo y el componente del que se habla en este hilo.
Normas-19-58-34
ejemplo_norma_19_34

[letsrockit]

muchas gracias! ahora lo descargo
un saludo

[ivexman]

La línea 528 de la unidad CVBNorma34CSB parece que no es del todo correcta:

iTotImpCinEu := iTotImpCinEu+StrToFloat(sImporteEu);

La variable iTotImpCinEu acumula el total de las transferencias a realizar.

La variable sImporteEu se le ha sacado la separación decimal y realmente suma como entero, provocando error en la validación del fichero cuando este se envía a la entidad bancaria.

Lo correcto seria:
iTotImpCinEu := iTotImpCinEu+ImporteEu;

Saludos

[Casimiro Noteví]

Empezado por ivexman

La variable sImporteEu se le ha sacado la separación decimal y realmente suma como entero, provocando error en la validación del fichero cuando este se envía a la entidad bancaria.

No sé si está bien o mal, tendría que mirarlo, pero ten en cuenta que NO puede llevar decimales en el fichero que se envía al banco, por eso está como entero.
Me explico con un ejemplo, si tenemos 125,58 entonces en el fichero debe ir: 12558

[chamix]

Hola! hay algún archivo de ayuda de estos componentes? Estoy intentando usar la norma 19, he buscado por ahí pero no encuentro nada.
Gracias!

[Casimiro Noteví]

No, no hay ninguna ayuda.
De todas formas tampoco es muy necesaria, se supone que tienes el cuaderno bancario de normas 19 (o el que vayas a usar), y con eso y el ejemplo que tienes (unos mensajes más arriba), debe haber suficiente.
Si tienes alguna duda, ya sabes, a preguntar

[chamix]

Gracias por la respuesta Casimiro.
No vi la página anterior a esta hasta hace un rato, me fué muy útil y es cierto que no hace falta, no estaría de más incluir los ejemplos en el zip que hay en el ftp para tenerlo todo más claro al descargarlos, aunque si no fuera por eso no habría escrito al foro, jejeje

Después de romperme la cabeza un rato me he dado cuenta de que en la línea "496" de "CVBNorma19CSB" me daba un error aún poniendo Euros:=true; la he comentado y fuera error.

iTotImpOrdPts := iTotImpOrdPts + StrToInt( cIT ); //ImportePts;

Gracias por todo, me ha sido de gran ayuda el componente!