fd arquivo-intermediario
value of file-id is ws77-arquivo-intermediario.
01 reg-arquivo-intermediario pic x(256).
fd arquivo-intermediario2
value of file-id is ws77-arquivo-intermediario2.
01 reg-arquivo-intermediario2 pic x(256).