Buenas Tardes
Estoy utilizando la clase TWORD para rellenar un documento word, pero tengo un pequeño problema, este documento tiene dos paginas, pues las variables q me tiene que rellenar en la segunda pagina no las rellena, sin embargo si cojo esas variables y las pongo en la primera pagina del documento word si me las rellena,me puede decir alguien por qué sucede esto? os pongo el codigo de la funcion q me rellena el documento word:
static function Impr_Certificado(ctbfcer,ctbfpac)
local oWord
local fichero:=""
local menfermedad:=""
local mobserv:=""
local cmedida:=""
menfermedad:=alltrim((ctbfcer)->enferm)
mobserv:=alltrim((ctbfcer)->observ)
cmedida:=alltrim((ctbfcer)->talla)
if valtype(oWord) = 'O'
oWord:End()
end if
oWord := TWord():New()
do case
case (ctbfcer)->tipocer ="Seguridad Privada"
fichero:=cdi:vdir_apli + "\docs\seguridadprivada.doc"
case (ctbfcer)->tipocer ="Conductores"
fichero:=cdi:vdir_apli + "\docs\conductores.doc"
case (ctbfcer)->tipocer = "Cazadores"
fichero:=cdi:vdir_apli + "\docs\cazadores.doc"
case (ctbfcer)->tipocer = "Animales Peligrosos"
fichero:=cdi:vdir_apli + "\docs\cazadores.doc"
end case
oWord:OpenDoc(fichero)
oWord:Visualizar()
oword:replace("<NOMBRE>" ,alltrim((ctbfcer)->nompac))
oword:replace("<APELLIDOS>" ,alltrim((ctbfcer)->apepac))
oword:replace("<DNI>" ,alltrim((ctbfcer)->dnipac))
oword:replace("<FNAC>" ,dtoc((ctbfcer)->fnacpac))
oword:replace("<OBTENCION>" ,alltrim((ctbfcer)->aptitud))
oword:replace("<GRUPO>" ,alltrim((ctbfcer)->clasecer))
oword:replace("<DICTAMEN>" ,alltrim((ctbfcer)->dictamedi))
oword:replace("<DICTAMEN>" ,alltrim((ctbfcer)->dictapsic))
oword:replace("<RDO>" ,alltrim((ctbfcer)->resultado))
oword:replace("<OBTENER>" ,alltrim((ctbfcer)->obtreno))
oword:replace("<CLASE>" ,alltrim((ctbfcer)->ordinextr))
oword:replace("<DIA>" ,day((ctbfcer)->fecha))
oword:replace("<MES>" ,DimeMes((ctbfcer)->fecha))
oword:replace("<AÑO>" ,str(year((ctbfcer)->fecha),4))
oword:replace("<MEDIDA>" ,cmedida)
oword:replace("<ENFERMEDAD>" ,menfermedad)
oword:replace("<OBSERV>" ,mobserv)
if (ctbfpac)->_=1
oword:replace("<_>" ,"M")
else
oword:replace("<_>" ,"V")
end if
oword:replace("<ECPAC>" ,alltrim((ctbfpac)->ecpac))
oword:replace("<EDAD>" ,alltrim((ctbfpac)->edadpac))
oword:replace("<LNACPAC>" ,alltrim((ctbfpac)->lnacpac))
oword:replace("<PRONACPAC>" ,alltrim((ctbfpac)->pronacpac))
oword:replace("<POBPAC>" ,alltrim((ctbfpac)->pobpac))
oword:replace("<PROPAC>" ,alltrim((ctbfpac)->propac))
oword:replace("<DIRPAC>" ,alltrim((ctbfpac)->dirpac))
oword:replace("<CPPAC>" ,alltrim((ctbfpac)->cppac))
oword:replace("<PROFPAC>" ,alltrim((ctbfpac)->profpac))
return
las variables q no me rellena son cmedida,menfermedad,mobserv
gracias y un saludo
PROBLEMAS CON TWORD
- Ramon Paredes
- Posts: 215
- Joined: Fri Feb 02, 2007 3:38 pm
- Location: Managua, Nicaragua
Re: PROBLEMAS CON TWORD
Hola,
Debes usar el metodo endpage y new de la clase para indicarle donde termina una pagina y donde comienza la otra
Saludes desde Managua Nicaragua,
Ramon Paredes
Debes usar el metodo endpage y new de la clase para indicarle donde termina una pagina y donde comienza la otra
Saludes desde Managua Nicaragua,
Ramon Paredes
... Desde la Tierra de lagos y Volcanes......
Re: PROBLEMAS CON TWORD
Buenos dias Ramon
He utilizado endpage y new y sigue sin hacermelo, he probado con endpage y startpage y tampoco
como puedo hacerlo?
gracias y un saludo
Carmen Gomez
He utilizado endpage y new y sigue sin hacermelo, he probado con endpage y startpage y tampoco
como puedo hacerlo?
gracias y un saludo
Carmen Gomez