| 1 | IBDECLN2 ;ALB/AAS - Clean up Data Qualifiers and Package interfaces ; 23-JUN-97
 | 
|---|
| 2 |  ;;3.0;AUTOMATED INFO COLLECTION SYS;**14,36**;APR 24, 1997
 | 
|---|
| 3 |  ;
 | 
|---|
| 4 |  ; -- This routine contains critical data for Package Interface File
 | 
|---|
| 5 |  ;    that is used in formatting the data for transmission to scanning
 | 
|---|
| 6 |  ;    
 | 
|---|
| 7 |  ;    Format
 | 
|---|
| 8 |  ;       Line 1, Package Interface Node:  File 357.6   (node,piece)
 | 
|---|
| 9 |  ;               p1: Package Interface Name            (0;1)
 | 
|---|
| 10 |  ;               p2: PCE Interface Node                (12;1)
 | 
|---|
| 11 |  ;               p3: Value Piece                       (12;2)
 | 
|---|
| 12 |  ;               p4: Narrative Piece                   (12;3)
 | 
|---|
| 13 |  ;               p5: Header Piece                      (12;4)
 | 
|---|
| 14 |  ;               p6: Qualifier Piece                   (12;5)
 | 
|---|
| 15 |  ;               p7: Quantity Piece                    (12;6)
 | 
|---|
| 16 |  ;       Subsequent Lines, for data qualifiers (357.631)
 | 
|---|
| 17 |  ;               p1: Allowable Qualifier Name          (0;1)
 | 
|---|
| 18 |  ;               p3: Independent Mapping               (0;3)
 | 
|---|
| 19 |  ;               p4: PCE Interface Node                (0;4)
 | 
|---|
| 20 |  ;               p5: Value Piece                       (0;5)
 | 
|---|
| 21 |  ;               p7: Header Piece                      (0;7)
 | 
|---|
| 22 |  ;               p8: Qualifier Piece                   (0;8)
 | 
|---|
| 23 |  ;               
 | 
|---|
| 24 | OUTPUT ;;
 | 
|---|
| 25 | PROC ;;INPUT PROCEDURE CODE (CPT4):PROCEDURE^1^6^7^3^2
 | 
|---|
| 26 |  ;;+PRIMARY:;IBD(357.98,^^0
 | 
|---|
| 27 |  ;;+SECONDARY:;IBD(357.98,^^0
 | 
|---|
| 28 |  ;;~~~
 | 
|---|
| 29 | PROV ;;INPUT PROVIDER:ENCOUNTER^4^^^15
 | 
|---|
| 30 |  ;;+PRIMARY:;IBD(357.98,^^0
 | 
|---|
| 31 |  ;;+SECONDARY:;IBD(357.98,^^0
 | 
|---|
| 32 |  ;;~~~
 | 
|---|
| 33 | PROB ;;GMP INPUT CLINIC COMMON PROBLEMS:DIAGNOSIS/PROBLEM^3^13^14^2
 | 
|---|
| 34 |  ;;+PRIMARY:;IBD(357.98,^^1^^^^^2
 | 
|---|
| 35 |  ;;+SECONDARY:;IBD(357.98,^^1^^^^^2
 | 
|---|
| 36 |  ;;+SERVICE CONNECTED:;IBD(357.98,^^1^^^^^9
 | 
|---|
| 37 |  ;;+AGENT ORANGE RELATED:;IBD(357.98,^^1^^^^^10
 | 
|---|
| 38 |  ;;+IONIZING RADIATION RELATED:;IBD(357.98,^^1^^^^^11
 | 
|---|
| 39 |  ;;+ENVIRONMENTAL CONTAMINANTS RELATED:;IBD(357.98,^^1^^^^^12
 | 
|---|
| 40 |  ;;+ADD TO PROBLEM LIST:;IBD(357.98,^^1^^^^^5
 | 
|---|
| 41 |  ;;+ACTIVE:;IBD(357.98,^^1^^^^^6
 | 
|---|
| 42 |  ;;+INACTIVE:;IBD(357.98,^^1^^^^^6
 | 
|---|
| 43 |  ;;+NON-SERVICE CONNECTED:;IBD(357.98,^^1^^^^^9
 | 
|---|
| 44 |  ;;~~~
 | 
|---|
| 45 | DIAG ;;INPUT DIAGNOSIS CODE (ICD9):DIAGNOSIS/PROBLEM^1^13^14^2
 | 
|---|
| 46 |  ;;+PRIMARY:;IBD(357.98,^^1^^^^^2
 | 
|---|
| 47 |  ;;+SECONDARY:;IBD(357.98,^^1^^^^^2
 | 
|---|
| 48 |  ;;+SERVICE CONNECTED:;IBD(357.98,^^1^^^^^9
 | 
|---|
| 49 |  ;;+ICD-9 DIAGNOSIS CODE:;IBD(359.1,^^0
 | 
|---|
| 50 |  ;;+AGENT ORANGE RELATED:;IBD(357.98,^^1^^^^^10
 | 
|---|
| 51 |  ;;+IONIZING RADIATION RELATED:;IBD(357.98,^^1^^^^^11
 | 
|---|
| 52 |  ;;+ENVIRONMENTAL CONTAMINANTS RELATED:;IBD(357.98,^^1^^^^^12
 | 
|---|
| 53 |  ;;+ADD TO PROBLEM LIST:;IBD(357.98,^^1^^^^^5
 | 
|---|
| 54 |  ;;+ACTIVE:;IBD(357.98,^^1^^^^^6
 | 
|---|
| 55 |  ;;+INACTIVE:;IBD(357.98,^^1^^^^^6
 | 
|---|
| 56 |  ;;~~~
 | 
|---|
| 57 |  ;;PX INPUT CHECKOUT TIME:ENCOUNTER^14
 | 
|---|
| 58 |  ;;+CHECKOUT DATE@TIME:;IBD(359.1,^^0
 | 
|---|
| 59 |  ;;+CHECKOUT TIME - DATE ASSUMED;IBD(359.1,^^0
 | 
|---|
| 60 |  ;;~~~
 | 
|---|
| 61 |  ;;PX INPUT EDUCATION TOPICS:PATIENT ED^1^^^2
 | 
|---|
| 62 |  ;;+POOR UNDERSTANDING:;IBD(357.98,^^0
 | 
|---|
| 63 |  ;;+FAIR UNDERSTANDING:;IBD(357.98,^^0
 | 
|---|
| 64 |  ;;+GOOD UNDERSTANDING:;IBD(357.98,^^0
 | 
|---|
| 65 |  ;;+UNDERSTANDING NOT ASSESSED:;IBD(357.98,^^0
 | 
|---|
| 66 |  ;;+PATIENT ED REFUSED:;IBD(357.98,^^0
 | 
|---|
| 67 |  ;;~~~
 | 
|---|
| 68 |  ;;PX INPUT EXAMS:EXAM^1^^^2
 | 
|---|
| 69 |  ;;+ABNORMAL RESULT:;IBD(357.98,^^0
 | 
|---|
| 70 |  ;;+NORMAL RESULT:;IBD(357.98,^^0
 | 
|---|
| 71 |  ;;~~~
 | 
|---|
| 72 |  ;;PX INPUT HEALTH FACTORS:HEALTH FACTORS^1^^^2
 | 
|---|
| 73 |  ;;+MINIMAL SEVERITY:;IBD(357.98,^^0
 | 
|---|
| 74 |  ;;+MODERATE SEVERITY:;IBD(357.98,^^0
 | 
|---|
| 75 |  ;;+HEAVY SEVERITY:;IBD(357.98,^^0
 | 
|---|
| 76 |  ;;~~~
 | 
|---|
| 77 |  ;;PX INPUT IMMUNIZATION:IMMUNIZATION^1^7
 | 
|---|
| 78 |  ;;+CONTRAINDICATED:;IBD(357.98,^^1^IMMUNIZATION^1^^^5
 | 
|---|
| 79 |  ;;+GIVEN:;IBD(357.98,^^1^IMMUNIZATION^1
 | 
|---|
| 80 |  ;;+REFUSED:;IBD(357.98,^^1^IMMUNIZATION^1^^^8
 | 
|---|
| 81 |  ;;~~~
 | 
|---|
| 82 |  ;;PX INPUT PATIENT ACTIVE PROBLEM:DIAGNOSIS/PROBLEM^4^13^14^2
 | 
|---|
| 83 |  ;;+PRIMARY:;IBD(357.98,^^1^^^^^2
 | 
|---|
| 84 |  ;;+SECONDARY:;IBD(357.98,^^1^^^^^2
 | 
|---|
| 85 |  ;;+SERVICE CONNECTED:;IBD(357.98,^^1^^^^^9
 | 
|---|
| 86 |  ;;+AGENT ORANGE RELATED:;IBD(357.98,^^1^^^^^10
 | 
|---|
| 87 |  ;;+IONIZING RADIATION RELATED:;IBD(357.98,^^1^^^^^11
 | 
|---|
| 88 |  ;;+ENVIRONMENTAL CONTAMINANTS RELATED:;IBD(357.98,^^1^^^^^12
 | 
|---|
| 89 |  ;;+ACTIVE:;IBD(357.98,^^1^^^^^6
 | 
|---|
| 90 |  ;;+INACTIVE:;IBD(357.98,^^1^^^^^6
 | 
|---|
| 91 |  ;;+NON-SERVICE CONNECTED:;IBD(357.98,^^1^^^^^9
 | 
|---|
| 92 |  ;;~~~
 | 
|---|
| 93 |  ;;PX INPUT SC TREATMENT QUESTIONS:ENCOUNTER
 | 
|---|
| 94 |  ;;+YES:;IBD(357.98,^^0
 | 
|---|
| 95 |  ;;+NO:;IBD(357.98,^^0
 | 
|---|
| 96 |  ;;~~~
 | 
|---|
| 97 |  ;;PX INPUT VISIT CLASSIFICATION:ENCOUNTER
 | 
|---|
| 98 |  ;;+ENVIRONMENTAL CONTAMINANTS RELATED:;IBD(357.98,^^0
 | 
|---|
| 99 |  ;;+SERVICE CONNECTED:;IBD(357.98,^^0
 | 
|---|
| 100 |  ;;+AGENT ORANGE RELATED:;IBD(357.98,^^0
 | 
|---|
| 101 |  ;;+IONIZING RADIATION RELATED:;IBD(357.98,^^0
 | 
|---|
| 102 |  ;;+MILITARY SEXUAL TRAUMA:;IBD(357.98,^^0
 | 
|---|
| 103 |  ;;~~~
 | 
|---|
| 104 |  ;;PX INPUT SC TREATMENT QUESTION:ENCOUNTER
 | 
|---|
| 105 |  ;;+YES:;IBD(357.98,^^0
 | 
|---|
| 106 |  ;;+NO:;IBD(357.98,^^0
 | 
|---|
| 107 |  ;;~~~
 | 
|---|
| 108 |  ;;PX INPUT NO CLASSIFICATIONS:IBD NOCLASSIFICATION
 | 
|---|
| 109 |  ;;+NO CLASSIFICATIONS:;IBD(357.98,^^0
 | 
|---|
| 110 |  ;;~~~
 | 
|---|
| 111 |  ;;PX INPUT SC TREATMENT QUESTION (MST):ENCOUNTER
 | 
|---|
| 112 |  ;;+YES:;IBD(357.98,^^0
 | 
|---|
| 113 |  ;;+NO:;IBD(357.98,^^0
 | 
|---|
| 114 |  ;;~~~
 | 
|---|
| 115 |  ;;DGMST INPUT MST CLASSIFICATION:ENCOUNTER
 | 
|---|
| 116 |  ;;+YES:;IBD(357.98,^^0
 | 
|---|
| 117 |  ;;+NO:;IBD(357.98,^^0
 | 
|---|
| 118 |  ;;~~~
 | 
|---|
| 119 |  ;;IBD INPUT CANCEL/NOSHOW^IBD-ABORT^1^2^3^4^5
 | 
|---|
| 120 |  ;;~~~
 | 
|---|
| 121 |  ;;INPUT VISIT TYPE:ENCOUNTER^5
 | 
|---|
| 122 |  ;;~~~
 | 
|---|
| 123 |  ;;INPUT SC RELATED?:ENCOUNTER^6^^^6
 | 
|---|
| 124 |  ;;~~~
 | 
|---|
| 125 |  ;;INPUT AO RELATED?:ENCOUNTER^7
 | 
|---|
| 126 |  ;;~~~
 | 
|---|
| 127 |  ;;INPUT IR RELATED?:ENCOUNTER^8^^^9
 | 
|---|
| 128 |  ;;~~~
 | 
|---|
| 129 |  ;;INPUT EC RELATED?:ENCOUNTER^^^^9
 | 
|---|
| 130 |  ;;~~~
 | 
|---|
| 131 |  ;;INPUT PROVIDER INDICATOR:ENCOUNTER^15
 | 
|---|
| 132 |  ;;~~~
 | 
|---|
| 133 |  ;;PX INPUT ATTENDING PHYSICIAN:ENCOUNTER^16
 | 
|---|
| 134 |  ;;~~~
 | 
|---|
| 135 |  ;;PX INPUT SKIN TESTS:SKIN TEST^1
 | 
|---|
| 136 |  ;;~~~
 | 
|---|
| 137 |  ;;PX INPUT VISIT TYPE:ENCOUNTER^5
 | 
|---|
| 138 |  ;;~~~
 | 
|---|
| 139 |  ;;
 | 
|---|
| 140 |  ;;GMP SELECT PATIENT ACTIVE PROBLEMS^PRIMARY^SECONDARY
 | 
|---|
| 141 |  ;;DG SELECT ICD-9 DIAGNOSIS CODES^PRIMARY^SECONDARY
 | 
|---|
| 142 |  ;;DPT SC HIDDEN TREATMENT QUESTIONS^YES^NO
 | 
|---|
| 143 |  ;;SD SELECT PROVIDER^PRIMARY^SECONDARY
 | 
|---|