Annotation of freem_fileman/DINIT00U.m, revision 1.1.1.1

1.1       snw         1: DINIT00U       ; 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,15,0)
                      7:        ;;=     Jump to the Top                         <PF1>T
                      8:        ;;^UTILITY(U,$J,.84,9201,2,16,0)
                      9:        ;;=     Jump to the Bottom                      <PF1>B
                     10:        ;;^UTILITY(U,$J,.84,9201,2,17,0)
                     11:        ;;=     Goto                                    <PF1>G
                     12:        ;;^UTILITY(U,$J,.84,9201,2,18,0)
                     13:        ;;=     
                     14:        ;;^UTILITY(U,$J,.84,9201,2,19,0)
                     15:        ;;=SEARCH:
                     16:        ;;^UTILITY(U,$J,.84,9201,2,20,0)
                     17:        ;;========
                     18:        ;;^UTILITY(U,$J,.84,9201,2,21,0)
                     19:        ;;=     Find text                               <PF1>F
                     20:        ;;^UTILITY(U,$J,.84,9201,2,22,0)
                     21:        ;;=     Next (occurrence)                       <PF1>N
                     22:        ;;^UTILITY(U,$J,.84,9201,2,23,0)
                     23:        ;;=     
                     24:        ;;^UTILITY(U,$J,.84,9201,2,24,0)
                     25:        ;;=     Direction-terminate find text with:
                     26:        ;;^UTILITY(U,$J,.84,9201,2,25,0)
                     27:        ;;=     -----------------------------------
                     28:        ;;^UTILITY(U,$J,.84,9201,2,26,0)
                     29:        ;;=     Down                                    ARROW DOWN
                     30:        ;;^UTILITY(U,$J,.84,9201,2,27,0)
                     31:        ;;=     Up                                      ARROW UP
                     32:        ;;^UTILITY(U,$J,.84,9201,2,28,0)
                     33:        ;;=     
                     34:        ;;^UTILITY(U,$J,.84,9201,2,29,0)
                     35:        ;;=BRANCH:
                     36:        ;;^UTILITY(U,$J,.84,9201,2,30,0)
                     37:        ;;========
                     38:        ;;^UTILITY(U,$J,.84,9201,2,31,0)
                     39:        ;;=     Switch to another document              <PF1>S
                     40:        ;;^UTILITY(U,$J,.84,9201,2,32,0)
                     41:        ;;=     Return to previous document(s)          R
                     42:        ;;^UTILITY(U,$J,.84,9201,2,33,0)
                     43:        ;;= 
                     44:        ;;^UTILITY(U,$J,.84,9201,2,34,0)
                     45:        ;;=SCREEN:
                     46:        ;;^UTILITY(U,$J,.84,9201,2,35,0)
                     47:        ;;========
                     48:        ;;^UTILITY(U,$J,.84,9201,2,36,0)
                     49:        ;;=     Repaint screen                          <PF1>P
                     50:        ;;^UTILITY(U,$J,.84,9201,2,37,0)
                     51:        ;;=     Split screen                            <PF2>S
                     52:        ;;^UTILITY(U,$J,.84,9201,2,38,0)
                     53:        ;;=     restore Full screen                     <PF2>F
                     54:        ;;^UTILITY(U,$J,.84,9201,2,39,0)
                     55:        ;;= 
                     56:        ;;^UTILITY(U,$J,.84,9201,2,40,0)
                     57:        ;;=     Split Screen Mode Navigation:
                     58:        ;;^UTILITY(U,$J,.84,9201,2,41,0)
                     59:        ;;=     -----------------------------
                     60:        ;;^UTILITY(U,$J,.84,9201,2,42,0)
                     61:        ;;=     Navigate to bottom screen              <PF2>ARROW DOWN
                     62:        ;;^UTILITY(U,$J,.84,9201,2,43,0)
                     63:        ;;=     Navigate to top screen                 <PF2>ARROW UP
                     64:        ;;^UTILITY(U,$J,.84,9201,2,44,0)
                     65:        ;;= 
                     66:        ;;^UTILITY(U,$J,.84,9201,2,45,0)
                     67:        ;;=     Resize Split Screen:
                     68:        ;;^UTILITY(U,$J,.84,9201,2,46,0)
                     69:        ;;=     --------------------
                     70:        ;;^UTILITY(U,$J,.84,9201,2,47,0)
                     71:        ;;=     Top/Bottom screen larger/smaller       <PF2><PF2>ARROW DOWN
                     72:        ;;^UTILITY(U,$J,.84,9201,2,48,0)
                     73:        ;;=     Bottom/Top screen larger/smaller       <PF2><PF2>ARROW UP
                     74:        ;;^UTILITY(U,$J,.84,9201,2,49,0)
                     75:        ;;=     
                     76:        ;;^UTILITY(U,$J,.84,9201,2,50,0)
                     77:        ;;=HELP:
                     78:        ;;^UTILITY(U,$J,.84,9201,2,51,0)
                     79:        ;;======
                     80:        ;;^UTILITY(U,$J,.84,9201,2,52,0)
                     81:        ;;=     Browse Key Summary                     <PF1>H
                     82:        ;;^UTILITY(U,$J,.84,9201,2,53,0)
                     83:        ;;=     More Help                              <PF1><PF1>H
                     84:        ;;^UTILITY(U,$J,.84,9201,2,54,0)
                     85:        ;;= 
                     86:        ;;^UTILITY(U,$J,.84,9201,2,55,0)
                     87:        ;;=EXIT:
                     88:        ;;^UTILITY(U,$J,.84,9201,2,56,0)
                     89:        ;;======
                     90:        ;;^UTILITY(U,$J,.84,9201,2,57,0)
                     91:        ;;=     Exit Browser or help text              <PF1>E or "EXIT"
                     92:        ;;^UTILITY(U,$J,.84,9201,2,58,0)
                     93:        ;;=     Quit                                   <PF1>Q
                     94:        ;;^UTILITY(U,$J,.84,9201,2,59,0)
                     95:        ;;=     
                     96:        ;;^UTILITY(U,$J,.84,9201,2,60,0)
                     97:        ;;=                                    More Help
                     98:        ;;^UTILITY(U,$J,.84,9201,2,61,0)
                     99:        ;;=                                    =========
                    100:        ;;^UTILITY(U,$J,.84,9201,2,62,0)
                    101:        ;;= 
                    102:        ;;^UTILITY(U,$J,.84,9201,2,63,0)
                    103:        ;;=     To EXIT the VA FileMan Browser, press <PF1> followed by the letter
                    104:        ;;^UTILITY(U,$J,.84,9201,2,64,0)
                    105:        ;;=     'E'.  This is also true for this HELP document which is being
                    106:        ;;^UTILITY(U,$J,.84,9201,2,65,0)
                    107:        ;;=     presented by the Browser.
                    108:        ;;^UTILITY(U,$J,.84,9201,2,66,0)
                    109:        ;;=     
                    110:        ;;^UTILITY(U,$J,.84,9201,2,67,0)
                    111:        ;;=     To SCROLL DOWN one line at a time, press the ARROW DOWN key.
                    112:        ;;^UTILITY(U,$J,.84,9201,2,68,0)
                    113:        ;;=     
                    114:        ;;^UTILITY(U,$J,.84,9201,2,69,0)
                    115:        ;;=     To SCROLL UP one line at a time, press the ARROW UP key.
                    116:        ;;^UTILITY(U,$J,.84,9201,2,70,0)
                    117:        ;;=     
                    118:        ;;^UTILITY(U,$J,.84,9201,2,71,0)
                    119:        ;;=     To SCROLL RIGHT, press the ARROW RIGHT key.
                    120:        ;;^UTILITY(U,$J,.84,9201,2,72,0)
                    121:        ;;=     
                    122:        ;;^UTILITY(U,$J,.84,9201,2,73,0)
                    123:        ;;=     To SCROLL LEFT, press the ARROW LEFT key.
                    124:        ;;^UTILITY(U,$J,.84,9201,2,74,0)
                    125:        ;;=     
                    126:        ;;^UTILITY(U,$J,.84,9201,2,75,0)
                    127:        ;;=     Try pressing these keys at this time and observe the behavior. Get a
                    128:        ;;^UTILITY(U,$J,.84,9201,2,76,0)
                    129:        ;;=     feel for 'browsing' through a document.  Press the arrow down key a

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