Skip to content

Instantly share code, notes, and snippets.

@pdemby

pdemby/select.cob

Last active August 29, 2015 14:02
Show Gist options
  • Save pdemby/28432c7577bbd4591c7e to your computer and use it in GitHub Desktop.
Save pdemby/28432c7577bbd4591c7e to your computer and use it in GitHub Desktop.
Download ZIP
Raw
select.cob
ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT EMPLOYEE-INPUT-FILE
ASSIGN TO DISC
ORGANIZATION IS LINE SEQUENTIAL
ACCESS MODE IS SEQUENTIAL.
SELECT EMPLOYEE-OUTPUT-FILE
ASSIGN TO DISC
ORGANIZATION IS LINE SEQUENTIAL.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment