Rclerk to a specific record

Jason Garner jason.garner at evalsvs.com
Fri Jul 15 14:11:54 PDT 2016


Thanks Ken,

I am almost there I start with

pop_schþ If: 'pop_sch
       Then:
429  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
       þ If:
       Then: declare recno(20,.0); recno=""
430  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
       þ If:
       Then: lookup sched=(inf_file) k=(qb) i=G -nx
431  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
       þ If: not sched
       Then: system "rclerk lz_ss_infcon -S4 -d -XIE"; return
432  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
       þ If:
       Then: recno=sched(@rn)
433  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
       þ If:
       Then: close sched
434  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
       þ If:
       Then: cm="rclerk lz_ss_infcon -S1 -d -XE"<recno
       þ If:
       Then: system cm
436  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
       þ If:
       Then: return


Then upon entering the destination processing table

@menu  þ If:
       Then:
104  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
       þ If: @PW ne ""
       Then: lookup - r=@PW
105  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
       þ If:
       Then: display
106  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -
       þ If:
       Then: end

What I get is the IUA menu, but behind it is the screen I want. So I am
thinking my rclerk command isnt quite right still or no?

Thanks so much for your help!


On Fri, Jul 15, 2016 at 4:20 PM Kenneth Brody <kenbrody at spamcop.net> wrote:

> On 7/15/2016 4:06 PM, Jason Garner via Filepro-list wrote:
> > Good Afternoon Fileproians,
> >
> > I would like to setup a key for my users that rclerks them to a specific
> > record in a different file.
> >
> > I was looking in the manual and didnt see an argument for rclerk that
> would
> > allow that.
> >
> > I did see that you could pass stuff in into "System Maintained" variables
> > like @PM. I was thinking I could maybe do my lookup stuff to get the RN I
> > wanted and then shove that inside one of these system maintained
> variables
> > and then write something in @once or @menu in the destination file
> > processing table and then in my rclerk command, bypass inquire update and
> > add and go directly to processing.
> >
> > But I thought I better ask for the "right way" to do it before I
> > accidentally leveled Moscow. :)
>
> There is no single "right way" to do something like that.  However, a very
> common way to do this is basically what you mention -- pass the record
> number via one of the "-Px" command-line flags, and look at the
> corresponding @Px system field in @MENU to do a lookup-dash to that record
> number if specified.  (And protect yourself from getting into an infinite
> loop if the user goes back to the *clerk menu.)
>
> Remember that this will only place the user on that record upon starting
> *clerk.  You'll need to do other things (perhaps in @ENTSEL) to prevent the
> user from going to other records, should you wish to prevent such behavior.
>
> --
> Kenneth Brody
>
-- 
Jason Garner
Systems Administrator
1801 Oberlin Rd, Suite 204
Middletown, PA 17057
Work   717-985-1122 x 1139
Mobile 717-645-3521
jason.garner at evalsvs.com
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mailman.celestial.com/pipermail/filepro-list/attachments/20160715/e106366a/attachment.html>


More information about the Filepro-list mailing list