[RESOLVIDO] i-epc201.i

Senhores, boa tarde,
Estou com um problema nessa EPC, nesse codigo (FA4000r1) esta fazendo uma chamada a INCLUDE/ LER_APONT_CAN mas, nao está funfando corretamente. Nem mensagem está aparecendo. Incrivel!

FA4000r1.p

Código:

for each tt-epc where tt-epc.cod-event = "ler_apont_can":
            delete tt-epc. 
         end.
         create tt-epc.
         assign tt-epc.cod-event = "ler_apont_can"
                tt-epc.val-parameter = string(funcionario.cdn_empresa,"999") + string(funcionario.cdn_estab,"99999") + 
                                       string(funcionario.cdn_funcionario,"99999999").                                            
         MESSAGE "antes da include"
             VIEW-AS ALERT-BOX INFO BUTTONS OK.

         {include/i-epc201.i "ler_apont_can"}

         /********************************************************/
             MESSAGE "depois da include cod_tip_mdo"
             VIEW-AS ALERT-BOX INFO BUTTONS OK.

_____________________________________________________________
FA400ep.p

Código:

if p-ind-event = "ler_apont_can" then do:
    MESSAGE "dentro ler_apont_can" 
        VIEW-AS ALERT-BOX INFO BUTTONS OK. 

Quem poder dar um Help!
Att. Rafael