DINIT00V ; SFISC/TKW-DIALOG & LANGUAGE FILE INITS ; 3/30/99 10:41:48 ;;22.0;VA FileMan;;Mar 30, 1999 ;Per VHA Directive 10-93-142, this routine should not be modified. 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 Q Q ;;^UTILITY(U,$J,.84,9233,2,4,0) ;;= ;;^UTILITY(U,$J,.84,9233,2,5,0) ;;=Command Shortcut Description ;;^UTILITY(U,$J,.84,9233,2,6,0) ;;=------- -------- ----------- ;;^UTILITY(U,$J,.84,9233,2,7,0) ;;=EXIT see below Exit form (asks whether changes should be saved) ;;^UTILITY(U,$J,.84,9233,2,8,0) ;;=CLOSE C Close window and return to previous level ;;^UTILITY(U,$J,.84,9233,2,9,0) ;;=SAVE S Save changes ;;^UTILITY(U,$J,.84,9233,2,10,0) ;;=NEXT PAGE Go to next page ;;^UTILITY(U,$J,.84,9233,2,11,0) ;;=REFRESH R Repaint screen ;;^UTILITY(U,$J,.84,9233,2,12,0) ;;= ;;^UTILITY(U,$J,.84,9233,2,13,0) ;;= ;;^UTILITY(U,$J,.84,9233,2,14,0) ;;=\BOther Shortcut Keys\n ;;^UTILITY(U,$J,.84,9233,2,15,0) ;;= ;;^UTILITY(U,$J,.84,9233,2,16,0) ;;=Exit form and save changes E ;;^UTILITY(U,$J,.84,9233,2,17,0) ;;=Quit form without saving changes Q ;;^UTILITY(U,$J,.84,9233,2,18,0) ;;=Invoke Record Selection Page L ;;^UTILITY(U,$J,.84,9251,0) ;;=9251^3^^5 ;;^UTILITY(U,$J,.84,9251,1,0) ;;=^^1^1^2940707^^ ;;^UTILITY(U,$J,.84,9251,1,1,0) ;;=Help Screen 1 of Form Editor help. ;;^UTILITY(U,$J,.84,9251,2,0) ;;=^^22^22^2940707^ ;;^UTILITY(U,$J,.84,9251,2,1,0) ;;= \BHelp Screen 1 of 9\n ;;^UTILITY(U,$J,.84,9251,2,2,0) ;;=\BNAVIGATIONAL KEYS\n ;;^UTILITY(U,$J,.84,9251,2,3,0) ;;= ;;^UTILITY(U,$J,.84,9251,2,4,0) ;;=Press To move | Press To move ;;^UTILITY(U,$J,.84,9251,2,5,0) ;;=------------------------------------------------------------------- ;;^UTILITY(U,$J,.84,9251,2,6,0) ;;= Up one line | To top of screen ;;^UTILITY(U,$J,.84,9251,2,7,0) ;;= Down one line | To bottom of screen ;;^UTILITY(U,$J,.84,9251,2,8,0) ;;= Right one character | To right edge of screen ;;^UTILITY(U,$J,.84,9251,2,9,0) ;;= Left one character | To left edge of screen ;;^UTILITY(U,$J,.84,9251,2,10,0) ;;= To next element ;;^UTILITY(U,$J,.84,9251,2,11,0) ;;=Q To previous element ;;^UTILITY(U,$J,.84,9251,2,12,0) ;;=S Right 5 characters ;;^UTILITY(U,$J,.84,9251,2,13,0) ;;=A Left 5 characters ;;^UTILITY(U,$J,.84,9251,2,14,0) ;;= ;;^UTILITY(U,$J,.84,9251,2,15,0) ;;= ;;^UTILITY(U,$J,.84,9251,2,16,0) ;;=\BSAVING AND EXITING\n ;;^UTILITY(U,$J,.84,9251,2,17,0) ;;= ;;^UTILITY(U,$J,.84,9251,2,18,0) ;;=Press To ;;^UTILITY(U,$J,.84,9251,2,19,0) ;;=---------------------------------------------------- ;;^UTILITY(U,$J,.84,9251,2,20,0) ;;=S Save changes ;;^UTILITY(U,$J,.84,9251,2,21,0) ;;=E Save changes and exit the Form Editor ;;^UTILITY(U,$J,.84,9251,2,22,0) ;;=Q Quit the Form Editor without saving changes ;;^UTILITY(U,$J,.84,9252,0) ;;=9252^3^^5 ;;^UTILITY(U,$J,.84,9252,1,0) ;;=^^1^1^2941116^^^ ;;^UTILITY(U,$J,.84,9252,1,1,0) ;;=Help Screen 2 of Form Editor. ;;^UTILITY(U,$J,.84,9252,2,0) ;;=^^19^19^2941116^ ;;^UTILITY(U,$J,.84,9252,2,1,0) ;;= \BHelp Screen 2 of 9\n ;;^UTILITY(U,$J,.84,9252,2,2,0) ;;=\BSELECTING SCREEN ELEMENTS\n ;;^UTILITY(U,$J,.84,9252,2,3,0) ;;= ;;^UTILITY(U,$J,.84,9252,2,4,0) ;;=To "select" a screen element, position the cursor over the element and ;;^UTILITY(U,$J,.84,9252,2,5,0) ;;=press or . This process is abbreviated . ;;^UTILITY(U,$J,.84,9252,2,6,0) ;;= ;;^UTILITY(U,$J,.84,9252,2,7,0) ;;=Press To ;;^UTILITY(U,$J,.84,9252,2,8,0) ;;=---------------------------------------- ;;^UTILITY(U,$J,.84,9252,2,9,0) ;;= Select a screen element ;;^UTILITY(U,$J,.84,9252,2,10,0) ;;= ;;^UTILITY(U,$J,.84,9252,2,11,0) ;;=Once an element is selected, you can drag it around the screen by using ;;^UTILITY(U,$J,.84,9252,2,12,0) ;;=the navigational keys. You cannot drag an element beyond the boundaries ;;^UTILITY(U,$J,.84,9252,2,13,0) ;;=of the block on which it is defined. ;;^UTILITY(U,$J,.84,9252,2,14,0) ;;= ;;^UTILITY(U,$J,.84,9252,2,15,0) ;;=If you press or over the caption of an element, both ;;^UTILITY(U,$J,.84,9252,2,16,0) ;;=the caption and data portion of the element, if one exists, are selected. ;;^UTILITY(U,$J,.84,9252,2,17,0) ;;=If you press or over the data portion of an element, ;;^UTILITY(U,$J,.84,9252,2,18,0) ;;=only the data portion is selected and can be dragged independently of the ;;^UTILITY(U,$J,.84,9252,2,19,0) ;;=caption. Press or again to deselect the element. ;;^UTILITY(U,$J,.84,9253,0) ;;=9253^3^^5 ;;^UTILITY(U,$J,.84,9253,1,0) ;;=^^1^1^2940707^ ;;^UTILITY(U,$J,.84,9253,1,1,0) ;;=Help Screen 3 of Form Editor. ;;^UTILITY(U,$J,.84,9253,2,0) ;;=^^15^15^2940707^ ;;^UTILITY(U,$J,.84,9253,2,1,0) ;;= \BHelp Screen 3 of 9\n ;;^UTILITY(U,$J,.84,9253,2,2,0) ;;=\BEDITING ELEMENT PROPERTIES\n ;;^UTILITY(U,$J,.84,9253,2,3,0) ;;= ;;^UTILITY(U,$J,.84,9253,2,4,0) ;;=Press To ;;^UTILITY(U,$J,.84,9253,2,5,0) ;;=--------------------------------------------- ;;^UTILITY(U,$J,.84,9253,2,6,0) ;;= Edit element properties ;;^UTILITY(U,$J,.84,9253,2,7,0) ;;= ;;^UTILITY(U,$J,.84,9253,2,8,0) ;;=You will then be taken into a ScreenMan form where the properties of the ;;^UTILITY(U,$J,.84,9253,2,9,0) ;;=element can be edited. ;;^UTILITY(U,$J,.84,9253,2,10,0) ;;= ;;^UTILITY(U,$J,.84,9253,2,11,0) ;;=The Form Editor uses ScreenMan forms as a kind of modal dialog box. The ;;^UTILITY(U,$J,.84,9253,2,12,0) ;;=changes you make within the forms are permanent; that is, if from a ;;^UTILITY(U,$J,.84,9253,2,13,0) ;;=ScreenMan form you edit the properties of an element, use E to save ;;^UTILITY(U,$J,.84,9253,2,14,0) ;;=and exit the form, and then use Q to quit the Form Editor, the ;;^UTILITY(U,$J,.84,9253,2,15,0) ;;=changes you made to the properties of the element will remain. ;;^UTILITY(U,$J,.84,9254,0) ;;=9254^3^^5 ;;^UTILITY(U,$J,.84,9254,1,0) ;;=^^1^1^2940707^ ;;^UTILITY(U,$J,.84,9254,1,1,0) ;;=Help Screen 4 of Form Editor. ;;^UTILITY(U,$J,.84,9254,2,0) ;;=^^18^18^2940707^