| [613] | 1 | DINIT00D ; SFISC/TKW-DIALOG & LANGUAGE FILE INITS ; 3/30/99 10:41:48
|
|---|
| 2 | ;;22.0;VA FileMan;;Mar 30, 1999
|
|---|
| 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,1846,0)
|
|---|
| 7 | ;;=1846^1^y
|
|---|
| 8 | ;;^UTILITY(U,$J,.84,1846,1,0)
|
|---|
| 9 | ;;=^^1^1^2950317^^
|
|---|
| 10 | ;;^UTILITY(U,$J,.84,1846,1,1,0)
|
|---|
| 11 | ;;=A file or subfile must have only one string of fields associated with it.
|
|---|
| 12 | ;;^UTILITY(U,$J,.84,1846,2,0)
|
|---|
| 13 | ;;=^^1^1^2950317^^
|
|---|
| 14 | ;;^UTILITY(U,$J,.84,1846,2,1,0)
|
|---|
| 15 | ;;=File #|FILE| appears more than once in the import with different fields.
|
|---|
| 16 | ;;^UTILITY(U,$J,.84,1846,3,0)
|
|---|
| 17 | ;;=^.845^1^1
|
|---|
| 18 | ;;^UTILITY(U,$J,.84,1846,3,1,0)
|
|---|
| 19 | ;;=FILE^File or subfile number.
|
|---|
| 20 | ;;^UTILITY(U,$J,.84,1850,0)
|
|---|
| 21 | ;;=1850^1^^5
|
|---|
| 22 | ;;^UTILITY(U,$J,.84,1850,1,0)
|
|---|
| 23 | ;;=^^4^4^2960718^^
|
|---|
| 24 | ;;^UTILITY(U,$J,.84,1850,1,1,0)
|
|---|
| 25 | ;;=The device for printing the Import report was not properly specified.
|
|---|
| 26 | ;;^UTILITY(U,$J,.84,1850,1,2,0)
|
|---|
| 27 | ;;=This could be caused either by a user's response or by the
|
|---|
| 28 | ;;^UTILITY(U,$J,.84,1850,1,3,0)
|
|---|
| 29 | ;;=device specifications passed to the FILE^DDMP call. The problem
|
|---|
| 30 | ;;^UTILITY(U,$J,.84,1850,1,4,0)
|
|---|
| 31 | ;;=could involve either device or queuing instructions.
|
|---|
| 32 | ;;^UTILITY(U,$J,.84,1850,2,0)
|
|---|
| 33 | ;;=^^1^1^2960718^^
|
|---|
| 34 | ;;^UTILITY(U,$J,.84,1850,2,1,0)
|
|---|
| 35 | ;;=There is an error in device selection or queuing setup.
|
|---|
| 36 | ;;^UTILITY(U,$J,.84,1860,0)
|
|---|
| 37 | ;;=1860^1^^5
|
|---|
| 38 | ;;^UTILITY(U,$J,.84,1860,1,0)
|
|---|
| 39 | ;;=^^1^1^2960906^
|
|---|
| 40 | ;;^UTILITY(U,$J,.84,1860,1,1,0)
|
|---|
| 41 | ;;=The record being imported has no data.
|
|---|
| 42 | ;;^UTILITY(U,$J,.84,1860,2,0)
|
|---|
| 43 | ;;=^^1^1^2960906^
|
|---|
| 44 | ;;^UTILITY(U,$J,.84,1860,2,1,0)
|
|---|
| 45 | ;;=The record being imported has no data.
|
|---|
| 46 | ;;^UTILITY(U,$J,.84,1862,0)
|
|---|
| 47 | ;;=1862^1^^5
|
|---|
| 48 | ;;^UTILITY(U,$J,.84,1862,1,0)
|
|---|
| 49 | ;;=^^4^4^2960906^^
|
|---|
| 50 | ;;^UTILITY(U,$J,.84,1862,1,1,0)
|
|---|
| 51 | ;;=When parsing the imported record, more fields were found than expected.
|
|---|
| 52 | ;;^UTILITY(U,$J,.84,1862,1,2,0)
|
|---|
| 53 | ;;=There were either more delimiter-pieces than expected or the length of a
|
|---|
| 54 | ;;^UTILITY(U,$J,.84,1862,1,3,0)
|
|---|
| 55 | ;;=fixed length import was too long. This probably means that the incoming
|
|---|
| 56 | ;;^UTILITY(U,$J,.84,1862,1,4,0)
|
|---|
| 57 | ;;=file is corrupted.
|
|---|
| 58 | ;;^UTILITY(U,$J,.84,1862,2,0)
|
|---|
| 59 | ;;=^^1^1^2960906^^
|
|---|
| 60 | ;;^UTILITY(U,$J,.84,1862,2,1,0)
|
|---|
| 61 | ;;=There are more fields in the incoming record than expected.
|
|---|
| 62 | ;;^UTILITY(U,$J,.84,1870,0)
|
|---|
| 63 | ;;=1870^1^y^5
|
|---|
| 64 | ;;^UTILITY(U,$J,.84,1870,1,0)
|
|---|
| 65 | ;;=^^2^2^2960913^
|
|---|
| 66 | ;;^UTILITY(U,$J,.84,1870,1,1,0)
|
|---|
| 67 | ;;=A requested import template does not exist in the Import Template file
|
|---|
| 68 | ;;^UTILITY(U,$J,.84,1870,1,2,0)
|
|---|
| 69 | ;;=for the file being imported into.
|
|---|
| 70 | ;;^UTILITY(U,$J,.84,1870,2,0)
|
|---|
| 71 | ;;=^^1^1^2961002^^^
|
|---|
| 72 | ;;^UTILITY(U,$J,.84,1870,2,1,0)
|
|---|
| 73 | ;;=Import template |1| does not exist for File #|FILE|.
|
|---|
| 74 | ;;^UTILITY(U,$J,.84,1870,3,0)
|
|---|
| 75 | ;;=^.845^2^2
|
|---|
| 76 | ;;^UTILITY(U,$J,.84,1870,3,1,0)
|
|---|
| 77 | ;;=1^Template name.
|
|---|
| 78 | ;;^UTILITY(U,$J,.84,1870,3,2,0)
|
|---|
| 79 | ;;=FILE^File number.
|
|---|
| 80 | ;;^UTILITY(U,$J,.84,3000,0)
|
|---|
| 81 | ;;=3000^1^^5
|
|---|
| 82 | ;;^UTILITY(U,$J,.84,3000,1,0)
|
|---|
| 83 | ;;=^^1^1^2930721^
|
|---|
| 84 | ;;^UTILITY(U,$J,.84,3000,1,1,0)
|
|---|
| 85 | ;;=Initial call to ^DDS failed.
|
|---|
| 86 | ;;^UTILITY(U,$J,.84,3000,2,0)
|
|---|
| 87 | ;;=^^1^1^2931202^
|
|---|
| 88 | ;;^UTILITY(U,$J,.84,3000,2,1,0)
|
|---|
| 89 | ;;=THE FORM COULD NOT BE INVOKED.
|
|---|
| 90 | ;;^UTILITY(U,$J,.84,3002,0)
|
|---|
| 91 | ;;=3002^1^y^5
|
|---|
| 92 | ;;^UTILITY(U,$J,.84,3002,1,0)
|
|---|
| 93 | ;;=^^1^1^2931202^
|
|---|
| 94 | ;;^UTILITY(U,$J,.84,3002,1,1,0)
|
|---|
| 95 | ;;=An error was encountered during Form compilation.
|
|---|
| 96 | ;;^UTILITY(U,$J,.84,3002,2,0)
|
|---|
| 97 | ;;=^^1^1^2931202^^
|
|---|
| 98 | ;;^UTILITY(U,$J,.84,3002,2,1,0)
|
|---|
| 99 | ;;=THE FORM "|1|" COULD NOT BE COMPILED.
|
|---|
| 100 | ;;^UTILITY(U,$J,.84,3002,3,0)
|
|---|
| 101 | ;;=^.845^1^1
|
|---|
| 102 | ;;^UTILITY(U,$J,.84,3002,3,1,0)
|
|---|
| 103 | ;;=1^Form name
|
|---|
| 104 | ;;^UTILITY(U,$J,.84,3011,0)
|
|---|
| 105 | ;;=3011^1^y^5
|
|---|
| 106 | ;;^UTILITY(U,$J,.84,3011,1,0)
|
|---|
| 107 | ;;=^^1^1^2931201^
|
|---|
| 108 | ;;^UTILITY(U,$J,.84,3011,1,1,0)
|
|---|
| 109 | ;;=The specified field is missing or invalid.
|
|---|
| 110 | ;;^UTILITY(U,$J,.84,3011,2,0)
|
|---|
| 111 | ;;=^^1^1^2931201^
|
|---|
| 112 | ;;^UTILITY(U,$J,.84,3011,2,1,0)
|
|---|
| 113 | ;;=The |1| field of the |2| file is missing or invalid.
|
|---|
| 114 | ;;^UTILITY(U,$J,.84,3011,3,0)
|
|---|
| 115 | ;;=^.845^2^2
|
|---|
| 116 | ;;^UTILITY(U,$J,.84,3011,3,1,0)
|
|---|
| 117 | ;;=1^Field or subfield name
|
|---|
| 118 | ;;^UTILITY(U,$J,.84,3011,3,2,0)
|
|---|
| 119 | ;;=2^File name
|
|---|
| 120 | ;;^UTILITY(U,$J,.84,3012,0)
|
|---|
| 121 | ;;=3012^1^y^5
|
|---|
| 122 | ;;^UTILITY(U,$J,.84,3012,1,0)
|
|---|
| 123 | ;;=^^2^2^2931201^
|
|---|
| 124 | ;;^UTILITY(U,$J,.84,3012,1,1,0)
|
|---|
| 125 | ;;=The specified file or subfile does not exist; it is not present in the
|
|---|
| 126 | ;;^UTILITY(U,$J,.84,3012,1,2,0)
|
|---|
| 127 | ;;=data dictionary.
|
|---|
| 128 | ;;^UTILITY(U,$J,.84,3012,2,0)
|
|---|
| 129 | ;;=^^1^1^2931201^
|
|---|
| 130 | ;;^UTILITY(U,$J,.84,3012,2,1,0)
|
|---|
| 131 | ;;=File |1| does not exist.
|
|---|
| 132 | ;;^UTILITY(U,$J,.84,3012,3,0)
|
|---|
| 133 | ;;=^.845^1^1
|
|---|
| 134 | ;;^UTILITY(U,$J,.84,3012,3,1,0)
|
|---|
| 135 | ;;=1^File number or name
|
|---|
| 136 | ;;^UTILITY(U,$J,.84,3021,0)
|
|---|
| 137 | ;;=3021^1^y^5
|
|---|
| 138 | ;;^UTILITY(U,$J,.84,3021,1,0)
|
|---|
| 139 | ;;=^^1^1^2940811^^^
|
|---|
| 140 | ;;^UTILITY(U,$J,.84,3021,1,1,0)
|
|---|
| 141 | ;;=A lookup in to the Form file for the given form failed.
|
|---|
| 142 | ;;^UTILITY(U,$J,.84,3021,2,0)
|
|---|
| 143 | ;;=^^2^2^2940811^
|
|---|
| 144 | ;;^UTILITY(U,$J,.84,3021,2,1,0)
|
|---|
| 145 | ;;=Form |1| does not exist in the Form file, or DDSFILE is not the Primary
|
|---|
| 146 | ;;^UTILITY(U,$J,.84,3021,2,2,0)
|
|---|
| 147 | ;;=File of the form.
|
|---|
| 148 | ;;^UTILITY(U,$J,.84,3021,3,0)
|
|---|
| 149 | ;;=^.845^1^1
|
|---|
| 150 | ;;^UTILITY(U,$J,.84,3021,3,1,0)
|
|---|
| 151 | ;;=1^Form name
|
|---|
| 152 | ;;^UTILITY(U,$J,.84,3022,0)
|
|---|
| 153 | ;;=3022^1^y^5
|
|---|
| 154 | ;;^UTILITY(U,$J,.84,3022,1,0)
|
|---|
| 155 | ;;=^^1^1^2931130^^
|
|---|
| 156 | ;;^UTILITY(U,$J,.84,3022,1,1,0)
|
|---|
| 157 | ;;=There are no pages defined in the Page multiple of the given form.
|
|---|
| 158 | ;;^UTILITY(U,$J,.84,3022,2,0)
|
|---|
| 159 | ;;=^^1^1^2931130^^
|
|---|
| 160 | ;;^UTILITY(U,$J,.84,3022,2,1,0)
|
|---|
| 161 | ;;=Form |1| contains no pages.
|
|---|
| 162 | ;;^UTILITY(U,$J,.84,3022,3,0)
|
|---|
| 163 | ;;=^.845^1^1
|
|---|
| 164 | ;;^UTILITY(U,$J,.84,3022,3,1,0)
|
|---|
| 165 | ;;=1^Form name
|
|---|
| 166 | ;;^UTILITY(U,$J,.84,3023,0)
|
|---|
| 167 | ;;=3023^1^y^5
|
|---|
| 168 | ;;^UTILITY(U,$J,.84,3023,1,0)
|
|---|
| 169 | ;;=^^1^1^2931129^^
|
|---|
| 170 | ;;^UTILITY(U,$J,.84,3023,1,1,0)
|
|---|
| 171 | ;;=The given page was not found on the form.
|
|---|
| 172 | ;;^UTILITY(U,$J,.84,3023,2,0)
|
|---|
| 173 | ;;=^^1^1^2931129^^^
|
|---|
| 174 | ;;^UTILITY(U,$J,.84,3023,2,1,0)
|
|---|
| 175 | ;;=The form does not contain a page |1|.
|
|---|
| 176 | ;;^UTILITY(U,$J,.84,3023,3,0)
|
|---|
| 177 | ;;=^.845^1^1
|
|---|
| 178 | ;;^UTILITY(U,$J,.84,3023,3,1,0)
|
|---|
| 179 | ;;=1^Page name or number
|
|---|
| 180 | ;;^UTILITY(U,$J,.84,3031,0)
|
|---|
| 181 | ;;=3031^1^y^5
|
|---|
| 182 | ;;^UTILITY(U,$J,.84,3031,1,0)
|
|---|
| 183 | ;;=^^1^1^2931124^
|
|---|
| 184 | ;;^UTILITY(U,$J,.84,3031,1,1,0)
|
|---|
| 185 | ;;=The call to the specified ScreenMan utility failed.
|
|---|
| 186 | ;;^UTILITY(U,$J,.84,3031,2,0)
|
|---|
| 187 | ;;=^^1^1^2931124^
|
|---|
| 188 | ;;^UTILITY(U,$J,.84,3031,2,1,0)
|
|---|
| 189 | ;;=NOTE: The programmer call to the |1| ScreenMan utility failed.
|
|---|
| 190 | ;;^UTILITY(U,$J,.84,3031,3,0)
|
|---|
| 191 | ;;=^.845^1^1
|
|---|
| 192 | ;;^UTILITY(U,$J,.84,3031,3,1,0)
|
|---|
| 193 | ;;=1^ScreenMan utility entry point.
|
|---|
| 194 | ;;^UTILITY(U,$J,.84,3041,0)
|
|---|
| 195 | ;;=3041^1^y^5
|
|---|
| 196 | ;;^UTILITY(U,$J,.84,3041,1,0)
|
|---|
| 197 | ;;=^^1^1^2931130^^
|
|---|
| 198 | ;;^UTILITY(U,$J,.84,3041,1,1,0)
|
|---|
| 199 | ;;=Errors were encountered while attempting to load the page.
|
|---|
| 200 | ;;^UTILITY(U,$J,.84,3041,2,0)
|
|---|
| 201 | ;;=^^1^1^2931130^
|
|---|
| 202 | ;;^UTILITY(U,$J,.84,3041,2,1,0)
|
|---|
| 203 | ;;=Page |1| (|2|) could not be loaded.
|
|---|
| 204 | ;;^UTILITY(U,$J,.84,3041,3,0)
|
|---|
| 205 | ;;=^.845^2^2
|
|---|
| 206 | ;;^UTILITY(U,$J,.84,3041,3,1,0)
|
|---|
| 207 | ;;=1^Page number
|
|---|
| 208 | ;;^UTILITY(U,$J,.84,3041,3,2,0)
|
|---|
| 209 | ;;=2^Page name
|
|---|
| 210 | ;;^UTILITY(U,$J,.84,3051,0)
|
|---|
| 211 | ;;=3051^1^y^5
|
|---|
