Changes between Version 14 and Version 15 of HL7TablesForVistA
- Timestamp:
- Nov 18, 2011, 3:23:33 PM (15 years ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
HL7TablesForVistA
v14 v15 19 19 == Data Dictionary for File 260 == 20 20 21 {{{ 22 STANDARD DATA DICTIONARY #260 -- VW HL7 TABLES FILE 23 AUG 17,2011@23:00:56 PAGE 1 24 STORED IN ^VWLEX(260, (8671 ENTRIES) SITE: Vista-Office EHR UCI: EHR,EHR 21 STANDARD DATA DICTIONARY #260 -- VW HL7 TABLES FILE NOV 18,2011@15:16:01 PAGE 1 22 STORED IN ^VWLEX(260, (9663 ENTRIES) SITE: Vista-Office EHR UCI: EHR,EHR 25 23 26 24 DATA NAME GLOBAL DATA 27 25 ELEMENT TITLE LOCATION TYPE 28 ------------------------------------------------------------------------------- 29 30 31 IDENTIFIED BY: TABLE (#.03), NAME (#.04)26 ----------------------------------------------------------------------------------------------------------------------------------- 27 28 29 IDENTIFIED BY: HL7 TABLE (#.03), NAME (#.04) 32 30 33 31 POINTED TO BY: ISO LANGUAGE CODE field (#250001) of the LANGUAGE File (#.85) 34 IDENTIFIER TYPE CODE field (#.02) of the PATIENT IDENTIFIER 35 sub-field (#2.000999999) of the PATIENT File (#2) 36 ASSIGNING AUTHORITY field (#.04) of the PATIENT IDENTIFIER 37 sub-field (#2.000999999) of the PATIENT File (#2) 38 ASSIGNING JURISDICTION field (#.1) of the PATIENT IDENTIFIER 39 sub-field (#2.000999999) of the PATIENT File (#2) 40 ASSIGNING AGENCY OR DEPARTMENT field (#.11) of the PATIENT 41 IDENTIFIER sub-field (#2.000999999) of the PATIENT File (#2) 42 TYPE OF IDENTIFIER field (#250001) of the IDENTIFICATION FORMAT 43 File (#8.2) 44 VW HL7 SPECIMEN TYPE field (#250002) of the TOPOGRAPHY FIELD 45 File (#61) 32 IDENTIFIER TYPE CODE field (#.02) of the PATIENT IDENTIFIER sub-field (#2.000999999) of the PATIENT File (#2) 33 ASSIGNING AUTHORITY field (#.04) of the PATIENT IDENTIFIER sub-field (#2.000999999) of the PATIENT File (#2) 34 ASSIGNING JURISDICTION field (#.1) of the PATIENT IDENTIFIER sub-field (#2.000999999) of the PATIENT File (#2) 35 ASSIGNING AGENCY OR DEPARTMENT field (#.11) of the PATIENT IDENTIFIER sub-field (#2.000999999) of the PATIENT File 36 (#2) 37 TYPE OF IDENTIFIER field (#250001) of the IDENTIFICATION FORMAT File (#8.2) 38 VW HL7 SPECIMEN TYPE field (#250002) of the TOPOGRAPHY FIELD File (#61) 46 39 REPLACEMENT TERM field (#.07) of the VW HL7 TABLES File (#260) 47 CODE SYSTEM field (#.04) of the VERSION sub-field (#260.001) of 48 the VW HL7 TABLES File (#260) 49 RELATED COUNTRY CODE field (#250001) of the COUNTRY CODE File 50 (#779.004) 51 VW HL7 CVX CODE field (#250001) of the IMMUNIZATION File 52 (#9999999.14) 40 CODE SYSTEM field (#.04) of the VERSION sub-field (#260.001) of the VW HL7 TABLES File (#260) 41 RELATED COUNTRY CODE field (#250001) of the COUNTRY CODE File (#779.004) 42 VW HL7 CVX CODE field (#250001) of the IMMUNIZATION File (#9999999.14) 53 43 54 44 … … 56 46 REFERENCED BY: TERM(B) 57 47 58 INDEXED BY: CODE ID & CODE SYSTEM (AC), TABLE VERSION & CODE SYSTEM & CODE 59 ID (AD), TABLE VERSION & CODE SYSTEM & CODE ID (AE), APPLICATION60 GROUP & APPLICATION USE (AG), TABLE & TERM STATUS (AH), TERM61 ( C), NAME (D), NAME (E), TABLE (H)48 INDEXED BY: CODE ID & CODE SYSTEM (AC), TABLE VERSION & CODE SYSTEM & CODE ID (AD), TABLE VERSION & CODE SYSTEM NAME & CODE ID 49 (AE), TABLE VERSION & CODE SYSTEM NAME & CODE ID (AE1), APPLICATION GROUP & APPLICATION USE (AG), HL7 TABLE & TERM 50 STATUS (AH), TERM (C), CODE SYSTEM NAME & CODE ID (CC), ULMS CUI (CUI), NAME (D), NAME (E), TABLE NAME (F), CODE ID 51 (G), HL7 TABLE (H), NON HL7 TABLE (HH) 62 52 63 53 … … 66 56 INPUT TRANSFORM: K:+X'=X!(X>1000000)!(X<1)!(X?.E1"."1.N) X 67 57 LAST EDITED: MAY 29, 2011 68 HELP-PROMPT: Type a number between 1 and 1000000, 0 decimal 69 digits. 70 TECHNICAL DESCR: Sequence number (#.001) defined to insure that 71 FileMan when installing/updating this file 72 loads entries based on the internal entry 73 number. 58 HELP-PROMPT: Type a number between 1 and 1000000, 0 decimal digits. 59 TECHNICAL DESCR: Sequence number (#.001) defined to insure that FileMan when installing/updating this file loads 60 entries based on the internal entry number. 74 61 75 62 … … 85 72 FIELD INDEX: C (#889) REGULAR IR LOOKUP & SORTING 86 73 Short Descr: Uppercase version of #.01 field 87 Description: Uppercase version of #.01 field to allow 88 lookups using uppercase when #.01 field is 89 mixed/lower case. 74 Description: Uppercase version of #.01 field to allow lookups using uppercase when #.01 field is mixed/lower 75 case. 90 76 Set Logic: S ^VWLEX(260,"C",$E(X,1,30),DA)="" 91 77 Kill Logic: K ^VWLEX(260,"C",$E(X,1,30),DA) 92 78 Whole Kill: K ^VWLEX(260,"C") 93 X(1): TERM (260,.01) (Subscr 1) (Len 30) 94 (forwards) 79 X(1): TERM (260,.01) (Subscr 1) (Len 30) (forwards) 95 80 Transform (Storage): S X=$$UP^XLFSTR(X) 96 81 Transform (Lookup): S X=$$UP^XLFSTR(X) … … 103 88 LAST EDITED: MAR 27, 2011 104 89 105 260,.03 TABLE0;3 FREE TEXT90 260,.03 HL7 TABLE 0;3 FREE TEXT 106 91 107 92 INPUT TRANSFORM: K:$L(X)>7!($L(X)<7)!'(X?1"HL7"4N) X 108 LAST EDITED: MAR 27, 201193 LAST EDITED: SEP 13, 2011 109 94 HELP-PROMPT: Answer must be 7 characters in length 110 DESCRIPTION: Indicates the HL7 table that is assocaited with 111 this term. The HL7 table desgination is in the 95 DESCRIPTION: Indicates the HL7 table that is associated with this term. The HL7 table desgination is in the 112 96 form HL7nnnn. 113 97 114 98 FIELD INDEX: H (#892) REGULAR IR LOOKUP & SORTING 115 99 Short Descr: Index of entries by HL7 table designation. 116 Description: Index of entries cross-referenced by the 117 assigned HL7 table designation. 100 Description: Index of entries cross-referenced by the assigned HL7 table designation. 118 101 Set Logic: S ^VWLEX(260,"H",$E(X,1,30),DA)="" 119 102 Kill Logic: K ^VWLEX(260,"H",$E(X,1,30),DA) 120 103 Whole Kill: K ^VWLEX(260,"H") 121 X(1): TABLE (260,.03) (Subscr 1) (Len 30) 122 (forwards) 104 X(1): HL7 TABLE (260,.03) (Subscr 1) (Len 30) (forwards) 123 105 124 106 RECORD INDEXES: AH (#888) 107 108 260,.031 TABLE NAME .1;1 FREE TEXT 109 110 INPUT TRANSFORM: K:$L(X)>45!($L(X)<1) X 111 LAST EDITED: AUG 22, 2011 112 HELP-PROMPT: Answer must be 1-45 characters in length. 113 DESCRIPTION: 114 Human readable name of the table. 115 116 FIELD INDEX: F (#896) REGULAR IR LOOKUP & SORTING 117 Short Descr: Whole file index on Table Name 118 Description: Index to cross reference entries by formal name of the table. 119 Set Logic: S ^VWLEX(260,"F",$E(X,1,45),DA)="" 120 Kill Logic: K ^VWLEX(260,"F",$E(X,1,45),DA) 121 Whole Kill: K ^VWLEX(260,"F") 122 X(1): TABLE NAME (260,.031) (Subscr 1) (Len 45) (forwards) 123 Transform (Storage): S X=$$UP^XLFSTR(X) 124 Transform (Lookup): S X=$$UP^XLFSTR(X) 125 126 127 260,.032 NON HL7 TABLE .1;2 FREE TEXT 128 129 INPUT TRANSFORM: K:$L(X)>15!($L(X)<1) X 130 LAST EDITED: SEP 13, 2011 131 HELP-PROMPT: Answer must be 1-15 characters in length. 132 DESCRIPTION: 133 Designation of the table when it's not part of the HL7 standard. 134 135 FIELD INDEX: HH (#898) REGULAR IR LOOKUP & SORTING 136 Short Descr: Index of entries by Non HL7 table designation. 137 Description: Index of entries cross-referenced by the assigned Non HL7 table designation when the table is not a 138 standard HL7 table. 139 Set Logic: S ^VWLEX(260,"HH",$E(X,1,30),DA)="" 140 Kill Logic: K ^VWLEX(260,"HH",$E(X,1,30),DA) 141 Whole Kill: K ^VWLEX(260,"HH") 142 X(1): NON HL7 TABLE (260,.032) (Subscr 1) (Len 30) (forwards) 143 125 144 126 145 260,.04 NAME 0;4 FREE TEXT … … 131 150 FIELD INDEX: D (#890) REGULAR IR LOOKUP & SORTING 132 151 Short Descr: Lookup on NAME field. 133 Description: Whole file cross-reference to allow lookups on 134 the NAME field (#.04). 152 Description: Whole file cross-reference to allow lookups on the NAME field (#.04). 135 153 Set Logic: S ^VWLEX(260,"D",$E(X,1,100),DA)="" 136 154 Kill Logic: K ^VWLEX(260,"D",$E(X,1,100),DA) 137 155 Whole Kill: K ^VWLEX(260,"D") 138 X(1): NAME (260,.04) (Subscr 1) (Len 100) 139 (forwards) 156 X(1): NAME (260,.04) (Subscr 1) (Len 100) (forwards) 140 157 141 158 FIELD INDEX: E (#891) REGULAR IR LOOKUP & SORTING 142 159 Short Descr: Uppercase version of NAME field (#.04) 143 Description: Uppercase version of #.04 field to allow 144 lookups using uppercase when #.04 field is 145 mixed/lower case. 160 Description: Uppercase version of #.04 field to allow lookups using uppercase when #.04 field is mixed/lower 161 case. 146 162 Set Logic: S ^VWLEX(260,"E",$E(X,1,100),DA)="" 147 163 Kill Logic: K ^VWLEX(260,"E",$E(X,1,100),DA) 148 164 Whole Kill: K ^VWLEX(260,"E") 149 X(1): NAME (260,.04) (Subscr 1) (Len 100) 150 (forwards) 165 X(1): NAME (260,.04) (Subscr 1) (Len 100) (forwards) 151 166 Transform (Storage): S X=$$UP^XLFSTR(X) 152 167 Transform (Lookup): S X=$$UP^XLFSTR(X) … … 158 173 LAST EDITED: FEB 03, 2011 159 174 HELP-PROMPT: Answer must be 3-64 characters in length. 160 DESCRIPTION: Indicates OID which explicitly identifies an 161 HL7 Version 2.x Table, as published in the HL7 162 Version 2 series of standards. 175 DESCRIPTION: Indicates OID which explicitly identifies an HL7 Version 2.x Table, as published in the HL7 Version 176 2 series of standards. 163 177 164 178 … … 171 185 LAST EDITED: MAY 29, 2011 172 186 HELP-PROMPT: Enter the status of this term. 173 DESCRIPTION: Indicates the status of this term and it's use 174 in messaging. 187 DESCRIPTION: Indicates the status of this term and it's use in messaging. 175 188 176 CODE: 0 will be used for terms currently 177 being used. 189 CODE: 0 will be used for terms currently being used. 178 190 179 CODE: 1 will not be used for current terms 180 however they are still used 191 CODE: 1 will not be used for current terms however they are still used 181 192 for historical purposes. 182 193 183 CODE: 2 will be used for terms that have 184 been deprecated and should no 185 longer be assigned. Sometimes they 186 have a new term issued 187 which replaces the deprecated term. 188 194 CODE: 2 will be used for terms that have been deprecated and should no 195 longer be assigned. Sometimes they have a new term issued 196 which replaces the deprecated term. 189 197 190 198 RECORD INDEXES: AH (#888) … … 192 200 260,.07 REPLACEMENT TERM 0;7 POINTER TO VW HL7 TABLES FILE (#260) 193 201 194 INPUT TRANSFORM: S DIC("S")="I $P(^VWLEX(260,Y,0),U,6)<1" D ^DIC 195 K DIC S DIC=$G(DIE),X=+Y K:Y<0 X 202 INPUT TRANSFORM: S DIC("S")="I $P(^VWLEX(260,Y,0),U,6)<1" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X 196 203 LAST EDITED: MAR 29, 2011 197 HELP-PROMPT: Enter the term which replaces this term in 198 current usage. 199 DESCRIPTION: Specifies the term which has replaced the 200 deprecated term. 204 HELP-PROMPT: Enter the term which replaces this term in current usage. 205 DESCRIPTION: 206 Specifies the term which has replaced the deprecated term. 201 207 202 208 SCREEN: S DIC("S")="I $P(^VWLEX(260,Y,0),U,6)<1" … … 208 214 '1' FOR STANDARD; 209 215 LAST EDITED: MAR 29, 2011 210 HELP-PROMPT: A term has a status of either standard or 211 locally added. 212 DESCRIPTION: Terms that are distributed with the file and/or 213 centrally maintained have a status of 214 "standard". Terms that are added for local 215 purposes that are not standard will have a 216 status of "local". 216 HELP-PROMPT: A term has a status of either standard or locally added. 217 DESCRIPTION: Terms that are distributed with the file and/or centrally maintained have a status of "standard". 218 Terms that are added for local purposes that are not standard will have a status of "local". 217 219 218 220 … … 220 222 221 223 222 260,1 VERSION 1;0 Multiple #260.001 223 (Add New Entry without Asking) 224 260,1 VERSION 1;0 Multiple #260.001 (Add New Entry without Asking) 224 225 225 226 LAST EDITED: MAR 19, 2011 … … 228 229 229 230 INPUT TRANSFORM: K:$L(X)>10!($L(X)<1) X 230 LAST EDITED: MAY 29, 2011231 LAST EDITED: SEP 13, 2011 231 232 HELP-PROMPT: Answer must be 1-10 characters in length 232 233 CROSS-REFERENCE: 260.001^B 233 1)= S ^VWLEX(260,DA(1),1,"B",$E(X,1,30),DA)=" 234 " 235 234 1)= S ^VWLEX(260,DA(1),1,"B",$E(X,1,30),DA)="" 236 235 2)= K ^VWLEX(260,DA(1),1,"B",$E(X,1,30),DA) 237 236 238 RECORD INDEXES: AD (#885) (WHOLE FILE #260), AE (#886) 239 (WHOLE FILE #260) 237 RECORD INDEXES: AD (#885) (WHOLE FILE #260), AE (#886) (WHOLE FILE #260), AE1 (#893) (WHOLE FILE #260) 240 238 241 239 260.001,.02 CODE ID 0;2 FREE TEXT 242 240 243 241 INPUT TRANSFORM: K:$L(X)>15!($L(X)<1) X 244 LAST EDITED: MAY 29, 2011242 LAST EDITED: OCT 25, 2011 245 243 HELP-PROMPT: Answer must be 1-15 characters in length 246 RECORD INDEXES: AC (#884) (WHOLE FILE #260), AD (#885) 247 (WHOLE FILE #260), AE (#886) (WHOLE FILE 248 #260) 244 FIELD INDEX: G (#897) REGULAR IR LOOKUP & SORTING WHOLE FILE (#260) 245 Short Descr: Whole file index on code id. 246 Description: Whole file cross reference to look up an entry by it's code id. 247 Set Logic: S ^VWLEX(260,"G",$E(X,1,30),DA(1),DA)="" 248 Kill Logic: K ^VWLEX(260,"G",$E(X,1,30),DA(1),DA) 249 Whole Kill: K ^VWLEX(260,"G") 250 X(1): CODE ID (260.001,.02) (Subscr 1) (Len 30) (forwards) 251 252 RECORD INDEXES: AC (#884) (WHOLE FILE #260), AD (#885) (WHOLE FILE #260), AE (#886) (WHOLE FILE #260), AE1 (#893) 253 (WHOLE FILE #260), CC (#894) (WHOLE FILE #260) 249 254 250 255 260.001,.03 CODE TEXT 0;3 FREE TEXT … … 256 261 260.001,.04 CODE SYSTEM 0;4 POINTER TO VW HL7 TABLES FILE (#260) 257 262 258 INPUT TRANSFORM:S DIC("S")="I $P(^VWLEX(260,Y,0),U,3)=""HL70396 259 """ D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X 260 LAST EDITED: MAY 29, 2011 261 HELP-PROMPT: Select the coding system this code is a member. 262 SCREEN: S DIC("S")="I $P(^VWLEX(260,Y,0),U,3)=""HL70396 263 """ 264 EXPLANATION: Only select entries that represent name of codi 265 ng systems 266 RECORD INDEXES: AC (#884) (WHOLE FILE #260), AD (#885) 267 (WHOLE FILE #260), AE (#886) (WHOLE FILE #260) 268 269 260.001,.05 CODE SYSTEM NAME 0;5 FREE TEXT 270 271 INPUT TRANSFORM:K:$L(X)>20!($L(X)<1) X 272 LAST EDITED: MAR 19, 2011 273 HELP-PROMPT: Answer must be 1-20 characters in length 274 275 260.001,.06 CODE SYSTEM OID 0;6 FREE TEXT 276 277 INPUT TRANSFORM:K:$L(X)>64!($L(X)<3) X 278 LAST EDITED: FEB 03, 2011 279 HELP-PROMPT: Answer must be 3-64 characters in length 280 281 260.001,.07 CODE STATUS 0;7 SET 282 283 '0' FOR ACTIVE; 284 '1' FOR INACTIVE; 285 '2' FOR DEPRECATED; 286 '3' FOR NEVER USED; 287 LAST EDITED: MAY 29, 2011 288 DESCRIPTION: Indicates the status of this code and it's use 289 in messaging. 290 291 CODE: 0 will be used for codes currently 292 being used. 293 294 CODE: 1 will not be used for current codes 295 however they are still used 296 for historical purposes. 297 298 CODE: 2 will be used for codes that have 299 been deprecated and should no 300 longer be assigned. Sometimes they 301 have a new code issued 302 which replaces the deprecated term. 303 304 305 306 260.001,.08 EFFECTIVE DATE 0;8 DATE 307 308 INPUT TRANSFORM:S %DT="E" D ^%DT S X=Y K:X<1 X 309 LAST EDITED: MAR 18, 2011 310 HELP-PROMPT: (No range limit on date) 311 DESCRIPTION: The date this code was first active/effective 312 if applicable. 313 314 315 260.001,.09 EXPIRATION DATE 0;9 DATE 316 317 INPUT TRANSFORM:S %DT="E" D ^%DT S X=Y K:X<1 X 318 LAST EDITED: MAR 18, 2011 319 HELP-PROMPT: (No range limit on date) 320 DESCRIPTION: The date this code was no longer valid 321 active/effective if applicable. 322 323 324 260.001,.1 CHECK DIGIT SCHEME 0;10 SET 325 326 '1' FOR ISO; 327 '2' FOR M10; 328 '3' FOR M11; 329 '4' FOR NPI; 330 '5' FOR BCV; 331 LAST EDITED: MAR 18, 2011 332 HELP-PROMPT: Enter the code identifying the check digit 333 scheme employed. 334 DESCRIPTION: Contains the code identifying the check digit 335 scheme employed. 336 337 TECHNICAL DESCR: HL7 Table 0061 - Check digit scheme 338 339 Value Description 340 Comment 341 BCV Bank Card Validation Number A 342 non-embossed number included on 343 bank 344 cards and used to validate 345 346 authenticity of the card and the 347 person 348 presenting the card 349 NPI Check digit algorithm in the 350 US National Provider Identifier 351 ISO ISO 7064: 1983 352 M10 Mod 10 algorithm 353 M11 Mod 11 algorithm 354 355 356 260.001,.11 CODE SYSTEM VERSION 1;1 FREE TEXT 357 358 INPUT TRANSFORM:K:$L(X)>20!($L(X)<1) X 359 LAST EDITED: MAR 19, 2011 360 HELP-PROMPT: Answer must be 1-20 characters in length 361 DESCRIPTION: When the code refers to a user defined or other 362 code system then the version of the code system 363 is recorded here. 364 365 This field is different from the table version 366 which usually refers to the version of the HL7 367 standard which this entry supports. 368 369 Example is HL7 table 0203 (IDENTIFIER TYPE) has 370 a user defined code issued by CDC for Org 371 Membership. This code has a version 20100308. 372 373 Concept Code.......: PHC40 374 Concept Name.......: Org Membership 375 Code System OID....: 2.16.840.1.114222.4.5.274 376 Code System Name...: PHIN VS (CDC Local Coding 377 System) 378 Code System Code...: PH_PHINVS_CDC 379 Code System Version: 20100308 380 HL70396 Table Code.: CDCPHINVS 381 382 383 260.001,.12 STATUS DATE 1;2 DATE 384 385 INPUT TRANSFORM:S %DT="E" D ^%DT S X=Y K:2500101>X X 386 LAST EDITED: MAY 29, 2011 387 HELP-PROMPT: Type a date not earlier than JAN 01, 1950. 263 INPUT TRANSFORM: S DIC("S")="I $P(^VWLEX(260,Y,0),U,3)=""HL70396""" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X 264 LAST EDITED: OCT 25, 2011 265 HELP-PROMPT: Select the coding system this code is a member. 266 SCREEN: S DIC("S")="I $P(^VWLEX(260,Y,0),U,3)=""HL70396""" 267 EXPLANATION: Only select entries that represent name of coding systems 268 RECORD INDEXES: AC (#884) (WHOLE FILE #260), AD (#885) (WHOLE FILE #260) 269 270 260.001,.05 CODE SYSTEM NAME 0;5 FREE TEXT 271 272 INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X 273 LAST EDITED: OCT 25, 2011 274 HELP-PROMPT: Answer must be 1-20 characters in length 275 RECORD INDEXES: AE (#886) (WHOLE FILE #260), AE1 (#893) (WHOLE FILE #260), CC (#894) (WHOLE FILE #260) 276 277 260.001,.06 CODE SYSTEM OID 0;6 FREE TEXT 278 279 INPUT TRANSFORM: K:$L(X)>64!($L(X)<3) X 280 LAST EDITED: FEB 03, 2011 281 HELP-PROMPT: Answer must be 3-64 characters in length 282 283 260.001,.07 CODE STATUS 0;7 SET 284 285 '0' FOR ACTIVE; 286 '1' FOR INACTIVE; 287 '2' FOR DEPRECATED; 288 '3' FOR NEVER USED; 289 LAST EDITED: MAY 29, 2011 290 DESCRIPTION: Indicates the status of this code and it's use in messaging. 291 292 CODE: 0 will be used for codes currently being used. 293 294 CODE: 1 will not be used for current codes however they are still used 295 for historical purposes. 296 297 CODE: 2 will be used for codes that have been deprecated and should no 298 longer be assigned. Sometimes they have a new code issued 299 which replaces the deprecated term. 300 301 302 260.001,.08 EFFECTIVE DATE 0;8 DATE 303 304 INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:X<1 X 305 LAST EDITED: MAR 18, 2011 306 HELP-PROMPT: (No range limit on date) 388 307 DESCRIPTION: 389 This is the date of this code version 308 The date this code was first active/effective if applicable. 309 310 311 260.001,.09 EXPIRATION DATE 0;9 DATE 312 313 INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:X<1 X 314 LAST EDITED: MAR 18, 2011 315 HELP-PROMPT: (No range limit on date) 316 DESCRIPTION: 317 The date this code was no longer valid active/effective if applicable. 318 319 320 260.001,.1 CHECK DIGIT SCHEME 0;10 SET 321 322 '1' FOR ISO; 323 '2' FOR M10; 324 '3' FOR M11; 325 '4' FOR NPI; 326 '5' FOR BCV; 327 LAST EDITED: MAR 18, 2011 328 HELP-PROMPT: Enter the code identifying the check digit scheme employed. 329 DESCRIPTION: 330 Contains the code identifying the check digit scheme employed. 331 332 TECHNICAL DESCR: HL7 Table 0061 - Check digit scheme 333 334 Value Description Comment 335 BCV Bank Card Validation Number A non-embossed number included on 336 bank cards and used to validate 337 authenticity of the card and the 338 person presenting the card 339 NPI Check digit algorithm in the 340 US National Provider Identifier 341 ISO ISO 7064: 1983 342 M10 Mod 10 algorithm 343 M11 Mod 11 algorithm 344 345 346 260.001,.11 CODE SYSTEM VERSION 1;1 FREE TEXT 347 348 INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X 349 LAST EDITED: MAR 19, 2011 350 HELP-PROMPT: Answer must be 1-20 characters in length 351 DESCRIPTION: When the code refers to a user defined or other code system then the version of the code system 352 is recorded here. 353