Annotation of freem_fileman/DIEQ1.m, revision 1.1.1.1
1.1 snw 1: DIEQ1 ;SFISC/XAK,YJK-HELP WRITE ;5/27/94 7:29 AM
2: ;;21.0;VA FileMan;;Dec 28, 1994
3: ;Per VHA Directive 10-93-142, this routine should not be modified.
4: T S A1="T" F DG=2:1 S X=$T(T+DG) Q:X="" S DST=$E(X,4,99) D DS^DIEQ
5: K A1,DST Q
6: ;;If you simply enter a name then the system will search each of
7: ;;the above files for the name you have entered. If a match is
8: ;;found the system will ask you if it is the entry that you desire.
9: ;;
10: ;;However, if you know the file the entry should be in, then you can
11: ;;speed processing by using the following syntax to select an entry:
12: ;; <Prefix>.<entry name>
13: ;; or
14: ;; <Message>.<entry name>
15: ;; or
16: ;; <File Name>.<entry name>
17: ;;
18: ;;Also, you do NOT need to enter the entire file name or message
19: ;;to direct the look up. Using the first few characters will suffice.
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>