tinycobol/tutorials/CBL2COB/intermed.sl

           select arquivo-intermediario assign to disk
                  organization    is line sequential
                  access mode     is sequential
                  file status     is ws77-file-status.

           select arquivo-intermediario2 assign to disk
                  organization    is line sequential
                  access mode     is sequential
                  file status     is ws77-file-status.