Re: Record lock on primary input

John,
The *PSSR will only be called by the system when a program exception error occurs.
You can put any code in it that you want to execute when that happens.
If you are using the cycle, you can specify a return point within the cycle to continue processing at after the error, but I would not recommend it.
Normally, this routine will only be called when a severe unrecoverable error occurs.

The INFSR subroutine has the same purpose as the *PSSR, but is only called when a severe exception condition occurs for the file it is specified for.
You would put whatever code you needed to trap the error information and soft end the program rather than have the user see a CPF message.

 
Jeff Young
Sr. Programmer Analyst
IBM -e(logo) server Certified Systems Exper - iSeries Technical Solutions V5R2 
IBM  Certified Specialist- e(logo) server i5Series Technical Solutions Designer V5R3
IBM  Certified Specialist- e(logo)server i5Series Technical Solutions Implementer V5R3
  
 






________________________________
From: John Furniss <JFurniss@xxxxxxxxxxxxxxxxx>
To: RPG programming on the IBM i / System i <rpg400-l@xxxxxxxxxxxx>
Sent: Thursday, March 19, 2009 11:55:54 AM
Subject: Record lock on primary input

List,

            I researched this in the archives and found lots of
suggestions, but unfortunately I've never coded a *PSSR or used an
INFSR. Could someone just post a small snippet of code or tell me where
I need to put the INFSR? I couldn't get the *PSSR to get called. So any
help would be greatly appreciated.



Thanks much!



John Furniss

Applications Programmer

Allied Machine & Engineering, Corp

Phone: 330-343-4283, ext. 8371

email: jfurniss@xxxxxxxxxxxxxxxxx