All Tandem programmer's should know this, in the first three months:

Take a given file, for example a file called ACCOUNT. This is the way it should be named:

- SELECT ACCOUNT ASSIGN TO $DATA.FILE.ACCOUNT
- FD ACCOUNT

- 01 ACCOUNT-RECORD.

  COPY ACCOUNT-RECORD IN COBOLLIB.
- OPEN ACCOUNT.

 

- The enable program should be:
   ACCOUNT-PROGRAM.
What do they call things?
SELECT ACCOUNT-FILE ASSIGN TO $DATA.FILE.ACCTFIL.

FD ACCOUNT-FILE.

01 AC-RECORD.
COPY ACCOBRL IN COBOLLIB.
- OPEN ACCOUNT-FILE.

 

- The enable program is called:
   REACTN-PROGRAM.
And it gets worse from there.
These things are just stupid code.
I asked myself, why didn't anyone take a moment and fix this?
Why did they leave this 3 month beginner programming code this way?
Then ask youself this...why does it take 3 days to make a 1 line change in their code.
If I were crass, I'd say, because they bill by the hour.