---
title: "COBOL ADDRESS OF Register: How to Use in Linkage Section"
description: "ADDRESS OF -The ADDRESS OF special register references the address of a data item in the linkage section, the local-storage section, or the working-storage section. For 01 and 77 level items in the li..."
url: https://srinimf.com/2016/06/03/cobol-address-of-register-usage-in-likage-section-sendreceive-variables/
date: 2016-06-03
modified: 2026-10-10
author: "Srini"
image: https://i0.wp.com/srinimf.com/wp-content/uploads/2016/06/pexels-photo-245208.jpeg?fit=1800%2C1300&ssl=1
categories: ["COBOL"]
tags: ["COBOL ADDRESS OF Register Best Example"]
type: post
lang: en
---

# COBOL ADDRESS OF Register: How to Use in Linkage Section

ADDRESS OF -The ADDRESS OF special register references the address of a data item in the linkage section, the local-storage section, or the working-storage section.

For 01 and 77 level items in the linkage section, the ADDRESS OF special register can be used as either a sending item or a receiving item.

Related[COBOL Tough Questions (3 of 3)](https://srinimf.com/2012/01/17/cobol-tough-questions-3-of-3/)

For all other operands, the ADDRESS OF special register can be used only as a sending item. The ADDRESS OF special register is implicitly defined as USAGE POINTER. A function-identifier is not allowed as the operand of the ADDRESS OF special register.

WORKING-STORAGE SECTION.
01 FILLER.
05 WS-PTR USAGE IS POINTER.
05 WS-ADDR-X REDEFINES WS-PTR.
10 WS-ADDR PIC S9(8) COMP.

05 WS-SAVE-POINTER USAGE IS POINTER.
05 WS-SAVE-FULLWORD PIC S9(8) COMP.
05 WS-SAVE-CHAR-4 PIC X(4).

01 WS-DATA-AREA-1 PIC X(100).
01 WS-DATA-AREA-2 PIC X(200).

LINKAGE SECTION.
01 LINK-CALL-AREA.
05 LINK-DATA-ADDR PIC S9(8) COMP.

01 LINK-DATA-AREA PIC X(100).

PROCEDURE DIVISION USING LINK-CALL-AREA
LINK-DATA-AREA.

MOVE LINK-DATA-ADDR TO WS-ADDR.
SET ADDRESS OF LINK-DATA-AREA TO WS-PTR.

SET WS-PTR TO ADDRESS OF WS-DATA-AREA-1.
SET ADDRESS OF LINK-DATA-AREA TO WS-PTR.

SET WS-SAVE-POINTER TO WS-PTR.
MOVE WS-ADDR TO WS-SAVE-FULLWORD.
MOVE WS-ADDR-X TO WS-SAVE-CHAR-4.

SET ADDRESS OF LINK-DATA-AREA
TO ADDRESS OF WS-DATA-AREA-2.

*********** THIS WILL NOT COMPILE
*** MOVE ADDRESS OF WS-DATA-AREA-2 TO WS-ADDR.

---

SET ADDRESS OF LINK-DATA-AREA TO WS-PTR.

### Share this:

-
- [Tweet](https://twitter.com/share)
- [![](https://i0.wp.com/assets.pinterest.com/images/pidgets/pinit_fg_en_rect_gray_20.png)](https://www.pinterest.com/pin/create/link/?url=https%3A%2F%2Fsrinimf.com%2F2016%2F06%2F03%2Fcobol-address-of-register-usage-in-likage-section-sendreceive-variables%2F&media=https%3A%2F%2Fi0.wp.com%2Fsrinimf.com%2Fwp-content%2Fuploads%2F2016%2F06%2Fpexels-photo-245208.jpeg%3Ffit%3D1200%252C867%26ssl%3D1&description=COBOL%20ADDRESS%20OF%20Register%3A%20How%20to%20Use%20in%20Linkage%20Section)
-
- [Share on Tumblr](https://www.tumblr.com/share)
- [Share on WhatsApp (Opens in new window) WhatsApp](https://srinimf.com/2016/06/03/cobol-address-of-register-usage-in-likage-section-sendreceive-variables/?share=jetpack-whatsapp)
- [More](#)
-

- [Print (Opens in new window) Print](https://srinimf.com/2016/06/03/cobol-address-of-register-usage-in-likage-section-sendreceive-variables/?share=print)
- [Share on Reddit (Opens in new window) Reddit](https://srinimf.com/2016/06/03/cobol-address-of-register-usage-in-likage-section-sendreceive-variables/?share=reddit)
- [Share on Telegram (Opens in new window) Telegram](https://srinimf.com/2016/06/03/cobol-address-of-register-usage-in-likage-section-sendreceive-variables/?share=telegram)
- [Email a link to a friend (Opens in new window) Email](mailto:?subject=%5BShared%20Post%5D%20COBOL%20ADDRESS%20OF%20Register%3A%20How%20to%20Use%20in%20Linkage%20Section&body=https%3A%2F%2Fsrinimf.com%2F2016%2F06%2F03%2Fcobol-address-of-register-usage-in-likage-section-sendreceive-variables%2F&share=email)
-

### Like this:

Like Loading…
