View previous topic :: View next topic |
Author |
Message |
lal Beginner
Joined: 21 Oct 2003 Posts: 70 Topics: 25
|
Posted: Thu Dec 18, 2003 8:23 am Post subject: ADDRESS OF |
|
|
Hi Friends,
Could somebody let me know what does it mean?
SET ADDRESS OF MULTIX-FILE-A TO
ADDRESS OF MULAC-POLICY-CONTROL-A
(REF-LENGTH:1).
Thanx in advance.. |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12375 Topics: 75 Location: San Jose
|
Posted: Thu Dec 18, 2003 9:37 am Post subject: |
|
|
Lal,
ADDRESS OF is a special register (provided as an IBM extension) with the implicit definition of PIC 9(9) COMP and it contains the address of records in the LINKAGE SECTION.
One ADDRESS OF special register is provided for each record in the LINKAGE SECTION.
ex:
Code: |
LINKAGE SECTION.
01 EMPLOYEE-MASTER-REC PIC X(80).
01 PAYROLL-MASTER-REC PIC X(200).
|
ADDRESS OF EMPLOYEE-MASTER-REC would refer to the address of the first item in the LINKAGE SECTION
ADDRESS OF PAYROLL-MASTER-REC would refer to the address of the second item in the LINKAGE SECTION
In CICS ADDRESS is used to Obtain access to CICS storage areas.
Code: |
ADDRESS ACEE(ptr-ref) COMMAREA(ptr-ref) CWA(ptr-ref) EIB(ptr-ref)
TCTUA(ptr-ref) TWA(ptr-ref)
|
ADDRESS accesses the following areas:
- The access control environment element (ACEE)
- The communication area available to the invoked program (COMMAREA)
- The common work area (CWA)
- The EXEC interface block (EIB)
- The terminal control table user area (TCTUA)
- The transaction work area (TWA)
In OS/VS COBOL only, if an ADDRESS command is included in a COBOL program that is to be compiled using the optimization feature, it must be followed by SERVICE RELOAD statements to reload the BLL cell being used.
Hope this helps...
cheers
kolusu _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
|
Dibakar Advanced
Joined: 02 Dec 2002 Posts: 700 Topics: 63 Location: USA
|
|
Back to top |
|
|
Jamylady Beginner
Joined: 04 Nov 2004 Posts: 68 Topics: 22
|
Posted: Tue Oct 31, 2006 1:19 pm Post subject: |
|
|
Hi, Could anyone please explain what is the use of TCTUA?
Thanks
JA |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12375 Topics: 75 Location: San Jose
|
|
Back to top |
|
|
|
|