I've always found it helpful to open the file/record in 'regular' mode first to find out if the directory entry worked or possibly to write a null record if it didn't.
I like to have a graph display, and this way I can tell how many 'records' (or AMCs in this case) I'm going to be processing so I can display the forecasted time of completion. READ TRANSFER.REC FROM TRF, 'AKSS.FCST' ELSE SS='Attention, this function was unable to retrieve the Forecast file ' SS:='from the net - Now Aborting Function!;b;e;a;c;h' CALL SCREEN.MSG(SS) GOTO Programmed_Abort END OPENSEQ "TRANSFER", "AKSS.FCST" READONLY TO TRF.SEQ ELSE SS='This function was unable to access a record that was just written to ' SS='the TRANSFER directory. As a result, it cannot continue ' SS='- now aborting!;b;c;h' CALL SCREEN.MSG(SS) GOTO Programmed_Abort END NBR.OF.ATTRS=DCOUNT(TRANSFER.REC,@AM) -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of Jeff Powell Sent: Wednesday, January 04, 2006 06:31 To: u2 users group Subject: [U2] openseq question Happy New Year. I am having trouble with the openseq function in UniData. We are operation in Pick mode. Openseq can't find the specified file at path,filename. Is there an assumed prefix? Here is the code frag that is failing. MTR.FILE.PATH='/tmp' OPENSEQ MTR.FILE.PATH, MTR.REC TO F.MTR.ROW.FILE ELSE EXECUTE '!touch ':MTR.FILE.PATH:"/":MTR.REC OPENSEQ MTR.FILE.PATH, MTR.REC TO F.MTR.ROW.FILE ELSE CALL SB.DISP(3,"TROUBLE OPENING ":MTR.FILE.PATH:"/":MTR.REC:" [E":STATUS():"]") GO PGM.EXIT END END Thanks, Jeff ------- 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/
