I'm reminded of this quote from Donald E. Knuth:
"Beware of bugs in the above code; I have only proved it correct, not tried
it."
It looks like you will have to open the directory where the sequential file
is being opened and test for the file's existence, e.g.
OPEN '.' TO dot ELSE STOP
OPENSEQ 'this_file_does_not_exist' TO seqfile ELSE NULL
READ rec FROM dot,'this_file_does_not_exist' THEN
CRT 'openseq_creates is set to true'
DELETE dot,'this_file_does_not_exist'
END ELSE
CRT 'openseq_creates is set to false'
END
Dan
On Tue, Aug 31, 2010 at 3:11 AM, Muralidhar <[email protected]>wrote:
> Hi,
>
> We have tried this one as you specified but its stil not working for
> our case.
> Please find the output below.
> 0008 DEBUG
> jBASE debugger->S
> 0010 OPENSEQ 'this_file_does_not_exist' TO seqfile THEN
> jBASE debugger->S
> 0013 CRT 'openseq_creates is set to false'
> jBASE debugger->S
> openseq_creates is set to false
> 0016 RETURN
> jBASE debugger->s
>
> Please find the details of jbase config
>
> #
> # Emulation for Sequoia Pick.
> #
> seqpick:
> sequoia:
> seq:
> @(-1) = clear_screen ; @(-2) = cursor_home ; @(-3) = clear_eos ;
> @(-4) = clear_eol
> @(-5) = blink_on ; @(-6) = blink_off
> @(-7) = prot_on ; @(-8) = prot_off ;
> @(-9) = cursor_left ; @(-10) = cursor_up ; @(-11) =
> cursor_right ; @(-12) = cursor_down
> @(-13) = reverse_on ; @(-14) = reverse_off
> @(-15) = underline_on ; @(-16) = underline_off
> @(-17) = bold_on ; @(-18) = dim_on
> @(-19) = printer_on ; @(-20) = printer_off
> @(-23) = delete_line ; @(-24) = insert_line ; @(-25) =
> scroll_forward
> @(-26) = delete_char ; @(-27) = insert_char
> @(-28) = insert_on ; @(-29) = insert_off
> list_keys = true
> reality_video = true
> time_is_hours = true
> header_with_s = true
> page_0_header = true
> generic_sequoia = true
> named_common = unassigned
> jql_mv_subcall = true
> pq_backslash = true
> openseq_creates = true
> returning_am_delimited = true
> alternative_oconv = true
> no_id_prompt = true
> system_19_timedate = true
> readv0 = dcount
> no_extra_delimiter = true
> treat_with_as_or_with = true
> dates_upper_case = yes
> locate_null_only_in_array = true
> matread_assigns_to_end=true
>
> Can you please let us know if any other set up we need to check.
>
> Thanks,
> Murali
>
> Daniel Klein wrote:
> > Google sent my email before I was finished :-(
> >
> > Another way would be to do something like this:
> >
> > OPENSEQ 'this_file_does_not_exist' TO seqfile THEN
> > CRT 'openseq_creates is set to true'
> > END ELSE
> > CRT 'openseq_creates is set to false'
> > END
> >
> > Dan
> >
> > On Mon, Aug 30, 2010 at 12:15 PM, Daniel Klein <[email protected]
> >wrote:
> >
> > > Why not simply open the $JBCRELEASEDIR/config directory and read in the
> > > Config_EMULATE record?
> > >
> > > Another way would be to do something like this:
> > >
> > > OPENSEQ
> > >
> > >
> > > On Mon, Aug 30, 2010 at 5:50 AM, Muralidhar <[email protected]
> >wrote:
> > >
> > >> Hi,
> > >>
> > >> I need to read the jbase config setting inside a jbase program for Eg
> > >> I want to read the value assigned to openseq_creates variable inside
> > >> Config_EMULATE file.Can any one please help.
> > >>
> > >> Please find the details below
> > >> JBASE RELEASE is 4.1 and system information is as below
> > >>
> > >> System : AIX maa2tambld4 3.5 0002EA6AD400
> > >> OS Release : 5.3.9.0
> > >> Environment
> > >> ===========
> > >> JBCRELEASEDIR : '/glosoft/jbc41520'
> > >> JBCGLOBALDIR : '/glosoft/jbc41520'
> > >>
> > >> Regards,
> > >> Murali
> > >>
> > >> --
> > >> Please read the posting guidelines at:
> > >> http://groups.google.com/group/jBASE/web/Posting%20Guidelines
> > >>
> > >> IMPORTANT: Type T24: at the start of the subject line for questions
> > >> specific to Globus/T24
> > >>
> > >> To post, send email to [email protected]
> > >> To unsubscribe, send email to [email protected]
> > >> For more options, visit this group at
> > >> http://groups.google.com/group/jBASE?hl=en
> > >>
> > >
> > >
>
> --
> Please read the posting guidelines at:
> http://groups.google.com/group/jBASE/web/Posting%20Guidelines
>
> IMPORTANT: Type T24: at the start of the subject line for questions
> specific to Globus/T24
>
> To post, send email to [email protected]
> To unsubscribe, send email to [email protected]
> For more options, visit this group at
> http://groups.google.com/group/jBASE?hl=en
>
--
Please read the posting guidelines at:
http://groups.google.com/group/jBASE/web/Posting%20Guidelines
IMPORTANT: Type T24: at the start of the subject line for questions specific to
Globus/T24
To post, send email to [email protected]
To unsubscribe, send email to [email protected]
For more options, visit this group at http://groups.google.com/group/jBASE?hl=en
