Hello all,

I don't think this can be done or it so obvious I didn't read my manual properly, hopefully somebody can help me.

I have an AMV on a collector window.

It can have up to a couple of hundred MVs

If my client is searching for a particular reference which is .. say 150 lines down, they have to hold the down arrow and scroll until they find it. If the hold the down arrow too long and line 151 is the end of the MV then it shoots back to the top of the MV. This can be very annoying. so….

Are there any other scrolling keys that can be used such as or . Is there a shortcut key like for it to search?

I have at times used popups to provide the scrolling/searching, but as data needs to be entered in more than MV position I need to navigate the AMV with a bit more "User Friendliness"

Any Suggestions would be greatfully received.

Claude

Claude,

Try using G

It will ask you for a line number. I believe this may

do the trick for you.

You can use Ctrl-F to search the first field in a popup. Why not load the searchable data into a single-column popup, search it and return the MV position? Use that number to reposition the prompt at the appropriate AMV. Didn't someone already write such a subroutine? I don't have it at work; maybe someone else has it closer at hand.

should work. Have them press the if it doesn't.

Claude,

First wear a big sequinned cape. Hold down Ctrl-Alt-& and the Windows key all at once, then set Scroll lock and depress F11 simultaneously. This won't get you to line 150 like Ctrl-G does, but you'll be doing a pretty fair impersonation of Rick Wakeman, which to your clients, is way way more impressive.

Eric

If you want MV number then Ctrl-G. If you want to search for contents to find MV number, here's the code from Cogent. Use at first prompt in AMV.

---

SUBROUTINE GO.TO.LINE.PROG

$INSERT SYSINCLUDE,WINDOW.CONSTANTS

$INSERT SYSINCLUDE,WINDOW_COMMON%

DECLARE FUNCTION POPUP ; *create skeletal popup on your own

* ## is field number for first AMV field in this example

* nn is field number for second AMV field

* yy is field number for third AMV field

IF WI=## ; * substitute fieldno from dict for first MV

CNT=COUNT(@RECORD,@VM) + (@RECORD NE '')

IF CNT ] 0 THEN

  LIST='

  FOR X=1 TO CNT

    LIST=@RECORD:@VM:@RECORD:@VM:@RECORD

  NEXT X

  CONVERT @VM TO @SVM IN LIST

  CONVERT @FM TO @VM IN LIST

  P=XLATE('POPUPS','GO.TO.LINE','','X')

  P=LIST

  P=1:4:R::Code\2:15:L::Name\3:10:L:MD2$:Salary'

• Your popup setup goes in P

  MV.NEXT=POP.UP   

(P,,P,P,P,P,P,P,P,P,

P,P)

If you want MV number then Ctrl-G. If you want to search for contents to find MV number, here's the code from Cogent. Call at first prompt in AMV.

---

SUBROUTINE GO.TO.LINE.PROG

$INSERT SYSINCLUDE,WINDOW.CONSTANTS

$INSERT SYSINCLUDE,WINDOW_COMMON%

DECLARE FUNCTION POPUP ; *create skeletal popup on your own

* ## is field number for first AMV field in this example

* nn is field number for second AMV field

* yy is field number for third AMV field

IF WI=## ; * substitute fieldno from dict for first MV

CNT=COUNT(@RECORD,@VM) + (@RECORD NE '')

IF CNT ] 0 THEN

  LIST='

  FOR X=1 TO CNT

    LIST=@RECORD:@VM:@RECORD:@VM:@RECORD

  NEXT X

  CONVERT @VM TO @SVM IN LIST

  CONVERT @FM TO @VM IN LIST

  P=XLATE('POPUPS','GO.TO.LINE','','X')

  P=LIST

  P=1:4:R::Code\2:15:L::Name\3:10:L:MD2$:Salary'

• Your popup setup goes in P

  MV.NEXT=POP.UP(,,P,P,P,P,P,P,

P,P,P,P)

  RESET=RESET.RECORD$

  DISPLAY.ACTION=REDISPLAY.PROMPTS$

END

END

RETURN

I tested the code and it didn't run as posted due to thoughtless substitution of WINDOW_COMMON% for AREV.COMMON and other small typing errors. Changes made. Ctrl-F on popup searches all displayed data and correctly places cursor on selected line in AMV.

$INSERT SYSINCLUDE,WINDOW.CONSTANTS

$INSERT SYSINCLUDE,WINDOW_COMMON%

DECLARE FUNCTION POP.UP

* create skeletal popup on your own called GOTOLINE

* mode is F - type of information returned is P

* run subroutine as option from AMV 1

IF WC_WI%=1 THEN

CNT=COUNT(@RECORD,@VM) + (@RECORD NE '')

IF CNT ] 0 THEN

  LIST='

  FOR X=1 TO CNT

    LIST=@RECORD:@VM:@RECORD:@VM:@RECORD

  NEXT X

  CONVERT @VM TO @SVM IN LIST

  CONVERT @FM TO @VM IN LIST

  P=XLATE('POPUPS','GOTOLINE','','X')

  P=LIST

  P=1:4:R::Code\2:15:L::Name\3:10:L:MD2$:Salary'

• Your popup setup goes in P

  WC_MV_NEXT%=POP.UP(P,P,P,P,P,P,P,P,

P,P,P,P)

  WC_RESET%=RESET.RECORD$

  WC_DISPLAY_ACTION%=REDISPLAY.ALL$

END

END

Hope this helps.

Bill

Thanks for the code Bill, and others for your varied assistance.

I've had a play with G and it works on some AMVs and not others. I'm not sure why at this stage. I'll have to have a play.

By the way Eric, I have a plug in keyboard (musical) that I can pretend to play on for my customers. I don't know if Rick Wakeman gets the same looks I do!!

Thanks all

Claude

View this thread on the forum...