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