Chamada de Programa de pesquisa Datasul

Ao chamar um programa de pesquisa do EMS é exibido um erro.

A chamada foi feita da seguinte forma:

Código:

{include/zoomvar.i  &prog-zoom  = frzoom/z01fr007.r
                        &campo      = card.pl
                        &campozoom  = cod-epqto}

É exibido o erro: Procedure frzoom/zfr007.r has no entry point for pi-entry. (6456)

Vocês sabem de que forma devo fazer a chamada do programa?

Obrigado