FoxPro/Visual FoxPro - ayuda con el sig error

estimados señores acudo a ustedes para ver si alguien puede ayudarme con el siguien error :

El archivo 'createheadersource.prg' no existe

y en el depurador me señala la siguiente linea, alguien podria decirme a que se debe o que es lo que me hace falta

DO CreateHeaderSource WITH oDocument, DBF("ProductList"), ;
AddBs(SYS(2023)) +"carta.DOC"

gracias de antemano y Dios los Bendiga

saludos desde Tabasco

no, pero segun buscando en internet me econtre con los siguiente:

Word 2003 VBA Language Reference
CreateHeaderSource Método

Crea un documento de Microsoft Word que cuenta con un registro de cabecera que se utiliza en lugar de la fuente de datos en un registro de cabecera de la fusión del correo. Este método otorga la nueva cabecera de la fuente especificada documento, que se convierte en un documento principal si no lo es ya uno.

esto fue lo que econtre en esta pagina:

http://translate.google.com/translate?hl=es&sl=en&u=http://msdn2.microsoft.com/en-us/library/aa171926(office.11).aspx&sa=X&oi=translate&resnum=1&ct=result&prev=/search%3Fq%3DCreateHeaderSource%26hl%3Des

espero me puedas ayudar

ok, mira lo que estoy tratando d hacer es combinar correspondencia desde
vfoxpro, la verdad es la primera vez que lo hago, y me estoy apoyando de un libro que se llama "microsoft office automation with visual fox pro", pues ahi viene ejemplos pero no me sale me manda ese error, y la verdad no tengo idea, aqui te mando mi codigo que estoy utilizando, please si me puedes ayudar

#DEFINE CR CHR(13)
#DEFINE wdWord 2
#DEFINE wdCollapseEnd 0
#DEFINE CR CHR(13)
#DEFINE TAB CHR(9)
#DEFINE wdHeaderFooterPrimary 1
#DEFINE wdGray25 16
#DEFINE wdAlignParagraphCenter 1
#DEFINE wdCollapseEnd 0
#DEFINE wdParagraph 4
#DEFINE wdLineStyleDouble 7
#DEFINE wdUserTemplatesPath 2
#DEFINE wdGoToBookmark -1

LOCAL oWord, oDocument, oRange, oBorderRange, cTemplatePath
*LOCAL oWord,oDocument


oWord=CREATEOBJECT("Word.Application")
oWord.Documents.open("C:\Documents and Settings\Arkein\Escritorio\carta.doc")
oWord.Application.Visible=.T.

OPEN DATABASE ("C:\Documents and Settings\Arkein\Escritorio\RESPALDO INFO 161107\PAISA v1.0\paisa.dbc")
SELECT clientes.nombre;
from clientes;
into cursor prueba

DO CreateHeaderSource WITH oDocument, DBF("prueba"),;
ADDBS(SYS(2023))+"carta.doc"

USE IN prueba

WITH oDocument.styles["Normal"].Font
.Name = "Times New Roman"
.size = 12
ENDWITH

&&Agregar cabezera
WITH oDocument.Sections[1].Headers[wdHeaderFooterPrimary]
oRange=.Range()
WITH oRange
.text="Titulo"
.style=oDocument.Styles["Heading 1"]
.ParagraphFormat.Alignment = wdAlignParagraphCenter
.Shading.BackgroundPatternColorIndex = wdGray25
ENDWITH
ENDWITH

oRange = oDocument.Range(0,0)
WITH oRange
.Style = oDocument.Styles[ "Heading 2" ]
.ParagraphFormat.Alignment = wdAlignParagraphCenter
.InsertAfter( "Product Information" + CR + CR )
.Collapse( wdCollapseEnd )
.Style = oDocument.Styles[ "Heading 3" ]
.InsertAfter( "Categoria del Producto: " )
.Collapse( wdCollapseEnd )
oDocument.Bookmarks.Add( "Nombre", oRange )
.InsertAfter( CR )
.Expand( wdParagraph )
.Borders.OutsideLineStyle = wdLineStyleDouble
ENDWITH


saludos, DTB