É possivel obter o num-pedido partindo da sub-div-ordem?

Boa tarde a todos

Preciso incluir em um relatório o número do pedido de compra (num-pedido). Em anexo segue o trecho do programa que faz a geração dos dados.
Não estou encontrando uma forma de obter esta informação. Talvez nem seja possível.

Obrigado

Código:

for each sub-div-ordem
   where sub-div-ordem.cod-est-exec >= tt-param.i-cod-est-exec-ini and
         sub-div-ordem.cod-est-exec <= tt-param.i-cod-est-exec-fim and
         sub-div-ordem.num-projeto  >= tt-param.i-num-projeto-ini  and
         sub-div-ordem.num-projeto  <= tt-param.i-num-projeto-fim  and
         sub-div-ordem.num-ordem    >= tt-param.i-num-ordem-ini    and
         sub-div-ordem.num-ordem    <= tt-param.i-num-ordem-fim    and
         sub-div-ordem.num-secao    >= tt-param.i-num-secao-ini    and
         sub-div-ordem.num-secao    <= tt-param.i-num-secao-fim
   no-lock:
       
   process events.

   find proj-inv      of sub-div-ordem no-lock no-error.
   find ordem-inv     of sub-div-ordem no-lock no-error.
   find secao-inv     of sub-div-ordem no-lock no-error.
   find especialidade of sub-div-ordem no-lock no-error.
   find sub-espec     of sub-div-ordem no-lock no-error.
   find orig-despesa  of sub-div-ordem no-lock no-error.
  
   if not avail secao-inv then next.      

   for each estim-mat                                                   
      where estim-mat.cod-est-exec  = sub-div-ordem.cod-est-exec  and
            estim-mat.num-ordem     = sub-div-ordem.num-ordem     and
            estim-mat.num-secao     = sub-div-ordem.num-secao     and   
            estim-mat.cod-origem    = sub-div-ordem.cod-origem    and   
            estim-mat.cod-espec     = sub-div-ordem.cod-espec     and   
            estim-mat.cod-sub-espec = sub-div-ordem.cod-sub-espec
      no-lock:
       
      process events.

      if estim-mat.it-codigo <> 'DD7777777' then next.
                                                                          
      find first item
         where item.it-codigo = estim-mat.it-codigo
         no-lock
         no-error.

      ...
      ...
      ...

      /*Aqui eu preciso do Número do pedido de compra (num-pedido) */
   end.
end.

Bom dia!

Não conheço o módulo, talvez fale besteira .... mas
olhando o TDN, https://centraldeatendimento.totvs.com/hc/pt-br/articles/360037532593-Cross-Segmentos-Linha-Datasul-MIN-Passos-básicos-para-trabalhar-com-o-módulo-de-Investimentos
Vi que o módulo faz uso das requisições (CD1406). Na tabela it-requisicao, tem um campo que referencia a ordem de investimento (it-requisicao.num-ord-inv)

Talvez o caminho seja por aí ....

Muito obrigado por responder. Vou verificar estas tabelas.

Obrigado Rafael.