Hi Craig, What we do here is to produce a como whenever a program is run from the menu system and then to check the como for common errors such as variable not assigned a value etc.
The menu system executes a como on before executing the program. When the program returns back to the menu system, it reads the como record from &COMO& and searches for error strings. If it finds any, it logs the error and disables that program so that it cant be run again. If the como is clean, then it is deleted. Perhaps you could use a similar system... cheers, asvin. Craig Bennett <[EMAIL PROTECTED] on 20 Jul 2004 03:16 Please respond to [EMAIL PROTECTED] Sent by: [EMAIL PROTECTED] To: [EMAIL PROTECTED] cc: bcc: Subject: Re: [U2] [UV] File corruption error, but ON ERROR branch not taken Hi All, we have a site which is experiencing file corruption problems (in one particular file). The clients are trying to find problems in their SAN etc, and have created the errlog item in the UV account so we are logging the "Internal Data Error" messages when the corruption occurs (UV 10.0.7, AIX 5.1, no details for the SAN). I believe that the client has not applied APAR IY35927 for AIX as previously suggested on the list, despite our hope that this may fix the problem. At some point they will upgrade to UV 10.1, but I don't know when). Leaving aside the problem underling the corruption, we wanted to try and catch this error and halt the sytem until the file has been fixed. We tried testing a copy of the corrupted file: We wrote this program: PROGRAM TESTCRPT OPEN "CRPT" TO CRPT ELSE STOP READ AREC FROM CRPT,"XXXXX" ON ERROR PRINT "ERROR ":STATUS() STOP END ELSE PRINT "ELSE" END END I was expecting the ON ERROR clause to be taken, but when we run the program we see: RUN PGMS TESTCRPT File '/data/TEST/CRPT': Computed blink of 0x74617C20 does not match expected blink of 0x0! Detected within group starting at address 0x172000! Program "TESTCRPT": Line 4, Internal data error. ELSE Can anyone tell me why the ON ERROR clause is not taken? Or suggest another way that we can programmaticaly tell that this error has occurred? thanks, Craig ------- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/ ****************************************************************** This message originated from the Internet. Its originator may or may not be who they claim to be and the information contained in the message and any attachments may or may not be accurate. ****************************************************************** ************************************************************ HSBC Bank plc Registered Office: 8 Canada Square, London E14 5HQ Registered in England - Number 14259 Authorised and Regulated by the Financial Services Authority Member of the HSBC Bank marketing group. We sell life assurance, pensions and collective investment schemes and advise only on our own range of these products. ************************************************************ _____________________________________________________ This transmission has been issued by a member of the HSBC Group "HSBC" for the information of the addressee only and should not be reproduced and / or distributed to any other person. Each page attached hereto must be read in conjunction with any disclaimer which forms part of it. Unless otherwise stated, this transmission is neither an offer nor the solicitation of an offer to sell or purchase any investment. Its contents are based on information obtained from sources believed to be reliable but HSBC makes no representation and accepts no responsibility or liability as to its completeness or accuracy. ------- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/