Tabela
BJ0 Formas Pagamento x Expr Advpl
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
BJ0_FILIAL C 2 0 Filial S
BJ0_CODIGO C 3 0 Codigo @! S
BJ0_TIPO C 1 0 Tipo @! S
BJ0_ROTINA C 20 0 Expr. AdvPl @! Eval({|aRetorno| aRetorno:=PLSPARANA(M->BJ0_ROTINA),If(Empty(aRetorno[1]),.T.,.F.)}) S