Getting NAT1108 error

Hi all

I’m getting error NAT1108 -REINPUT statement not preceded by INPUT statement, it always happens when validating an array. Can anyone please help

This is the example code:-

IF #INDICATOR = ‘1’
PERFORM BEPAAL-SUBROUTINE
IF #GEKOP-VERANTW(1) = 0
REINPUT *0850
MARK *L1.TIPE-SKULD
END-IF

What goes on in the subroutine BEPAAL? Any WRITE, INPUTs, PRINTs, DISPLAYs? Is the subroutine internal or external?

An 1108 usually means that Natural’s buffer, which right after the INPUT would hold the Map, no longer holds a Map, but something else (as noted WRITE, DISPLAY, PRINT).

steve

More discussions about NAT1108:

http://tech.forums.softwareag.com/viewtopic.php?t=23096
http://tech.forums.softwareag.com/viewtopic.php?t=7183