[RESOLVIDO] dibo/bodi538.p

Bom dia pessoal,
Estou tentando utilizar a BO (dibo/bodi538.p), mas está gerando um erro.
Peguei a documentação no link http://tdn.totvs.com/pages/releasev...AB84363DA969C8B7FCBFF08ECB76?pageId=191466248

Segue o Código:

Código:

DEF TEMP-TABLE ttItensUF
    FIELD it-codigo     LIKE ITEM.it-codigo
    FIELD uf-orig       AS CHAR FORMAT 'X(02)'
    FIELD uf-dest       AS CHAR FORMAT 'X(02)'
    FIELD aliq-icms     AS DEC FORMAT '>>>>9.99<<<'
    FIELD desc-item     LIKE ITEM.desc-item
    FIELD t-inf-compl   AS ROWID
    FIELD r-Rowid       AS ROWID.

DEF VAR h-bodi538       AS HANDLE   NO-UNDO.
DEF VAR p-it-codigo-ini LIKE ITEM.it-codigo NO-UNDO.
DEF VAR p-it-codigo-fim LIKE ITEM.it-codigo NO-UNDO.
DEF VAR p-uf-orig-ini   AS CHAR NO-UNDO.
DEF VAR p-uf-orig-fim   AS CHAR NO-UNDO.
DEF VAR p-uf-dest-ini   AS CHAR NO-UNDO.
DEF VAR p-uf-dest-fim   AS CHAR NO-UNDO.

RUN dibo/bodi538.p PERSISTENT SET h-bodi538.

ASSIGN
    p-it-codigo-ini = '508743'
    p-it-codigo-fim = '508743'
    p-uf-orig-ini   = 'SP'
    p-uf-orig-fim   = 'SP'
    p-uf-dest-ini   = 'MG'
    p-uf-dest-fim   = 'MG'.

RUN pi-CarregattItensUF(INPUT p-it-codigo-ini,
                        INPUT p-it-codigo-fim,
                        INPUT p-uf-orig-ini,
                        INPUT p-uf-orig-fim,
                        INPUT p-uf-dest-ini,
                        INPUT p-uf-dest-fim,
                        OUTPUT TABLE ttItensUF).

FOR EACH ttItensUF:
    DISP
        ttItensUF.it-codigo
        ttItensUF.uf-orig
        ttItensUF.uf-dest
        ttItensUF.aliq-icms
        ttItensUF.desc-item
    WITH 1 COL WIDTH 300.
END.

O erro que retorno é o:
---------------------------
Erro
---------------------------
** "pi-CarregattItensUF" nao foi encontrado. (293)
---------------------------
OK
---------------------------

Bom dia,
Achei o erro.

faltou o "IN h-bodi538"

Código:

RUN pi-CarregattItensUF IN h-bodi538 (INPUT p-it-codigo-ini,
                        INPUT p-it-codigo-fim,
                        INPUT p-uf-orig-ini,
                        INPUT p-uf-orig-fim,
                        INPUT p-uf-dest-ini,
                        INPUT p-uf-dest-fim,
                        OUTPUT TABLE ttItensUF).