View previous topic :: View next topic |
Author |
Message |
MFdigger Beginner
Joined: 09 Sep 2005 Posts: 124 Topics: 52 Location: Chicago
|
Posted: Mon Mar 16, 2009 4:27 pm Post subject: Labels ? |
|
|
Hi All,
We have the Cobol code in one of the program (COBOL -CICS - DB2) as below:
Code: |
XAB121 SET EZEPNTR TO ADDRESS OF AB050111
MOVE LENGTH OF AB050111 TO EZE-II
PERFORM EZE-TSWRITE.
|
we have lot of such statements in the code.
Could some one please clarify whether 'XAB121' is a LABEL and how is it used
Tx _________________ Tx
Digger |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12372 Topics: 75 Location: San Jose
|
Posted: Mon Mar 16, 2009 5:28 pm Post subject: |
|
|
MFdigger,
AFAIK it is just how comments are coded back in 80's . It has the same effect as
Code: |
----+----1----+----2----+----3----+----4----+----5--
* XAB121
SET EZEPNTR TO ADDRESS OF AB050111
MOVE LENGTH OF AB050111 TO EZE-II
PERFORM EZE-TSWRITE. |
|
|
Back to top |
|
|
Terry_Heinze Supermod
Joined: 31 May 2004 Posts: 391 Topics: 4 Location: Richfield, MN, USA
|
Posted: Mon Mar 16, 2009 10:35 pm Post subject: |
|
|
It depends on what column XAB121 is in and what else is on that line. _________________ ....Terry |
|
Back to top |
|
|
computer Beginner
Joined: 12 Jun 2007 Posts: 64 Topics: 17 Location: Hyderabad
|
Posted: Tue Mar 17, 2009 5:21 am Post subject: |
|
|
Hi MFdigger,
This is usually added to mark the changes done under this Change_release or Project. Usually this label is the Unique Project Code assigned for each project undertaken.
This is Just done for better maintainability and easy acces to the code changes under under a porjectm or release.
Thanks,
Manoj |
|
Back to top |
|
|
|
|