RE: [U2] Need help - UV intermittent roving file open error
Really? It's redimensioning in common here on UV10, aix, PICK flavour, no question about it. Exactly for the purpose of a file open subroutine used in hundreds of programs with hundreds of users... No complaints. I have even just written a test program which redims a vector in common and works. Although it seems logical not to be able to change a dimension in common, if common variables are just pointers to a memory slot then extending an array probably just means pointing to some non-sequential memory for the new dimensions (just a guess). Maybe there is some other flavour/uvconfig flag which affects this? Stuart __ Dimensioned arrays can be resized - BUT arrays defined in common can't. ** This email message and any files transmitted with it are confidential and intended solely for the use of addressed recipient(s). If you have received this email in error please notify the Spotless IS Support Centre (+61 3 9269 7555) immediately, who will advise further action. This footnote also confirms that this email message has been scanned for the presence of computer related viruses. ** --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] Need help - UV intermittent roving file open error
In infomation flavour (and probably in ideal flavour) you can resize dimensioned arrays. -- mats Womack, Adrian wrote: Dimensioned arrays can be resized - BUT arrays defined in common can't. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED] Sent: Friday, 25 August 2006 9:28 AM To: u2-users@listserver.u2ug.org Subject: RE: [U2] Need help - UV intermittent roving file open error Do you check/change accounts when you open files? Changing accts will probably cause issues. Check FILEINFO(). Also, dimensioned arrays can be dynamically resized b might also be helpful? DISCLAIMER: Disclaimer. This e-mail is private and confidential. If you are not the intended recipient, please advise us by return e-mail immediately, and delete the e-mail and any attachments without using or disclosing the contents in any way. The views expressed in this e-mail are those of the author, and do not represent those of this company unless this is clearly indicated. You should scan this e-mail and any attachments for viruses. This company accepts no liability for any direct or indirect damage or loss resulting from the use of any attachments to this e-mail. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Need help - UV intermittent roving file open error
I don't believe it - you're right! I could have sworn that using a DIM on a previously defined common array would do nothing, well I stand corrected. Maybe I'm remembering what happened under PI/Open, but it certainly does work under Universe. Sorry for the misinformation. :( -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED] Sent: Friday, 25 August 2006 2:29 PM To: u2-users@listserver.u2ug.org Subject: RE: [U2] Need help - UV intermittent roving file open error Really? It's redimensioning in common here on UV10, aix, PICK flavour, no question about it. Exactly for the purpose of a file open subroutine used in hundreds of programs with hundreds of users... No complaints. I have even just written a test program which redims a vector in common and works. Although it seems logical not to be able to change a dimension in common, if common variables are just pointers to a memory slot then extending an array probably just means pointing to some non-sequential memory for the new dimensions (just a guess). Maybe there is some other flavour/uvconfig flag which affects this? Stuart __ Dimensioned arrays can be resized - BUT arrays defined in common can't. DISCLAIMER: Disclaimer. This e-mail is private and confidential. If you are not the intended recipient, please advise us by return e-mail immediately, and delete the e-mail and any attachments without using or disclosing the contents in any way. The views expressed in this e-mail are those of the author, and do not represent those of this company unless this is clearly indicated. You should scan this e-mail and any attachments for viruses. This company accepts no liability for any direct or indirect damage or loss resulting from the use of any attachments to this e-mail. --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Need help - UV intermittent roving file open error
Thanks for the suggestions. This problem happens after initial login without any logtos. I will take a look at MFILES. /Scott Ballinger Pareto Corporation Edmonds WA USA 206 713 6006 [demime 1.01d removed an attachment of type application/ms-tnef which had a name of winmail.dat] --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Need help - UV intermittent roving file open error
Watch T30FILES as well (just in case) as you are going there... Regards JayJay -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Scott Ballinger Sent: 25 August 2006 18:04 To: u2-users@listserver.u2ug.org Subject: RE: [U2] Need help - UV intermittent roving file open error Thanks for the suggestions. This problem happens after initial login without any logtos. I will take a look at MFILES. /Scott Ballinger Pareto Corporation Edmonds WA USA 206 713 6006 [demime 1.01d removed an attachment of type application/ms-tnef which had a name of winmail.dat] --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Need help - UV intermittent roving file open error
Do you check/change accounts when you open files? Changing accts will probably cause issues. Check FILEINFO(). Also, dimensioned arrays can be dynamically resized b might also be helpful? SUB OPEN.FILE.SUB(FNAME,FVAR,ERR) COMMON /OPEN.FILES/ FNAMELIST, FVARLIST(1), LAST.ACCT $OPTIONS -STATIC.DIM ;* redimension array on the fly IF UNASSIGNED(LAST.ACCT) THEN LAST.ACCT = bb ;* check account b otherwise can screw up filepointers IF @WHO # LAST.ACCT THEN MAT FVARLIST = bb FNAMELIST = bb LAST.ACCT = @WHO END FIND FNAME IN FNAMELIST SETTING A THEN IF FILEINFO(FVAR(A),0) THEN ;* valid file handle b END ELSE FNAMELIST = DELETE(FNAMELIST,A) GOSUB OPEN.FILE: END END ELSE GOSUB OPEN.FILE: END ... RETURN OPEN.FILE: NEXT.POS = DCOUNT(FNAMELIST,@AM) + 1 DIM FVARLIST(NEXT.POS) ;* redimension array on the fly OPEN b b RETURN Stuart Boydell From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Scott Ballinger [EMAIL PROTECTED] Sent: Friday, 25 August 2006 10:08 To: u2-users@listserver.u2ug.org Subject: [U2] Need help - UV intermittent roving file open error I have a little file open subroutine that I use in a lot of places to keep open files in common: Recently (within the last two weeks) I have started getting the following error: [SNIP] Program SB1: Line 6, Read operation failure. [EBADF] Bad file number Any suggestions will be greatly appreciated- perhaps the OPEN.FILE.SUB needs to be more robust? I suppose I could do a test read like READ XXX FROM FILEVAR,TEST ON ERROR after opening the file in the OPEN.FILE.SUB, but that doesn't really solve the problem and seems like a lot of overhead. OPEN.FILE.SUB is embedded in a lot of places and I really don't want to have to replace it with discrete file opens everywhere! ** This email message and any files transmitted with it are confidential and intended solely for the use of addressed recipient(s). If you have received this email in error please notify the Spotless IS Support Centre (+61 3 9269 7555) immediately, who will advise further action. This footnote also confirms that this email message has been scanned for the presence of computer related viruses. ** --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] Need help - UV intermittent roving file open error
Do you think it is possible that the number of files opened to FILEVARS() is exceeding MFILES? On Aug 24, 2006, at 5:07 PM, Scott Ballinger wrote: Any suggestions will be greatly appreciated- perhaps the OPEN.FILE.SUB --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/