| IBM MAINFRAME HELP & SUPPORT FORUMS Technical Forums for IBM Mainframe Applications like COBOL, JCL, CICS, DB2, FileAid, DFSORT, Endevor, Xpediter, CoolGen, CA-7&11, AbendAid, IMS, IDMS, PL/I, MqSeries, SyncSort, Assembler, ChangeMan, Easytrieve, InterTest, REXX, CLIST etc...
|
| View previous topic :: View next topic |
| Author |
Message |
veera
Joined: 24 Nov 2004
Posts: 21
Location: chennai
|
| Posted: Sun Nov 28, 2004 6:36 pm Post subject: which one advanage 01 level or77 for declare elementary data |
|
|
HELLO,
ANY ONE PLSE TELL ME
1. WHICH ONE IS ADVANTAGE FOR DECLARATION OF ELEMENTARYDATA ITEMS.
2. WHY U R DECLARE VAR CHAR IN 49 LEVEL ONLY. |
|
| Back to top |
|
jz1b0c
Joined: 25 Jan 2004
Posts: 180
Location: Toronto, Canada
|
| Posted: Mon Nov 29, 2004 3:11 am Post subject: |
|
|
Veera,
reg level 77 & 01.
This has no diff in MVS COBOL, VS COBOL II.
Inearlier versions of cobol.
if you declare an elimentary data item at level 01
01 ws-rec pic x(01).
01 ws-rec2 pic x(02).
in memory
xyyyyyyyyyyyyyyyyyyyyy (here y is blank nothing is stored in that).
xyyyyyyyyyyyyyyyyyyyyy
where as if its at level 77
77 ws-rec pic x(01)
77 ws-rec 2 pic x(01)
in memory
XX
you can observe that memory is being saved.
however there is no diff in MVS Cobol or VS Cobol II |
|
| Back to top |
|
jz1b0c
Joined: 25 Jan 2004
Posts: 180
Location: Toronto, Canada
|
| Posted: Mon Nov 29, 2004 3:12 am Post subject: Re: which one advanage 01 level or77 for declare elementary |
|
|
veera wrote: HELLO,
2. WHY U R DECLARE VAR CHAR IN 49 LEVEL ONLY.
I have ansered this earlier check db2 forum for this.
good day. |
|
| Back to top |
|
veera
Joined: 24 Nov 2004
Posts: 21
Location: chennai
|
| Posted: Wed Dec 01, 2004 12:05 pm Post subject: Re: which one advanage 01 level or77 for declare elementary |
|
|
[quote="jz1b0c"][quote="veera"]HELLO,
2. WHY U R DECLARE VAR CHAR IN 49 LEVEL ONLY.[/quote]
I have ansered this earlier check db2 forum for this.
good day.[/quote]
hello,
i am not cleared WHY U R DECLARE VAR CHAR IN 49 LEVEL ONLY |
|
| Back to top |
|
| |
THIS IS AN ARCIVE FORUM IN READ ONLY MODE. IF YOU WANT TO ASK YOUR DOUBTS USE THE ACTUAL FORUM
|