# EXAMINE 2-dimensional error sintaxe

**URL:** <https://techcommunity.softwareag.com/t/examine-2-dimensional-error-sintaxe/201707>\
**Category:** Forum\
**Tags:** Adabas-Natural, Natural, NaturalONE, Adabas-Natural-Community-Edition\
**Created:** [November 14, 2018, 6:28pm UTC](https://techcommunity.softwareag.com/t/examine-2-dimensional-error-sintaxe/201707 "2018-11-14T18:28:40Z")\
**Posts on this page:** 4\
**Page:** 1

<div class="post-metadata">

**Author:** ![Jorge\_Canessa1](https://avatars.discourse-cdn.com/v4/letter/j/d78d45/32.png) [@Jorge\_Canessa1](https://techcommunity.softwareag.com/u/Jorge_Canessa1)\
**Post date:** [November 14, 2018, 6:28pm UTC](https://techcommunity.softwareag.com/t/examine-2-dimensional-error-sintaxe/201707/1 "2018-11-14T18:28:40Z")

</div>

Hi,

when I open for editing in Natural One a program that contains the following code:

[b]Local

1 SUP VIEW OF FICHA-SUP  
…  
2 C_GR-RUB-FI-FINA-SUPL  
2 GR-RUB-FI-FINA-SUPL  
3 GR-IDEN-RUB-FI-SUPL  
4 IT-CO-RUB-SUPL (N5,0/50)  
4 REDEFINE IT-CO-RUB-SUPL  
5 IT-CO-RUB-SUPL-A (A5/50)  
…  
EXAMINE SUP.IT-CO-RUB-SUPL-A (_) ‘99998’ GIVING INDEX IN #IND-TOT  
…  
END[/b]

The following error occurs “E\_280: index entry incorrectly …” in the line of EXAMINE , informing that it is a 2-dimensional array, but when I open the same program with 3270 emulator in the same library, the error does not occurs and program runs perfectly.

How can I resolve this without changing the program? Can someone help me?

---

<div class="post-metadata">

**Author:** ![Ralph\_Zbrog](https://sea1.discourse-cdn.com/techcommunity/user_avatar/techcommunity.softwareag.com/ralph_zbrog/32/78_2.png) [@Ralph\_Zbrog](https://techcommunity.softwareag.com/u/Ralph_Zbrog)\
**Post date:** [November 14, 2018, 9:47pm UTC](https://techcommunity.softwareag.com/t/examine-2-dimensional-error-sintaxe/201707/2 "2018-11-14T21:47:35Z")

</div>

It seems the emulated version has a bug.

C\*GR-RUB-FI-FINA-SUPL tells us that GR-RUB-FI-FINA-SUPL is a PE. That means that IT-CO-RUB-SUPL is an MU within a PE. IT-CO-RUB-SUPL is redefined as IT-CO-RUB-SUPL-A which then is also a 2-dimensional array.

Your EXAMINE should look more like

```auto
EXAMINE SUP.IT-CO-RUB-SUPL-A (*, *) '99998' GIVING INDEX IN #IND-PE #IND-MU
```

---

<div class="post-metadata">

**Author:** ![Jorge\_Canessa1](https://avatars.discourse-cdn.com/v4/letter/j/d78d45/32.png) [@Jorge\_Canessa1](https://techcommunity.softwareag.com/u/Jorge_Canessa1)\
**Post date:** [November 19, 2018, 10:54am UTC](https://techcommunity.softwareag.com/t/examine-2-dimensional-error-sintaxe/201707/3 "2018-11-19T10:54:33Z")

</div>

Hi Ralph,

Thank you. And I have tried this already, but Natural One continues to  
report that there is an error. I noticed that the program compiled and  
run correctly. I think it’s a Natural One bug.

Best regards.  
Jorge

---

<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, 3:41pm UTC](https://techcommunity.softwareag.com/t/examine-2-dimensional-error-sintaxe/201707/4 "2021-04-02T15:41:48Z")

</div>


