# redefine field in LDA

**URL:** <https://techcommunity.softwareag.com/t/redefine-field-in-lda/76157>\
**Category:** Forum\
**Tags:** Adabas-Natural, Natural, Natural-on-Mainframes\
**Created:** [February 14, 2008, 9:51am UTC](https://techcommunity.softwareag.com/t/redefine-field-in-lda/76157 "2008-02-14T09:51:07Z")\
**Posts on this page:** 4\
**Page:** 1

<div class="post-metadata">

**Author:** ![Breeze](https://avatars.discourse-cdn.com/v4/letter/b/2bfe46/32.png) [@Breeze](https://techcommunity.softwareag.com/u/Breeze)\
**Post date:** [February 14, 2008, 9:51am UTC](https://techcommunity.softwareag.com/t/redefine-field-in-lda/76157/1 "2008-02-14T09:51:07Z")

</div>

How can we redefine in natural LDA.  
for Eg: i have one LDA samplda. in that i have name field. i wnat to redefine that field to fname mname and lname. please let me know

---

<div class="post-metadata">

**Author:** ![Steve\_Robinson](https://sea1.discourse-cdn.com/techcommunity/user_avatar/techcommunity.softwareag.com/steve_robinson/32/107_2.png) [@Steve\_Robinson](https://techcommunity.softwareag.com/u/Steve_Robinson)\
**Post date:** [February 14, 2008, 4:42pm UTC](https://techcommunity.softwareag.com/t/redefine-field-in-lda/76157/2 "2008-02-14T16:42:34Z")

</div>

Hi HKR;

I assume you are working with the data area editor on the mainframe. Here is an LDA:

Local LDA01 Library XSTRO DBID 11177 FNR 8  
Command \> +  
I T L Name F Length Miscellaneous  
All – -------------------------------- - ---------- -------------------------\>  
1 #A A 10  
2 #B I 36

Tab down so that the cursor is under the T just to the right of 1 #A.  
Type . R (the R will be in the L column)

You should now see:

Local LDA01 Library XSTRO DBID 11177 FNR 8  
Command \> +  
I T L Name F Length Miscellaneous  
All – -------------------------------- - ---------- -------------------------\>  
1 #A A 10  
R 1 #A /\* REDEF. BEGIN : #A  
2  
2  
2  
2  
2  
2  
2 #B I 36

Starting at the first line with a 2 (as shown below), enter the redefine fields

Local LDA01 Library XSTRO DBID 11177 FNR 8  
Command \> +  
I T L Name F Length Miscellaneous  
All – -------------------------------- - ---------- -------------------------\>  
1 #A A 10  
R 1 #A /\* REDEF. BEGIN : #A  
2 #a1 a 3  
2 #a2 a 7  
2  
2  
2  
2  
2 #B I 36

If you are not in the Data editor, but in the program editor, simple type something like:

DEFINE DATA LOCAL  
1 #FULL-NAME (A60)  
1 REDEFINE #FULL-NAME  
2 #FIRST (A20)  
2 #MIDDLE (A20)  
2 #LAST (A20)  
1 :::: ETC

All that said; this is not the way to learn Natural. Ask management for manuals or classes. You will not attain the proficiency needed to write or maintain Natural code without them.

steve

---

<div class="post-metadata">

**Author:** ![Breeze](https://avatars.discourse-cdn.com/v4/letter/b/2bfe46/32.png) [@Breeze](https://techcommunity.softwareag.com/u/Breeze)\
**Post date:** [February 14, 2008, 9:38pm UTC](https://techcommunity.softwareag.com/t/redefine-field-in-lda/76157/3 "2008-02-14T21:38:28Z")

</div>

> [@Steve Robinson](#):
>
> Hi HKR;
> 
> I assume you are working with the data area editor on the mainframe. Here is an LDA:
> 
> Local LDA01 Library XSTRO DBID 11177 FNR 8  
> Command \> +  
> I T L Name F Length Miscellaneous  
> All – -------------------------------- - ---------- -------------------------\>  
> 1 #A A 10  
> 2 #B I 36
> 
> Tab down so that the cursor is under the T just to the right of 1 #A.  
> Type . R (the R will be in the L column)
> 
> You should now see:
> 
> Local LDA01 Library XSTRO DBID 11177 FNR 8  
> Command \> +  
> I T L Name F Length Miscellaneous  
> All – -------------------------------- - ---------- -------------------------\>  
> 1 #A A 10  
> R 1 #A /\* REDEF. BEGIN : #A  
> 2  
> 2  
> 2  
> 2  
> 2  
> 2  
> 2 #B I 36
> 
> Starting at the first line with a 2 (as shown below), enter the redefine fields
> 
> Local LDA01 Library XSTRO DBID 11177 FNR 8  
> Command \> +  
> I T L Name F Length Miscellaneous  
> All – -------------------------------- - ---------- -------------------------\>  
> 1 #A A 10  
> R 1 #A /\* REDEF. BEGIN : #A  
> 2 #a1 a 3  
> 2 #a2 a 7  
> 2  
> 2  
> 2  
> 2  
> 2 #B I 36
> 
> If you are not in the Data editor, but in the program editor, simple type something like:
> 
> DEFINE DATA LOCAL  
> 1 #FULL-NAME (A60)  
> 1 REDEFINE #FULL-NAME  
> 2 #FIRST (A20)  
> 2 #MIDDLE (A20)  
> 2 #LAST (A20)  
> 1 :::: ETC
> 
> All that said; this is not the way to learn Natural. Ask management for manuals or classes. You will not attain the proficiency needed to write or maintain Natural code without them.
> 
> steve

Thanks Steve…

---

<div class="post-metadata">

**Author:** ![system](https://global.discourse-cdn.com/techcommunity/original/3X/c/d/cd19967bb605d28a72d77eb83a1cae22f3df2eb8.svg) [@system](https://techcommunity.softwareag.com/u/system)\
**Post date:** [April 2, 2021, 2:49pm UTC](https://techcommunity.softwareag.com/t/redefine-field-in-lda/76157/4 "2021-04-02T14:49:08Z")

</div>