Hi Krishna Prasad,
I think you would need ESCAPE BOTTOM (theres also ESCAPE TOP) statement; unfortunately (or rather fortunately), there
s no GOTO in NATURAL nowadays.
Perhaps, the following code might help you (just try it out to understand ESCAPE statement):
DEFINE DATA LOCAL
1 #I (I4)
1 #J (I4)
1 #K (I4)
END-DEFINE
LOOP-ONE-MAIN.
FOR #I = 1 TO 100
LOOP-SEC.
FOR #J=1 TO 50
LOOP-THIRD.
FOR #K = 1 TO 10
DISPLAY ‘=’ #K
IF #K = 5
ESCAPE BOTTOM (LOOP-ONE-MAIN.)
END-IF
END-FOR
END-FOR
END-FOR
WRITE ‘=’ #I ‘=’ #J ‘=’ #K
END
Best regards and good luck.