Boa noite Tenho uma UPC de nome mcd1720a.p que faz uma coisa que eu não entendo bem. Ela se auto-executa. Creio que isto visa deixar os métodos disponíveis em memória para execução posterior (Ex: Por um botão). Outra coisa é que não há no DESTROY nada para liberar memória. Algúem pode comentar? Sds if p-ind-event = "BEFORE-INITIALIZE" and p-ind-object = "CONTAINER" then do: run upc/mcd1720a.p persistent set wh-epcmcd1720a (input "", input "", input ?, input p-wgh-frame, input "", input ?). ... ... end.
Rapaiz... pelo seu código vai virar algo "recursivo". Se ela se auto-executa, é pq ela chama ela mesma.... Agora pergunto : "pq isso?"
Esta UPC foi comprada de uma das franquias da antiga Datasul. Tenho a impressão que o objetivo da "recursividade" é carregar os métodos em memória para uma execução (repetitiva) mais rápida. O que me preocupa é que não há liberação de recursos ao fim da execução.