OT: Combinación de correspondencia con word, varios registros (variables) por página

1,295 views
Skip to first unread message

Carlos Yohn (A.G.P.)

unread,
Sep 8, 2011, 4:20:00 AM9/8/11
to Comunidad de Visual Foxpro en Español
Hola,
Estoy realizando combinación de correspondencia con Word.
Suponed un ejemplo:
.- la base de datos de origen es una lista de proveedores con sus
facturas.
.- Campos: codigo proveedor, número de factura, importe
.- Unos proveedores tienen 3 facturas, otros 5, otros solo una,
etc. Es variable

¿Cómo puedo hacer un documento de combinación de correspondencia que
sepa que cuando cambia el proveedor es cuando tiene que cambiar de
hoja; que mientras tanto, (mientras sea el mismo proveedor) continúe
en la misma hoja?

Leyendo en algún sitio, lo que he hecho es añadir un campo a la base
de datos que indica cuál es el registro último de cada proveedor y he
utilizado un campo NEXTIF con esa condición, para que pase al
siguiente registro si ese campo tiene valor 0 (sigue siendo del
mismo). Pero tengo que prever un máximo de líneas (en mi caso concreto
no tengo problemas con esto; con 10 me sobran). Sin embargo, si sobran
líneas, me repite los datos del último registro.

Veo que en internet no hay mucho 'experto'

¿Alguien sabe algo de esto?
Gracias.
Saludos

Luis Maria Guayan

unread,
Sep 8, 2011, 8:10:46 AM9/8/11
to publice...@googlegroups.com
Hola Carlos, un placer tenerte por aquí aunque ya no eres el "dueño" jajaja

Ta paso una solución alternativa que puedes utilizar:

-- Expandiendo expresiones con TextMerge() --
http://www.portalfox.com/article.php?sid=2615

El código del artículo te genera archivos .HTM, el cual lo puedes abrir con Word. En el caso de necesitar que sean .DOC, los abres mediante automatización y lo guardas como tipo .DOC

Me dices de cualquier inquietud y si te ayuda esta técnica.

Saludos,

Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________

Guillermo MDQ

unread,
Sep 8, 2011, 9:29:32 AM9/8/11
to Comunidad de Visual Foxpro en Español
Perdonen mi ignorancia, pero no es mas sencillo hacerlo al reves ?
Hacer el listado desde un reporte de VFP , a una hoja por proveedor, y
agregarle los textos repetitivos escritos del word.
O hay alguna particularidad que se me escapa, porque todavia no
termine de despertarme. :)

Saludos
Guillermo



On 8 sep, 09:10, Luis Maria Guayan <luismar...@gmail.com> wrote:
> Hola Carlos, un placer tenerte por aquíaunque ya no eres el "dueño" jajaja
> Ta paso una solución alternativa que puedes utilizar:
> -- Expandiendo expresiones con TextMerge() --http://www.portalfox.com/article.php?sid=2615
> El código del artículo te genera archivos .HTM, el cual lo puedes abrir con Word. En el caso de necesitar que sean .DOC, los abres mediante automatización y lo guardas como tipo .DOC
> Me dices de cualquier inquietud y si te ayuda esta técnica.
> Saludos,
>
> Luis María Guayán
> Tucumán, Argentina
> _________________________http://www.PortalFox.com

Javier Barrera

unread,
Sep 12, 2011, 5:27:33 AM9/12/11
to Comunidad de Visual Foxpro en Español
Hola Luis María!

El artículo es fantástico. Hace tiempo tuve el mismo problema pero no
encontré ninguna solución.

Para convertir los archivos htm a word utilizo el siguiente código:

#DEFINE wdPrintView 3
loWord = CREATEOBJECT("word.application")

LOCAL loDoc
loDoc = loWord.Documents.Open([c:\vfp9\bodyhtml1.htm])
loDoc = loword.ActiveWindow.View.Type = wdPrintView
lodoc = loword.activedocument.SaveAs('c:\vfp9\bodyhtml1.doc',1)

loWord.Visible = .T.

Pero, por cada archivo htm que abre Word sale un mensaje con título
"convertir archivo" y una lista donde está seleccionado "documento
html" y hay que pulsar "Aceptar". Además el diseño de vista es "diseño
web" y desearía que el documento word quedara con "diseño impresión".

¿Hay alguna manera de automatizar abrir el fichero htm sin tener que
confirmar que el fichero es html y que la presentación sea de diseño
impresión??

Muchas gracias.

Javier Barrera - Zaragoza.

On 8 sep, 14:10, Luis Maria Guayan <luismar...@gmail.com> wrote:
> Hola Carlos, un placer tenerte por aquíaunque ya no eres el "dueño" jajaja
> Ta paso una solución alternativa que puedes utilizar:
> -- Expandiendo expresiones con TextMerge() --http://www.portalfox.com/article.php?sid=2615
> El código del artículo te genera archivos .HTM, el cual lo puedes abrir con Word. En el caso de necesitar que sean .DOC, los abres mediante automatización y lo guardas como tipo .DOC
> Me dices de cualquier inquietud y si te ayuda esta técnica.
> Saludos,
>
> Luis María Guayán
> Tucumán, Argentina
> _________________________http://www.PortalFox.com
Reply all
Reply to author
Forward
0 new messages