Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Maximum value for Adabas parm NISNHQ exceeded. DB/FNR :1:/:2

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Java & MQSeries
View previous topic :: :: View next topic  
Author Message
silentarya

New User


Joined: 11 Mar 2007
Posts: 35
Location: Chennai

PostPosted: Fri Apr 10, 2009 7:56 pm    Post subject: Maximum value for Adabas parm NISNHQ exceeded. DB/FNR :1:/:2
Reply with quote

Hi,

I am running a program which is updating a field in an adabas file.
However, I am getting an S017 abend each and every time with Maximum value for Adabas parm NISNHQ exceeded. DB/FNR :1:/:2: as msg.

JCL :

//STEP020 EXEC NATPROC,NPARM='''ESIZE=120''',
// APPLID=MYRLIB,PROGRAM=TSTSIX
//CMPRINT DD SYSOUT=*

Program :

READ file1
IF TOTVHCST > 99999.99
ESCAPE TOP
ELSE
TOTVHCST := 105000.00
UPDATE
END TRANSACTION
WRITE 'UPDATED'
ESCAPE TOP
END-IF
END-READ

Pls suggest how to go about it.
Back to top
View user's profile Send private message

silentarya

New User


Joined: 11 Mar 2007
Posts: 35
Location: Chennai

PostPosted: Fri Apr 10, 2009 8:22 pm    Post subject: Reply to: Maximum value for Adabas parm NISNHQ exceeded. DB/
Reply with quote

Got the answer guyz ... Need to use get statement... Just afunny mistake in the code
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Java & MQSeries All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Release of Adabas Cursor mohitsethi All Other Mainframe Topics 1 Mon Feb 06, 2017 8:36 pm
This topic is locked: you cannot edit posts or make replies. Natural ADABAS Opening with CTS enikhilk Mainframe Jobs 0 Wed Nov 30, 2016 5:37 pm
No new posts Using 'parm' to vary SORTOUT record v... Sysaron DFSORT/ICETOOL 13 Wed Sep 07, 2016 9:24 pm
No new posts Casting a Binary Number to Numeric in... Bob Steinkraus Java & MQSeries 6 Tue Aug 09, 2016 5:58 pm
No new posts How Adabas works in Mainframe ranujn Java & MQSeries 5 Sat Jun 04, 2016 11:20 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us