DAFT3020 - First Foreach of cria-tt-filha

 da-ext-ord-prod:
        FOR EACH da-ext-ord-prod USE-INDEX ch-plano NO-LOCK
           WHERE da-ext-ord-prod.cod-projeto   = da-projeto.cod-projeto
             AND (    da-ext-ord-prod.nr-ord-prod  < 1000000
                  OR (da-ext-ord-prod.nr-ord-prod >= param-cp.prim-ord-aut-cp AND
                      da-ext-ord-prod.nr-ord-prod <= param-cp.ult-ord-aut-cp) )
             AND da-ext-ord-prod.it-codigo     = da-plano-montagem.it-codigo
             AND da-ext-ord-prod.seq-etapa     = da-plano-montagem.seq-etapa
             AND da-ext-ord-prod.nr-pedcli     = da-plano-montagem.nr-pedcli
             AND da-ext-ord-prod.nr-sequencia  = da-plano-montagem.nr-sequencia: