<div dir="ltr">Thanks Ken,<div><br></div><div>I am almost there I start with </div><div><br></div><div><div>pop_schþ If: 'pop_sch</div><div>       Then:</div><div>429  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -</div><div>       þ If:</div><div>       Then: declare recno(20,.0); recno=""</div><div>430  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -</div><div>       þ If:</div><div>       Then: lookup sched=(inf_file) k=(qb) i=G -nx</div><div>431  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -</div><div>       þ If: not sched</div><div>       Then: system "rclerk lz_ss_infcon -S4 -d -XIE"; return</div></div><div><div><span style="line-height:1.5">432  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -</span></div><div>       þ If:</div><div>       Then: recno=sched(@rn)</div><div>433  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -</div><div>       þ If:</div><div>       Then: close sched</div><div>434  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -</div><div>       þ If:</div><div>       Then: cm="rclerk lz_ss_infcon -S1 -d -XE"<recno</div></div><div><div>       þ If:</div><div>       Then: system cm</div><div>436  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -</div><div>       þ If:</div><div>       Then: return</div></div><div><br></div><div><br></div><div>Then upon entering the destination processing table</div><div><br></div><div><div>@menu  þ If:</div><div>       Then:</div><div>104  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -</div><div>       þ If: @PW ne ""</div><div>       Then: lookup - r=@PW</div><div>105  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -</div><div>       þ If:</div><div>       Then: display</div><div>106  -------   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -   -</div><div>       þ If:</div><div>       Then: end</div></div><div><br></div><div>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?</div><div><br></div><div>Thanks so much for your help!</div><div><br></div><br><div class="gmail_quote"><div dir="ltr">On Fri, Jul 15, 2016 at 4:20 PM Kenneth Brody <<a href="mailto:kenbrody@spamcop.net" target="_blank">kenbrody@spamcop.net</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">On 7/15/2016 4:06 PM, Jason Garner via Filepro-list wrote:<br>
> Good Afternoon Fileproians,<br>
><br>
> I would like to setup a key for my users that rclerks them to a specific<br>
> record in a different file.<br>
><br>
> I was looking in the manual and didnt see an argument for rclerk that would<br>
> allow that.<br>
><br>
> I did see that you could pass stuff in into "System Maintained" variables<br>
> like @PM. I was thinking I could maybe do my lookup stuff to get the RN I<br>
> wanted and then shove that inside one of these system maintained variables<br>
> and then write something in @once or @menu in the destination file<br>
> processing table and then in my rclerk command, bypass inquire update and<br>
> add and go directly to processing.<br>
><br>
> But I thought I better ask for the "right way" to do it before I<br>
> accidentally leveled Moscow. :)<br>
<br>
There is no single "right way" to do something like that.  However, a very<br>
common way to do this is basically what you mention -- pass the record<br>
number via one of the "-Px" command-line flags, and look at the<br>
corresponding @Px system field in @MENU to do a lookup-dash to that record<br>
number if specified.  (And protect yourself from getting into an infinite<br>
loop if the user goes back to the *clerk menu.)<br>
<br>
Remember that this will only place the user on that record upon starting<br>
*clerk.  You'll need to do other things (perhaps in @ENTSEL) to prevent the<br>
user from going to other records, should you wish to prevent such behavior.<br>
<br>
--<br>
Kenneth Brody<br>
</blockquote></div></div><div dir="ltr">-- <br></div><div data-smartmail="gmail_signature"><div dir="ltr"><div style="font-size:12.8px">Jason Garner<br></div><div style="font-size:12.8000001907349px">Systems Administrator<br>1801 Oberlin Rd, Suite 204</div><div style="font-size:12.8000001907349px">Middletown, PA 17057<br><span title="Call with Google Voice"><span title="Call with Google Voice"><span title="Call with Google Voice"><span title="Call with Google Voice"><span title="Call with Google Voice">Work   <a href="tel:717-985-1122" value="+17179851122" style="color:rgb(17,85,204)" target="_blank">717-985-1122</a></span></span></span></span></span> x 1139</div><div style="font-size:12.8000001907349px">Mobile 717-645-3521</div><div style="font-size:12.8000001907349px"><a href="mailto:jason.garner@evalsvs.com" target="_blank">jason.garner@evalsvs.com</a></div></div></div>