source: FOIAVistA/tag/r/KERNEL-XU-A4A7-USC-XG-XLF-XNOA-XPD-XQ-XVIR-ZI-ZOSF-ZOSV-ZT-ZU-%Z-XIP--XQAB--XUC--XUR--ZIN--ZTED/XPDIN00N.m@ 1154

Last change on this file since 1154 was 628, checked in by George Lilly, 15 years ago

initial load of FOIAVistA 6/30/08 version

File size: 4.7 KB
Line 
1XPDIN00N ; ; 03-JUL-1995
2 ;;8.0;KERNEL;;JUL 10, 1995
3 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) X NO E S @X=Y
4Q Q
5 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","PT",9.6,1,8,51)
6 ;;=
7 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",1,0,27)
8 ;;=Edit a Build PAGE 1 OF 4
9 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",1,1,0)
10 ;;=Name:
11 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",1,5,21)
12 ;;=Name:
13 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",1,7,9)
14 ;;=Date Distributed:
15 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",1,9,14)
16 ;;=Description:
17 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",1,11,0)
18 ;;=Environment Check Routine:
19 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",1,13,6)
20 ;;=Pre-Install Routine:
21 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",1,15,5)
22 ;;=Post-Install Routine:
23 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",2,0,27)
24 ;;=Edit a Build PAGE 3 OF 4
25 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",2,1,0)
26 ;;=Name:
27 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",2,3,27)
28 ;;=Build Components
29 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",4,0,27)
30 ;;=Edit a Build PAGE 2 OF 4
31 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",4,1,0)
32 ;;=Name:
33 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",4,3,27)
34 ;;=File List (Name or Number)
35 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",5,5,26)
36 ;;= Affects Record Merge
37 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",5,7,4)
38 ;;=File Affected:
39 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",5,9,4)
40 ;;=Name of Merge Routine:
41 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",5,12,24)
42 ;;=Record has Package Data
43 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",6,1,27)
44 ;;= Install Questions
45 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",6,2,6)
46 ;;=Name:
47 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",6,4,4)
48 ;;=DIR(0):
49 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",6,4,4,"A")
50 ;;=1;6;U
51 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",6,6,4)
52 ;;=DIR(A):
53 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",6,7,2)
54 ;;=DIR(A,#):
55 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",6,9,4)
56 ;;=DIR(B):
57 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",6,11,4)
58 ;;=DIR(?):
59 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",6,12,2)
60 ;;=DIR(?,#):
61 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",6,13,3)
62 ;;=DIR(??):
63 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",6,15,4)
64 ;;=M Code:
65 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",7,4,26)
66 ;;= DD Export Options
67 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",7,6,23)
68 ;;=File:
69 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",7,8,4)
70 ;;=Send Full or Partial DD...:
71 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",7,10,1)
72 ;;=Update the Data Dictionary: Send Security Code:
73 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",7,12,1)
74 ;;=Screen to Determine DD Update
75 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",7,15,7)
76 ;;=Data Comes With File...:
77 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",8,4,27)
78 ;;= Edit PACKAGE File
79 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",8,5,3)
80 ;;=Name:
81 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",8,8,12)
82 ;;=Primary Help Frame:
83 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",8,10,3)
84 ;;=Select Affects Record Merge:
85 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",8,12,9)
86 ;;=Alpha/Beta Testing...:
87 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",9,3,28)
88 ;;= Alpha/Beta Testing
89 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",9,5,10)
90 ;;=Installation Message:
91 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",9,7,3)
92 ;;=Address for Usage Reporting:
93 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",9,9,3)
94 ;;=Package Namespace or Prefix:
95 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",10,4,24)
96 ;;= Exclude Namespace or Prefix
97 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",11,5,26)
98 ;;= Data Dictionary Number
99 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",12,6,26)
100 ;;= Field Number
101 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",13,5,29)
102 ;;= Data Export Options
103 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",13,7,8)
104 ;;=Site's Data:
105 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",13,9,3)
106 ;;=Resolve Pointers: May User Override Data Update:
107 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",13,11,10)
108 ;;=Data List:
109 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",13,13,3)
110 ;;=Screen to Select Data
111 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",14,0,27)
112 ;;=Edit a Build PAGE 4 OF 4
113 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",14,1,0)
114 ;;=Name:
115 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",14,3,27)
116 ;;=Install Questions
117 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",14,14,4)
118 ;;=Package File Link...:
119 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",14,16,0)
120 ;;=Track Package Nationally:
121 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",15,1,26)
122 ;;= Install Questions
123 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",15,2,5)
124 ;;=Name:
125 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",15,4,3)
126 ;;=DIR(0):
127 ;;^UTILITY(U,$J,"DIST(.403,",11,"AZ","X",15,4,3,"A")
128 ;;=1;6;U
Note: See TracBrowser for help on using the repository browser.