Perguntas Ponto de entrada FINA110 nao funciona na versao 12

Pessoal o ponto de entrada FINA110 na versao 12 esta comportando estranho
tenho um codigo la que na versao 11 funciona perfeito, gravando dados da se5 em outra tabela que se
chama za0, agora ele ta duplicando o titulo na tabela za0, fui debugar ele passa 2x no mesmo titulo
uma vem com o e5_seq em branco o banco em branco, agencia em branco, e a outra vem preenchido
se alguem puder me ajudar com isso agradeço muito
obrigado. em baixo vou deixar meu codigo.

User Function FINA110()

Local _aArea := GetArea()
Local _cRecibo:=_cReciboP

// nao executar se ponto de entrada estiver sendo chamado de programa do controle de leite
if alltrim(upper(funname()))$'MGLT031/MGLT034/MGLT035/MGLT036/MGLT037/MGLT038/MGLT039/AGLT046/MCTB017'
Return
Endif

dbselectarea("ZA0")
reclock("ZA0",.T.)

ZA0->ZA0_FILIAL:=xfilial("ZA0")
ZA0->ZA0_MSFIL :=SE1->E1_MSFIL
ZA0->ZA0_RECIBO:=_cRecibo
ZA0->ZA0_PREFIX:=SE1->E1_PREFIXO
ZA0->ZA0_NUM :=SE1->E1_NUM
ZA0->ZA0_PARCEL:=SE1->E1_PARCELA
ZA0->ZA0_TIPO :=SE1->E1_TIPO
ZA0->ZA0_DATA :=DBAIXA // variaveis "private" do fonte padrao
ZA0->ZA0_VALOR :=NVALREC // variaveis "private" do fonte padrao
ZA0->ZA0_MULTA :=NMULTA
ZA0->ZA0_JUROS :=NJUROS
ZA0->ZA0_DESC :=NDESCONT
//Incluido por Fabiano Dias da Silva no dia 01/08/13 para que fosse possivel detectar a baixa que originou a ZA0 de um titulo visto que um
//titulo pode ter varias baixas, para que no cancelamento de uma baixa o registro na ZA0 seja excluido impossibilitando desta forma a impressao
//de um recibo que tenha tido a sua baixa cancelada ou excluida.

ZA0->ZA0_SEQ := SE5->E5_SEQ
ZA0->ZA0_CARTEI := "E1"
ZA0->ZA0_BANCO := SE5->E5_BANCO
ZA0->ZA0_AGENCI := SE5->E5_AGENCIA
ZA0->ZA0_CONTA := SE5->E5_CONTA

ZA0->ZA0_CLIFOR := SE1->E1_CLIENTE
ZA0->ZA0_LOJA := SE1->E1_LOJA

msunlock()

dbselectarea("SE1")
reclock("SE1",.F.)
SE1->E1_C_RECIB:=_cRecibo
msunlock()

RestArea(_aArea)

return