Oi Pita, veja por favor se o exemplo em anexo responde a sua dúvida
http://community.microfocus.com/microfocus/cobol/visual_cobol/f/18/t/13125.aspx
Observação: Usa exatamente a mesma solução do Altair.
Hi Pita, please, look into the following sample to see if answers your questions.
http://community.microfocus.com/microfocus/cobol/visual_cobol/f/18/t/13125.aspx
Obs: It is using the same solution that Altair posted.