Perguntas Alterar nome do Danfe

Pessoal, bom dia.

Como alterar o nome do arquivo .pdf gerado quando mandamos imprimir o danfe em pdf ?

Editei o DANFEII desta forma, o nome é alterado porém dá error.log e a impressão sai em branco.

variable is not an object on FWMSPRINTER:CLOSESPOOL(FWMSPRINTER.PRW) 11/01/2017 18:11:10 line : 3799

Segue fonte.

//Aqui ajusto o nome do arquivo
Ajustado na Static Function ImpDet(oDanfe,oNfe,cCodAutSef,cModalidade,oNfeDPEC,cCodAutDPEC,cDtHrRecCab,dDtReceb,aNota,lImpSimp)


if alltrim(cImp) == 'IMP_SPOOL'
oDanfe:cFileName := "DANFE_"+strzero(val(oNfe:_NFE:_INFNFE:_IDE:_NNF:TEXT),6)+"_"+dtos(dDataBase)+"_"+substr(Time(),1,2)+substr(Time(),4,2)+substr(Time(),7,2)+".rel"
oDanfe:cFilePrint := oDanfe:cPathPrint+oDanfe:cFileName
oDanfe:print()
lPreview := .f.
else
oDanfe:cFileName := "DANFE_"+strzero(val(oNfe:_NFE:_INFNFE:_IDE:_NNF:TEXT),6)+"_"+dtos(dDataBase)+"_"+substr(Time(),1,2)+substr(Time(),4,2)+substr(Time(),7,2)+".rel"
oDanfe:cFilePrint := oDanfe:cPathPrint+oDanfe:cFileName
oDanfe:Preview()
endif