Adeudos Directos SEPA en euros Esquema B2B

Re: Adeudos Directos SEPA en euros Esquema B2B

Postby FiveWiDi » Fri Oct 25, 2013 8:02 pm

Manuel Aranda wrote:Un pequeño aporte: El documento PDF de domiciliación que ha facilitado Manuel para fusionarlo con nuestros datos. Espero os sea de utilidad.
http://www.ge.tt/21mzjFw/v/0?c


Muchas gracias Manuel,

Yo voy a empezar a hacer la plantilla para el esquema básico (CORE) en word y me he quedado de piedra al ver el buen trabajo que has hecho.
Lástima que tu ejemplo no sea para CORE si no me ahorraba un montón de trabajo (realmente estoy muy oxidado).

Buen trabajo.
Un Saludo
Carlos G.

FiveWin 24.02 + Harbour 3.2.0dev (r2403071241), BCC 7.7 Windows 10
FiveWiDi
 
Posts: 1190
Joined: Mon Oct 10, 2005 2:38 pm

Re: Adeudos Directos SEPA en euros Esquema B2B

Postby Manuel Aranda » Sun Oct 27, 2013 7:31 pm

Hola Carlos, si me pasas la plantilla la adapto y la metemos en el ejemplo anterior.
Un saludo,
Manuel

xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
User avatar
Manuel Aranda
 
Posts: 604
Joined: Wed Oct 19, 2005 8:20 pm
Location: España

Re: Adeudos Directos SEPA en euros Esquema B2B

Postby FiveWiDi » Sun Oct 27, 2013 8:12 pm

Manuel Aranda wrote:Hola Carlos, si me pasas la plantilla la adapto y la metemos en el ejemplo anterior.


Lo que tengo ahora es un PDF.

Cómo puedo pasarte el PDF original?
A que mail?

Gracias,
Un Saludo
Carlos G.

FiveWin 24.02 + Harbour 3.2.0dev (r2403071241), BCC 7.7 Windows 10
FiveWiDi
 
Posts: 1190
Joined: Mon Oct 10, 2005 2:38 pm

Re: Adeudos Directos SEPA en euros Esquema B2B

Postby FiveWiDi » Sun Oct 27, 2013 8:20 pm

Manuel Aranda wrote:Hola Carlos, si me pasas la plantilla la adapto y la metemos en el ejemplo anterior.


Lo ha sacado de aquí.

https://www.bancsabadell.com/cs/Satelli ... inary=true
Un Saludo
Carlos G.

FiveWin 24.02 + Harbour 3.2.0dev (r2403071241), BCC 7.7 Windows 10
FiveWiDi
 
Posts: 1190
Joined: Mon Oct 10, 2005 2:38 pm

Re: Adeudos Directos SEPA en euros Esquema B2B

Postby Manuel Aranda » Mon Oct 28, 2013 11:35 am

He modificado el ejemplo anterior para que contemple tambien el modelo CORE. Aquí está el enlace para descargar.

http://www.ge.tt/8lsQKTw/v/0?c

Estoy seguro que el código es optimizable con la clase XML, pues ya veis como genero el fichero XML, quizá de una forma poco ortodoxa, pero es como se me ha ocurrido hacerlo con los conocimientos que tengo. A ver si alguien se anima a portar el ejemplo utilizando la clase XML.
Modificar un archivo PDF es muy sencillo con la edición profesional de Acrobat Reader. Se pueden asignar y modificar campos en un momento y tener listo un formulario sin tener que tocar nada de código. En fín, que nos salimos del tema del hilo.
Un saludo,
Manuel

xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
User avatar
Manuel Aranda
 
Posts: 604
Joined: Wed Oct 19, 2005 8:20 pm
Location: España

Re: Adeudos Directos SEPA en euros Esquema B2B

Postby elvira » Mon Oct 28, 2013 2:40 pm

Amigos,

Muchísimas gracias por compartir sus experiencias :D :D

Entiendo que debemos tener la norma core, porque el b2b es exclusivamente entre empresas, de modo que cuando hay un particular o consumidor no sirve.

¿Alguno tiene un ejemplo del archivo core en formato texto?. No lo encuentro.

Muy agradecida ;))
elvira
 
Posts: 516
Joined: Fri Jun 29, 2012 12:49 pm

Re: Adeudos Directos SEPA en euros Esquema B2B

Postby Manuel Aranda » Mon Oct 28, 2013 5:21 pm

Hola Elvira:

Pues eso, es que no hay forma de encontrar un ejemplo por ninguna parte. De cualquier manera, al final de este documento

http://www.aeb60.com/Cuadernos/Cuaderno ... o%20electrónico%20–%20Esquema%20Básico.pdf

Con el ANEXO VII – REGLAS DE MIGRACIÓN DE ADEUDOS DOMICILIADOS ESPAÑOLES AL ESQUEMA DE ADEUDO DIRECTO BÁSICO SEPA
tal vez sea suficiente para convertir los antiguos ficheros a la nueva norma (en fichero TXT claro, que sería válidos hasta 2016)
Un saludo,
Manuel

xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
User avatar
Manuel Aranda
 
Posts: 604
Joined: Wed Oct 19, 2005 8:20 pm
Location: España

Re: Adeudos Directos SEPA en euros Esquema B2B

Postby elvira » Mon Oct 28, 2013 5:53 pm

Manuel,

Muchas gracias. Por favor, el link no funciona.

¿Alguien ha podido generar el fichero plano?.

Muy agradecida ;)
elvira
 
Posts: 516
Joined: Fri Jun 29, 2012 12:49 pm

Re: Adeudos Directos SEPA en euros Esquema B2B

Postby Manuel Aranda » Mon Oct 28, 2013 6:29 pm

Es el AEB 19-14 de aquí : http://www.aeb60.com/
Un saludo,
Manuel

xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
User avatar
Manuel Aranda
 
Posts: 604
Joined: Wed Oct 19, 2005 8:20 pm
Location: España

Re: Adeudos Directos SEPA en euros Esquema B2B

Postby FiveWiDi » Mon Oct 28, 2013 11:05 pm

Manuel Aranda wrote:He modificado el ejemplo anterior para que contemple tambien el modelo CORE. Aquí está el enlace para descargar.

http://www.ge.tt/8lsQKTw/v/0?c

Estoy seguro que el código es optimizable con la clase XML, pues ya veis como genero el fichero XML, quizá de una forma poco ortodoxa, pero es como se me ha ocurrido hacerlo con los conocimientos que tengo. A ver si alguien se anima a portar el ejemplo utilizando la clase XML.
Modificar un archivo PDF es muy sencillo con la edición profesional de Acrobat Reader. Se pueden asignar y modificar campos en un momento y tener listo un formulario sin tener que tocar nada de código. En fín, que nos salimos del tema del hilo.


Antes de nada, muchísimas gracias por tu generosidad, me acabas de ahorrar un mucho trabajo.

Bueno, lo mío ya es abusar. Pero creo que todos los que vayan a usar tu trabajo (incluso tu mismo) les sobrará el cuadrado donde debe estar el logo; no es obligatorio tener un logo y queda feo impirmir el documento con la leyenda "logo del acreedor" dentro de un cuadrado.

Por lo demás, un 10.

Y gracias de nuevo.
Un Saludo
Carlos G.

FiveWin 24.02 + Harbour 3.2.0dev (r2403071241), BCC 7.7 Windows 10
FiveWiDi
 
Posts: 1190
Joined: Mon Oct 10, 2005 2:38 pm

Re: Adeudos Directos SEPA en euros Esquema B2B

Postby Manuel Aranda » Tue Oct 29, 2013 6:54 am

Hola Carlos, esa es una de las razones por las que he puesto dos versiones de cada modelo, una respetando el modelo original y la otra modificada precisamente para quitar el recuadro del logotipo y reorganizar un poco los campos. La mayoría de los modelos oficiales no son más que una guia para el usuario con toda la información que ha de contener el formulario. Yo por mi parte voy a usar la versión modificada, que para eso me la he currao.
De todas formas, si lo que quieres es usar el modelo original sin el recuadro del logotipo, sólo tienes que editar el PDF con Acrobat Reader Profesional o cualquier otro editor de PDF y con la herramienta "retocar objeto " lo eliminas y ya está.
Un saludo,
Manuel

xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
User avatar
Manuel Aranda
 
Posts: 604
Joined: Wed Oct 19, 2005 8:20 pm
Location: España

Re: Adeudos Directos SEPA en euros Esquema B2B

Postby mastintin » Tue Oct 29, 2013 9:07 am

Aqui pongo el código para adaptar el ejemplo a el uso del soporte xml de harbour .Solo he cambiado la funcion FusionPDF .Supongo que se puede limpiar algo el código ,pero según esta funciona . Aún no tengo resuelto el tema de usar ISO en vez UTF .

Code: Select all  Expand view  RUN



****************************************************
 FUNCTION FusionPDF(cFicheroPDF,cFicheroXML,c)
*****************************************************
Local aDbf := {}
Local nHandle
Local nAreaAnterior:=Select()
Local cSalida:="salida"+SUBSTR(TIME(),1,2)+SUBSTR(TIME(),4,2)+SUBSTR(TIME(),7,2)+ ".pdf"
Local n:= 1

local oXml := mxmlNewXML()
local oDoc := mxmlNewElement( oXml, "xfdf" )
local oFields , xDato

 mxmlElementSetAttr( oDoc, "xmlns", 'http://ns.adobe.com/xfdf/' )
 mxmlElementSetAttr( oDoc, "xml:space",'preserve' )

 oFields := mxmlNewElement( oDoc, "fields" )


while n < 101

     xDato := mxmlNewElement( oFields, 'field' )
     mxmlElementSetAttr( xDato, 'name', 'c'+alltrim(str(n,3)) )
     
     xDato := mxmlNewElement( xDato, "value" )
     mxmlNewText(xDato, 0, c[n] )  
 
      n++
end while

 oFields := mxmlNewElement( oDoc, "f" )
 
  mxmlElementSetAttr( oFields, "href" , 'SEPA2.PDF')
 

mxmlSaveFile( oXML, "datos.xml", MXML_NO_CALLBACK )

 
   //
   COPY FILE &cFicheroPDF TO "entrada.pdf"
//   COPY FILE &cFicheroXML TO "datos.xml"
   //
   
   WaitRun("pdftk.exe entrada.pdf fill_form datos.xml output "+ cSalida,0 )
   
 
   //
   ShellExecute( ,"open", cSalida,,,1 )
   //
 //  ERASE (cFicheroXML)
   //
RETURN NIL

 
User avatar
mastintin
 
Posts: 1516
Joined: Thu May 27, 2010 2:06 pm

Re: Adeudos Directos SEPA en euros Esquema B2B

Postby Joaquim Ferrer » Tue Oct 29, 2013 9:25 am

elvira wrote:Amigos,

Muchísimas gracias por compartir sus experiencias :D :D

Entiendo que debemos tener la norma core, porque el b2b es exclusivamente entre empresas, de modo que cuando hay un particular o consumidor no sirve.

¿Alguno tiene un ejemplo del archivo core en formato texto?. No lo encuentro.

Muy agradecida ;))


@elvira, puedes descargarte esta aplicación del Banco Sabadell en :
https://www.bancsabadell.com/cs/Satellite?blobcol=urldata&blobheader=application%2Fzip&blobheadername1=Content-disposition&blobheadervalue1=attachment%3B+filename%3DInstalarGenesis19Sepa.zip&blobkey=id&blobtable=MungoBlobs&blobwhere=8000008580270&bsb=R0JTX011bHRpbWVkaWFfRkEtNjAwMDAwNTI2NzY3NS0xMTgzMDE1NjQwMzU1&ssbinary=true
Con ella podrás incluso transformar tus actuales normas 19/58 CSB a SEPA, eso sí, en formato texto que es transitorio hasta febrero de 2016
Soporta los dos formatos CORE y B2B
Fivewinner desde 1.9, programador PHP y Javascript, PWA & HTML5 evangelista
User avatar
Joaquim Ferrer
 
Posts: 105
Joined: Sat Jan 14, 2012 3:46 pm
Location: Barcelona

Re: Adeudos Directos SEPA en euros Esquema B2B

Postby elvira » Tue Oct 29, 2013 2:08 pm

Hola Joaquim,

¿Y sabes qué cambios hay que hacer?. Nosotros trabajamos con el Popular, de modo que la aplicación no servirá :roll:

Muy agradecida.
elvira
 
Posts: 516
Joined: Fri Jun 29, 2012 12:49 pm

Re: Adeudos Directos SEPA en euros Esquema B2B

Postby FiveWiDi » Tue Oct 29, 2013 3:01 pm

Manuel Aranda wrote:Hola Carlos, esa es una de las razones por las que he puesto dos versiones de cada modelo, una respetando el modelo original y la otra modificada precisamente para quitar el recuadro del logotipo y reorganizar un poco los campos. La mayoría de los modelos oficiales no son más que una guia para el usuario con toda la información que ha de contener el formulario. Yo por mi parte voy a usar la versión modificada, que para eso me la he currao.
De todas formas, si lo que quieres es usar el modelo original sin el recuadro del logotipo, sólo tienes que editar el PDF con Acrobat Reader Profesional o cualquier otro editor de PDF y con la herramienta "retocar objeto " lo eliminas y ya está.


Hice una única prueba deprisa y corriendo y no me di cuenta que tenía la posibilidad de escoger el modelo modificado.
No se puede correr.

Muchísimas gracias por tu trabajo
Un Saludo
Carlos G.

FiveWin 24.02 + Harbour 3.2.0dev (r2403071241), BCC 7.7 Windows 10
FiveWiDi
 
Posts: 1190
Joined: Mon Oct 10, 2005 2:38 pm

PreviousNext

Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 44 guests