Annotation of freem_fileman/DINIT00V.m, revision 1.1.1.1

1.1       snw         1: DINIT00V       ; SFISC/TKW-DIALOG & LANGUAGE FILE INITS ; 12/22/94  09:32:23
                      2:        ;;21.0;VA FileMan;;Dec 28, 1994
                      3:        ;Per VHA Directive 10-93-142, this routine should not be modified.
                      4:        F I=1:2 S X=$T(Q+I) Q:X=""  S Y=$E($T(Q+I+1),4,999),X=$E(X,4,999) S:$A(Y)=126 I=I+1,Y=$E(Y,2,999)_$E($T(Q+I+1),5,99) S:$A(Y)=61 Y=$E(Y,2,999) S @X=Y
                      5: Q      Q
                      6:        ;;^UTILITY(U,$J,.84,9201,2,77,0)
                      7:        ;;=     few times, then press the arrow up key.  Also notice that the 'Line>'
                      8:        ;;^UTILITY(U,$J,.84,9201,2,78,0)
                      9:        ;;=     and 'Screen>' indicator numbers are changing. To see more of this
                     10:        ;;^UTILITY(U,$J,.84,9201,2,79,0)
                     11:        ;;=     text keep pressing the ARROW DOWN key.  Now try the arrow right key,
                     12:        ;;^UTILITY(U,$J,.84,9201,2,80,0)
                     13:        ;;=     then the arrow left key.  Notice that the 'Col>' indicator number is
                     14:        ;;^UTILITY(U,$J,.84,9201,2,81,0)
                     15:        ;;=     also changing.  This shows what column the left most edge of the
                     16:        ;;^UTILITY(U,$J,.84,9201,2,82,0)
                     17:        ;;=     document is on.  As you can see, the VA FileMan Browser is like a
                     18:        ;;^UTILITY(U,$J,.84,9201,2,83,0)
                     19:        ;;=     window placed over a document. You are in control of this window
                     20:        ;;^UTILITY(U,$J,.84,9201,2,84,0)
                     21:        ;;=     which moves over the document by pressing the functional key
                     22:        ;;^UTILITY(U,$J,.84,9201,2,85,0)
                     23:        ;;=     sequences.  Here are a few more functions.
                     24:        ;;^UTILITY(U,$J,.84,9201,2,86,0)
                     25:        ;;= 
                     26:        ;;^UTILITY(U,$J,.84,9201,2,87,0)
                     27:        ;;=     To PAGE DOWN one screen at one time, press the NEXT SCREEN key, PAGE
                     28:        ;;^UTILITY(U,$J,.84,9201,2,88,0)
                     29:        ;;=     DOWN or PF1 followed by the ARROW DOWN key, depending on what kind of
                     30:        ;;^UTILITY(U,$J,.84,9201,2,89,0)
                     31:        ;;=     CRT or workstation that is being used.
                     32:        ;;^UTILITY(U,$J,.84,9201,2,90,0)
                     33:        ;;=     
                     34:        ;;^UTILITY(U,$J,.84,9201,2,91,0)
                     35:        ;;=     To PAGE UP one screen at one time, press the PREV SCREEN key, PAGE UP
                     36:        ;;^UTILITY(U,$J,.84,9201,2,92,0)
                     37:        ;;=     or PF1 followed by the ARROW UP key, depending on what kind of CRT or
                     38:        ;;^UTILITY(U,$J,.84,9201,2,93,0)
                     39:        ;;=     workstation that is being used.
                     40:        ;;^UTILITY(U,$J,.84,9201,2,94,0)
                     41:        ;;=     
                     42:        ;;^UTILITY(U,$J,.84,9201,2,95,0)
                     43:        ;;=     To return to the TOP, back to the beginning of the document, press
                     44:        ;;^UTILITY(U,$J,.84,9201,2,96,0)
                     45:        ;;=     the <PF1> key followed by the letter 'T'.
                     46:        ;;^UTILITY(U,$J,.84,9201,2,97,0)
                     47:        ;;=     
                     48:        ;;^UTILITY(U,$J,.84,9201,2,98,0)
                     49:        ;;=     To go to the BOTTOM, end of the document, press the <PF1> key
                     50:        ;;^UTILITY(U,$J,.84,9201,2,99,0)
                     51:        ;;=     followed by the letter 'B'.
                     52:        ;;^UTILITY(U,$J,.84,9201,2,100,0)
                     53:        ;;=     
                     54:        ;;^UTILITY(U,$J,.84,9201,2,101,0)
                     55:        ;;=     To GOTO a specific screen, line or column press the <PF1> key
                     56:        ;;^UTILITY(U,$J,.84,9201,2,102,0)
                     57:        ;;=     followed by the letter 'G'.  This will cause a prompt to be displayed
                     58:        ;;^UTILITY(U,$J,.84,9201,2,103,0)
                     59:        ;;=     where a screen, line or column number can be entered preceded by a
                     60:        ;;^UTILITY(U,$J,.84,9201,2,104,0)
                     61:        ;;=     'S' , 'L' or 'C'.  The default is screen, meaning that the 'S' is
                     62:        ;;^UTILITY(U,$J,.84,9201,2,105,0)
                     63:        ;;=     optional when entering a screen number.  10 or S10 will go to screen
                     64:        ;;^UTILITY(U,$J,.84,9201,2,106,0)
                     65:        ;;=     10, if screen 10 is a valid screen.  L99 will go to line 99 and C33
                     66:        ;;^UTILITY(U,$J,.84,9201,2,107,0)
                     67:        ;;=     will go to column 33.
                     68:        ;;^UTILITY(U,$J,.84,9201,2,108,0)
                     69:        ;;=     
                     70:        ;;^UTILITY(U,$J,.84,9201,2,109,0)
                     71:        ;;=     To FIND a string of characters, on a line, press the <PF1> key
                     72:        ;;^UTILITY(U,$J,.84,9201,2,110,0)
                     73:        ;;=     followed by the letter 'F' or 'FIND' key.  A prompt will appear where
                     74:        ;;^UTILITY(U,$J,.84,9201,2,111,0)
                     75:        ;;=     a search string of characters can be entered.  The Find facility will
                     76:        ;;^UTILITY(U,$J,.84,9201,2,112,0)
                     77:        ;;=     search the document and immediately stop when it finds a match and
                     78:        ;;^UTILITY(U,$J,.84,9201,2,113,0)
                     79:        ;;=     'Goto' the line/screen.  The matched text will be highlighted in
                     80:        ;;^UTILITY(U,$J,.84,9201,2,114,0)
                     81:        ;;=     reverse video, if available, so it can be found easily.  However, if
                     82:        ;;^UTILITY(U,$J,.84,9201,2,115,0)
                     83:        ;;=     a string contains two or more words, matching will only be done if
                     84:        ;;^UTILITY(U,$J,.84,9201,2,116,0)
                     85:        ;;=     the words are found on the same line.  The default direction of the
                     86:        ;;^UTILITY(U,$J,.84,9201,2,117,0)
                     87:        ;;=     search is down.  This can be controlled by using the ARROW UP or
                     88:        ;;^UTILITY(U,$J,.84,9201,2,118,0)
                     89:        ;;=     ARROW DOWN keys instead of the RETURN key to terminate the search
                     90:        ;;^UTILITY(U,$J,.84,9201,2,119,0)
                     91:        ;;=     string.
                     92:        ;;^UTILITY(U,$J,.84,9201,2,120,0)
                     93:        ;;=     
                     94:        ;;^UTILITY(U,$J,.84,9201,2,121,0)
                     95:        ;;=     To, NEXT FIND, find the next occurrence of the same search string,
                     96:        ;;^UTILITY(U,$J,.84,9201,2,122,0)
                     97:        ;;=     press the letter 'N' or <PF1> followed by the letter 'N'. The FIND

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>