Tags

, , , , , ,

MAINFRAME – PS DATASET GETTING NUMBER AT END AUTOMATICALLY

Whenever we create a PS dataset and edit it to create new records, the last 8 bytes would be automatically occupied by the number sequence as shown below.

=COLS> -1—-+—-2—-+—-3—-+—-4—-+—-5—-+—-6—-+—-7—-+—-8

****** ***************************** Top of Data ******************************

=PROF> ….INPUT (FIXED – 80)….RECOVERY OFF WARN….NUMBER ON STD…………

=PROF> ….CAPS OFF….HEX OFF….NULLS ON STD….TABS OFF…………………

=PROF> ….AUTOSAVE ON….AUTONUM OFF….AUTOLIST OFF….STATS OFF………….

=PROF> ….PROFILE UNLOCK….IMACRO NONE….PACK OFF….NOTE ON…………….

=PROF> ….HILITE DEFAULT PAREN CURSOR FIND………………………………

000100 00000100

000200 00000200

****** **************************** Bottom of Data ****************************

This happens as the NUMBER option in PROFILE is ON.

To stop getting these numbers automatically, have the NUMBER option in OFF mode by providing the command NUM OFF. Now when you insert a new record, you will not see this number.

=COLS> -1—-+—-2—-+—-3—-+—-4—-+—-5—-+—-6—-+—-7—-+—-8

****** ***************************** Top of Data ******************************

=PROF> ….INPUT (FIXED – 80)….RECOVERY OFF WARN….NUMBER OFF……………

=PROF> ….CAPS OFF….HEX OFF….NULLS ON STD….TABS OFF…………………

=PROF> ….AUTOSAVE ON….AUTONUM OFF….AUTOLIST OFF….STATS OFF………….

=PROF> ….PROFILE UNLOCK….IMACRO NONE….PACK OFF….NOTE ON…………….

=PROF> ….HILITE DEFAULT PAREN CURSOR FIND………………………………

000001 A 00000100

000002 B 00000200


000003 C

****** **************************** Bottom of Data ****************************

——————————————————————————————————–

In United States, If you would like to Earn Free Stocks, Credit card Points and Bank account Bonuses, Please visit My Finance Blog

——————————————————————————————————–

You may also like to look at:

Working on Mainframes – Is Change to a different technology necessary
Important SQL CODES and ABEND CODES
SORT JOIN – TO JOIN TWO FILES BASED ON A KEY
KNOW YOUR MAINFRAME
REXX – INITIAL SETUP
HOW TO SUBMIT A BATCH JOB FROM THE CICS PROGRAM
CICS – EXEC interface block – EIBRESP Values
CICS – EXEC interface block Fields
Flow of control between COBOL programs, run units, and CICS
CICS INTERVIEW QUESTIONS
CICS TIPS
COBOL – COPY and INCLUDE statements
COBOL – PERFORMANCE IMPROVEMENT
COBOL – SIGN STORED IN COMP, COMP-3 AND DISPLAY FORMATS
SHORTEST COBOL PROGRAM
RESTART LOGIC IN COBOL DB2 Program
GOBACK – EXIT PROGRAM – STOP RUN
Continuation lines in COBOL
Computational items – COMP, COMP 1 , COMP 2, COMP 3
COBOL program format
cobol indicator area column-7 and area a and area b
COBOL INTERVIEW QUESTIONS
COBOL TIPS
COBOL COMPILER OPTIONS
The IDENTIFICATION DIVISION
Advertisement