Annotation of freem_fileman/DINIT00X.m, revision 1.1.1.1

1.1       snw         1: DINIT00X       ; 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,171,0)
                      7:        ;;=     and screen information.  The "Col>" indicates the column number the
                      8:        ;;^UTILITY(U,$J,.84,9201,2,172,0)
                      9:        ;;=     left edge of the browse window is over in the document.  The "Line>"
                     10:        ;;^UTILITY(U,$J,.84,9201,2,173,0)
                     11:        ;;=     shows the current line at the bottom of the scroll region and the
                     12:        ;;^UTILITY(U,$J,.84,9201,2,174,0)
                     13:        ;;=     total number of lines in the document.  The "Screen>" shows the
                     14:        ;;^UTILITY(U,$J,.84,9201,2,175,0)
                     15:        ;;=     current screen and the total number of screens in the document.
                     16:        ;;^UTILITY(U,$J,.84,9201,2,176,0)
                     17:        ;;=     
                     18:        ;;^UTILITY(U,$J,.84,9201,2,177,0)
                     19:        ;;=     The SCROLLING REGION, between the TITLE BAR and the STATUS BAR, is
                     20:        ;;^UTILITY(U,$J,.84,9201,2,178,0)
                     21:        ;;=     where the Browser displays the text being viewed.
                     22:        ;;^UTILITY(U,$J,.84,9201,2,179,0)
                     23:        ;;=     
                     24:        ;;^UTILITY(U,$J,.84,9201,2,180,0)
                     25:        ;;=     <<<Press 'R' or <PF1>'E' to exit this help document>>>
                     26:        ;;^UTILITY(U,$J,.84,9201,5,0)
                     27:        ;;=^.841^^0
                     28:        ;;^UTILITY(U,$J,.84,9211,0)
                     29:        ;;=9211^3^^11
                     30:        ;;^UTILITY(U,$J,.84,9211,1,0)
                     31:        ;;=^^1^1^2940624^^^^
                     32:        ;;^UTILITY(U,$J,.84,9211,1,1,0)
                     33:        ;;=Screen 1 of Screen Editor help.
                     34:        ;;^UTILITY(U,$J,.84,9211,2,0)
                     35:        ;;=^^17^17^2940830^
                     36:        ;;^UTILITY(U,$J,.84,9211,2,1,0)
                     37:        ;;=                                                           \BHelp Screen 1 of 4\n
                     38:        ;;^UTILITY(U,$J,.84,9211,2,2,0)
                     39:        ;;= 
                     40:        ;;^UTILITY(U,$J,.84,9211,2,3,0)
                     41:        ;;=\BSUMMARY OF KEY SEQUENCES\n
                     42:        ;;^UTILITY(U,$J,.84,9211,2,4,0)
                     43:        ;;= 
                     44:        ;;^UTILITY(U,$J,.84,9211,2,5,0)
                     45:        ;;= 
                     46:        ;;^UTILITY(U,$J,.84,9211,2,6,0)
                     47:        ;;=\BNavigation\n
                     48:        ;;^UTILITY(U,$J,.84,9211,2,7,0)
                     49:        ;;= 
                     50:        ;;^UTILITY(U,$J,.84,9211,2,8,0)
                     51:        ;;=   Incremental movement            Arrow keys
                     52:        ;;^UTILITY(U,$J,.84,9211,2,9,0)
                     53:        ;;=   One word left and right         <Ctrl-J> and <Ctrl-L>
                     54:        ;;^UTILITY(U,$J,.84,9211,2,10,0)
                     55:        ;;=   Next tab stop to the right      <Tab>
                     56:        ;;^UTILITY(U,$J,.84,9211,2,11,0)
                     57:        ;;=   Jump left and right             <PF1><Left> and <PF1><Right>
                     58:        ;;^UTILITY(U,$J,.84,9211,2,12,0)
                     59:        ;;=   Beginning and end of line       <PF1><PF1><Left> and <PF1><PF1><Right>
                     60:        ;;^UTILITY(U,$J,.84,9211,2,13,0)
                     61:        ;;=   Screen up or down               <PF1><Up> and <PF1><Down>
                     62:        ;;^UTILITY(U,$J,.84,9211,2,14,0)
                     63:        ;;=                                      or:  <PrevScr> and <NextScr>
                     64:        ;;^UTILITY(U,$J,.84,9211,2,15,0)
                     65:        ;;=                                      or:  <PageUp>  and <PageDown>
                     66:        ;;^UTILITY(U,$J,.84,9211,2,16,0)
                     67:        ;;=   Top or bottom of document       <PF1>T and <PF1>B
                     68:        ;;^UTILITY(U,$J,.84,9211,2,17,0)
                     69:        ;;=   Go to a specific location       <PF1>G
                     70:        ;;^UTILITY(U,$J,.84,9212,0)
                     71:        ;;=9212^3^^11
                     72:        ;;^UTILITY(U,$J,.84,9212,1,0)
                     73:        ;;=^^1^1^2940624^^^^
                     74:        ;;^UTILITY(U,$J,.84,9212,1,1,0)
                     75:        ;;=Screen 2 of Screen Editor help.
                     76:        ;;^UTILITY(U,$J,.84,9212,2,0)
                     77:        ;;=^^17^17^2940830^
                     78:        ;;^UTILITY(U,$J,.84,9212,2,1,0)
                     79:        ;;=                                                           \BHelp Screen 2 of 4\n
                     80:        ;;^UTILITY(U,$J,.84,9212,2,2,0)
                     81:        ;;= 
                     82:        ;;^UTILITY(U,$J,.84,9212,2,3,0)
                     83:        ;;=\BExiting/Saving\n
                     84:        ;;^UTILITY(U,$J,.84,9212,2,4,0)
                     85:        ;;= 
                     86:        ;;^UTILITY(U,$J,.84,9212,2,5,0)
                     87:        ;;=   Exit and save text              <PF1>E
                     88:        ;;^UTILITY(U,$J,.84,9212,2,6,0)
                     89:        ;;=   Quit without saving             <PF1>Q
                     90:        ;;^UTILITY(U,$J,.84,9212,2,7,0)
                     91:        ;;=   Exit, save, and switch editors  <PF1>A
                     92:        ;;^UTILITY(U,$J,.84,9212,2,8,0)
                     93:        ;;=   Save without exiting            <PF1>S
                     94:        ;;^UTILITY(U,$J,.84,9212,2,9,0)
                     95:        ;;= 
                     96:        ;;^UTILITY(U,$J,.84,9212,2,10,0)
                     97:        ;;= 
                     98:        ;;^UTILITY(U,$J,.84,9212,2,11,0)
                     99:        ;;=\BDeleting\n
                    100:        ;;^UTILITY(U,$J,.84,9212,2,12,0)
                    101:        ;;= 
                    102:        ;;^UTILITY(U,$J,.84,9212,2,13,0)
                    103:        ;;=   Character before cursor         <Backspace>
                    104:        ;;^UTILITY(U,$J,.84,9212,2,14,0)
                    105:        ;;=   Character at cursor             <PF4>  or  <Remove>  or  <Delete>
                    106:        ;;^UTILITY(U,$J,.84,9212,2,15,0)
                    107:        ;;=   From cursor to end of word      <Ctrl-W>
                    108:        ;;^UTILITY(U,$J,.84,9212,2,16,0)
                    109:        ;;=   From cursor to end of line      <PF1><PF2>
                    110:        ;;^UTILITY(U,$J,.84,9212,2,17,0)
                    111:        ;;=   Entire line                     <PF1>D
                    112:        ;;^UTILITY(U,$J,.84,9213,0)
                    113:        ;;=9213^3^^11
                    114:        ;;^UTILITY(U,$J,.84,9213,1,0)
                    115:        ;;=^^1^1^2940624^^^^
                    116:        ;;^UTILITY(U,$J,.84,9213,1,1,0)
                    117:        ;;=Screen 3 of Screen Editor help.
                    118:        ;;^UTILITY(U,$J,.84,9213,2,0)
                    119:        ;;=^^15^15^2940830^
                    120:        ;;^UTILITY(U,$J,.84,9213,2,1,0)
                    121:        ;;=                                                           \BHelp Screen 3 of 4\n
                    122:        ;;^UTILITY(U,$J,.84,9213,2,2,0)
                    123:        ;;=\BSettings/Modes\n
                    124:        ;;^UTILITY(U,$J,.84,9213,2,3,0)
                    125:        ;;= 

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