Rusty,
The entire motivation is my dislike of rollnscroll. I
have found that all the menus I have encountered will
fit on one screen. I think that starting from the top
of the screen will make the menu look the same on the
screen each time (i.e. there won't be residual text
from prior operations clutering the screen.)
Logically, rollnscroll is better, because it preserves
history. But aesthetically, I still like a more
"chui" look.
Kevin
--- T Maynard <[EMAIL PROTECTED]> wrote:
> Kevin,
>
> I am trying to understand the ergonomic goal
> here.
> I see that rollNscroll builds from the bottom
> of the screen, but I find the accumulated history
> that remains higher in the screen to be helpful.
> On the other hand I see that clearing the
> screen prior to loading a new list will increase
> the capacity, but it doesn't seem that it would
> guarantee a showing of all of a large list of
> options arranged as a "menu" offering.
> Aside from understanding your goal here, I
> wonder if you would also share the basis of
> motivation.
>
> In the current context of your
> development/deployment how much of the motivation
> is derived from each of these?:
> 1. from personal use of the menus
> 2. from reaction/critique by your non-provider
> office staff during review
> 3. from providers at your site, for whom you ran
> a formal VistA presentation recently
>
> Thanks
> Rusty
>
>
> Kevin Toppenberg wrote:
> > Hello all,
> >
> > I have decided that I prefer to have the menu
> options
> > in VistA to clear the screen each time, and show
> their
> > full menu options. This seem more like GUI/CHUI
> > applications.
> >
> > To achieve this, I first tried adding WRITE @IOF
> to
> > the open execute of each menu option. But there
> are
> > 9000 some options, and I didn't want to write a
> script
> > to add this code arbitrarily and automaticaly.
> >
> > So this is how I have discovered to do it, if
> anyone
> > is interested:
> >
> > In the code module XQ.m add 3 lines as follows.
> The
> > first lines are the code that is already there.
> Look
> > down below for the simply "write" lines that I
> added:
> >
> > M I '$D(XQVOL) S XQVOL=$G(^XUTL("XQ",$J,"XQVOL"))
> I
> > '$L(XQVOL) D GETENV^%ZOSV S XQVOL=$P(Y,U,2)
> > I $G(^%ZIS(14.5,"LOGON",XQVOL)) S XQNOLOG="" G
> H^XUS
> > S:$S('$D(XQY0):1,'$L(XQY0):1,1:0)
> XQY0=^DIC(19,XQY,0)
> > S XQT=$P(XQY0,U,4) G:XQT="" M3 K:'$D(XQJS) XQUR K
> > X,XQNOGO,XQR,XQUIT,XQUEFLG ;,XQSV
> > I $D(XQAUDIT),XQAUDIT D LOGOPT^XQ12
> > I $P(XQY0,U,18) D CHKQUE^XQ92 I XQUEFLG S
> XQNOGO=""
> > ;
> > write @IOF ;"KT Added these 3 lines 12-9-04
> > write " WorldVistA Menu Option System",!
> > write " =============================",!
> > ;Execute the Entry Action and look for XQUIT
> > D:'$D(XQM3)&("LOQX"'[XQT) LO K XQM3 I $D(XQUIT) D
> > .S XQUIT=0
> > .D ^XQUIT
> > .Q
> > ;
> >
> >
> > Kevin
> >
> >
> >
> > __________________________________
> > Do you Yahoo!?
> > The all-new My Yahoo! - What will yours do?
> > http://my.yahoo.com
> >
> >
> >
>
-------------------------------------------------------
> > SF email is sponsored by - The IT Product Guide
> > Read honest & candid reviews on hundreds of IT
> Products from real users.
> > Discover which products truly live up to the hype.
> Start reading now.
> > http://productguide.itmanagersjournal.com/
> > _______________________________________________
> > Hardhats-members mailing list
> > [EMAIL PROTECTED]
> >
>
https://lists.sourceforge.net/lists/listinfo/hardhats-members
> >
>
>
>
-------------------------------------------------------
> SF email is sponsored by - The IT Product Guide
> Read honest & candid reviews on hundreds of IT
> Products from real users.
> Discover which products truly live up to the hype.
> Start reading now.
> http://productguide.itmanagersjournal.com/
> _______________________________________________
> Hardhats-members mailing list
> [EMAIL PROTECTED]
>
https://lists.sourceforge.net/lists/listinfo/hardhats-members
>
__________________________________
Do you Yahoo!?
Yahoo! Mail - now with 250MB free storage. Learn more.
http://info.mail.yahoo.com/mail_250
-------------------------------------------------------
SF email is sponsored by - The IT Product Guide
Read honest & candid reviews on hundreds of IT Products from real users.
Discover which products truly live up to the hype. Start reading now.
http://productguide.itmanagersjournal.com/
_______________________________________________
Hardhats-members mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/hardhats-members
