VistA-WorldVistAEHR/g/AUPNPROB.zwr

121 lines
4.1 KiB
Plaintext

FirstRelease WVEHR VER VOE1.0
Cache 31-Jan-2008 23:07:04 ZWR
^AUPNPROB(0)="PROBLEM^9000011IP^12^12"
^AUPNPROB(1,0)="12827^1^3050718^^15^67^1^3050718^^^^A^"
^AUPNPROB(1,1)="1^P^60^60^60^2^^2^^^^^^^^"
^AUPNPROB(2,0)="9383^1^3050718^^20^67^2^3050718^^^^A^"
^AUPNPROB(2,1)="1^P^60^60^60^2^^2^^^^^^^^"
^AUPNPROB(3,0)="12827^1^3050719^^15^67^3^3050719^^^^A^"
^AUPNPROB(3,1)="1^P^60^60^60^2^^2^^^^^^^^"
^AUPNPROB(3,11,0)="^9000011.11PA^1^1"
^AUPNPROB(3,11,1,0)="67"
^AUPNPROB(3,11,1,11,0)="^9000011.1111IA^1^1"
^AUPNPROB(3,11,1,11,1,0)="1^^second encounter note^A^3050719^60"
^AUPNPROB(3,11,1,11,"B",1,1)=""
^AUPNPROB(3,11,"B",67,1)=""
^AUPNPROB(4,0)="3593^1^3050719^^23^67^4^3050719^^^^A^"
^AUPNPROB(4,1)="1^P^60^60^60^2^^2^^^^^^^^"
^AUPNPROB(4,11,0)="^9000011.11PA^1^1"
^AUPNPROB(4,11,1,0)="67"
^AUPNPROB(4,11,1,11,0)="^9000011.1111IA^1^1"
^AUPNPROB(4,11,1,11,1,0)="1^^3rd try^A^3050719^60"
^AUPNPROB(4,11,1,11,"B",1,1)=""
^AUPNPROB(4,11,"B",67,1)=""
^AUPNPROB(5,0)="11396^1^3050719^^24^67^5^3050719^^^^A^"
^AUPNPROB(5,1)="1^P^60^60^60^2^^2^^^^^^^^"
^AUPNPROB(6,0)="11396^3^3050719^^24^67^1^3050719^^^^A^"
^AUPNPROB(6,1)="1^P^60^60^60^2^^2^^^^^^^^"
^AUPNPROB(7,0)="12827^3^3050719^^15^67^2^3050719^^^^A^"
^AUPNPROB(7,1)="1^P^60^60^60^2^^2^^^^^^^^"
^AUPNPROB(7,11,0)="^9000011.11PA^1^1"
^AUPNPROB(7,11,1,0)="67"
^AUPNPROB(7,11,1,11,0)="^9000011.1111IA^1^1"
^AUPNPROB(7,11,1,11,1,0)="1^^2ND DIAGNOSIS^A^3050719^60"
^AUPNPROB(7,11,1,11,"B",1,1)=""
^AUPNPROB(7,11,"B",67,1)=""
^AUPNPROB(8,0)="11396^2^3050719^^24^67^1^3050719^^^^A^"
^AUPNPROB(8,1)="1^P^11^11^11^2^^2^^^^^^^^"
^AUPNPROB(8,11,0)="^9000011.11PA^1^1"
^AUPNPROB(8,11,1,0)="67"
^AUPNPROB(8,11,1,11,0)="^9000011.1111IA^1^1"
^AUPNPROB(8,11,1,11,1,0)="1^^1IST VISIT^A^3050719^11"
^AUPNPROB(8,11,1,11,"B",1,1)=""
^AUPNPROB(8,11,"B",67,1)=""
^AUPNPROB(9,0)="12827^2^3050719^^15^67^2^3050719^^^^A^"
^AUPNPROB(9,1)="1^P^11^11^11^2^^2^^^^^^^^"
^AUPNPROB(9,11,0)="^9000011.11PA^1^1"
^AUPNPROB(9,11,1,0)="67"
^AUPNPROB(9,11,1,11,0)="^9000011.1111IA^1^1"
^AUPNPROB(9,11,1,11,1,0)="1^^2ND VISIT^A^3050719^11"
^AUPNPROB(9,11,1,11,"B",1,1)=""
^AUPNPROB(9,11,"B",67,1)=""
^AUPNPROB(10,0)="5570^2^3050720^^31^67^3^3050720^^^^A^"
^AUPNPROB(10,1)="1^P^60^60^60^^^2^3050720^0^0^0^0^^^"
^AUPNPROB(11,0)="1237^3^3050721^^32^67^3^3050721^^^^A^3050702"
^AUPNPROB(11,1)="32903^P^60^60^60^^^2^3050721^0^0^0^0^^^"
^AUPNPROB(12,0)="2568^1^3050729^^38^67^6^3050729^^^^A^"
^AUPNPROB(12,1)="1^P^11^11^11^2^^2^^^^^^^^"
^AUPNPROB("AA",1,67," 001.00",1)=""
^AUPNPROB("AA",1,67," 002.00",2)=""
^AUPNPROB("AA",1,67," 003.00",3)=""
^AUPNPROB("AA",1,67," 004.00",4)=""
^AUPNPROB("AA",1,67," 005.00",5)=""
^AUPNPROB("AA",1,67," 006.00",12)=""
^AUPNPROB("AA",2,67," 001.00",8)=""
^AUPNPROB("AA",2,67," 002.00",9)=""
^AUPNPROB("AA",2,67," 003.00",10)=""
^AUPNPROB("AA",3,67," 001.00",6)=""
^AUPNPROB("AA",3,67," 002.00",7)=""
^AUPNPROB("AA",3,67," 003.00",11)=""
^AUPNPROB("AC",1,1)=""
^AUPNPROB("AC",1,2)=""
^AUPNPROB("AC",1,3)=""
^AUPNPROB("AC",1,4)=""
^AUPNPROB("AC",1,5)=""
^AUPNPROB("AC",1,12)=""
^AUPNPROB("AC",2,8)=""
^AUPNPROB("AC",2,9)=""
^AUPNPROB("AC",2,10)=""
^AUPNPROB("AC",3,6)=""
^AUPNPROB("AC",3,7)=""
^AUPNPROB("AC",3,11)=""
^AUPNPROB("ACTIVE",1,"A",1)=""
^AUPNPROB("ACTIVE",1,"A",2)=""
^AUPNPROB("ACTIVE",1,"A",3)=""
^AUPNPROB("ACTIVE",1,"A",4)=""
^AUPNPROB("ACTIVE",1,"A",5)=""
^AUPNPROB("ACTIVE",1,"A",12)=""
^AUPNPROB("ACTIVE",2,"A",8)=""
^AUPNPROB("ACTIVE",2,"A",9)=""
^AUPNPROB("ACTIVE",2,"A",10)=""
^AUPNPROB("ACTIVE",3,"A",6)=""
^AUPNPROB("ACTIVE",3,"A",7)=""
^AUPNPROB("ACTIVE",3,"A",11)=""
^AUPNPROB("B",1237,11)=""
^AUPNPROB("B",2568,12)=""
^AUPNPROB("B",3593,4)=""
^AUPNPROB("B",5570,10)=""
^AUPNPROB("B",9383,2)=""
^AUPNPROB("B",11396,5)=""
^AUPNPROB("B",11396,6)=""
^AUPNPROB("B",11396,8)=""
^AUPNPROB("B",12827,1)=""
^AUPNPROB("B",12827,3)=""
^AUPNPROB("B",12827,7)=""
^AUPNPROB("B",12827,9)=""
^AUPNPROB("C",1,1)=""
^AUPNPROB("C",1,2)=""
^AUPNPROB("C",1,3)=""
^AUPNPROB("C",1,4)=""
^AUPNPROB("C",1,5)=""
^AUPNPROB("C",1,6)=""
^AUPNPROB("C",1,7)=""
^AUPNPROB("C",1,8)=""
^AUPNPROB("C",1,9)=""
^AUPNPROB("C",1,10)=""
^AUPNPROB("C",1,12)=""
^AUPNPROB("C",32903,11)=""
^AUPNPROB("MODIFIED",1,3050729.115514)=""
^AUPNPROB("MODIFIED",2,3050720.17591)=""
^AUPNPROB("MODIFIED",3,3050721.170909)=""