public void R2TELUseablePeriodParseTest()
{
var tel = new TEL("tel:+190555525485");
// This PIVL<TS> selects the week of Aug 15 2011 - Aug 19 2011
var weekdays = new PIVL <TS>(
new IVL <TS>(DateTime.Parse("08-15-2011"), DateTime.Parse("08-19-2011")),
new PQ(1, "wk")
);
// This PIVL<TS> selects the hours of 9-5
var nineToFive = new PIVL <TS>(
new IVL <TS>(DateTime.Parse("08-15-2011 09:00 AM"), DateTime.Parse("08-15-2011 05:00 PM")),
new PQ(1, "d")
);
// We set the usable period to a set of
// 1. All weekdays
// 2. intersect with times from 9-5 daily
tel.UseablePeriod = new GTS(QSI <TS> .CreateQSI(
weekdays,
nineToFive
));
var actualXml = R2SerializationHelper.SerializeAsString(tel);
var inti = R2SerializationHelper.ParseString <TEL>(actualXml);
Assert.AreEqual(tel, inti);
}
public void R2BLTrueParseTest()
{
String expectedXml = @"<test xmlns=""urn:hl7-org:v3"" value=""true""/>";
BL parsed = R2SerializationHelper.ParseString <BL>(expectedXml);
Assert.AreEqual(true, parsed.Value);
}
public void R2BLNullFlavorNullParseTest()
{
String expectedXml = @"<test xmlns=""urn:hl7-org:v3"" nullFlavor=""NI""/>";
BL parsed = R2SerializationHelper.ParseString <BL>(expectedXml);
Assert.AreEqual(NullFlavor.NoInformation, (NullFlavor)parsed.NullFlavor);
}
/// <summary>
/// PArse of an invalid RTO without an XSI type on one of the numerator
/// or denominator
/// </summary>
public void R2RTOInvalidParseTest()
{
string xml = @"<test xmlns:xsi=""http://www.w3.org/2001/XMLSchema-instance"" xmlns=""urn:hl7-org:v3""><numerator xsi:type=""MO"" value=""12.30"" currency=""CAD""/><denominator value=""1"" unit=""hr""/></test>";
var ret = R2SerializationHelper.ParseString <RTO <IQuantity, IQuantity> >(xml);
Assert.IsNull(ret);
}
public void PQRParseTest04()
{
PQR pqr = new PQR(3, "[ft_i]", "2.16.840.1.113883.6.8");
pqr.ValidTimeLow = new TS(new DateTime(2012, 01, 01), DatePrecision.Day);
pqr.ValidTimeHigh = new TS(new DateTime(2012, 12, 31), DatePrecision.Day);
pqr.ControlActRoot = null;
pqr.ControlActExt = null;
pqr.NullFlavor = null;
pqr.UpdateMode = null;
pqr.CodeSystemName = null;
pqr.CodeSystemVersion = null;
pqr.ValueSet = null;
pqr.ValueSetVersion = null;
pqr.DisplayName = null;
pqr.OriginalText = null;
Console.WriteLine("Value: {0} | Code: {1} | Codesystem: {2}", pqr.Value, pqr.Code, pqr.CodeSystem);
Assert.IsTrue(pqr.Validate());
// serialize and parse pivl
var actualXml = R2SerializationHelper.SerializeAsString(pqr);
var pqr2 = R2SerializationHelper.ParseString <PQR>(actualXml);
Assert.AreEqual(pqr, pqr2);
}
public void R2PNQualifierParseTest()
{
PN inti = new PN(
EntityNameUse.Legal,
new ENXP[] {
new ENXP("Sir", EntityNamePartType.Title)
{
Qualifier = new SET <CS <EntityNamePartQualifier> >(new EntityNamePartQualifier[] { EntityNamePartQualifier.Nobility, EntityNamePartQualifier.Acquired })
},
new ENXP("Dr", EntityNamePartType.Title)
{
Qualifier = new SET <CS <EntityNamePartQualifier> >(EntityNamePartQualifier.Academic)
},
new ENXP("John", EntityNamePartType.Given),
new ENXP("Jacob", EntityNamePartType.Given),
new ENXP("Jingleheimer", EntityNamePartType.Family),
new ENXP("-", EntityNamePartType.Delimiter),
new ENXP("Schmidt", EntityNamePartType.Family),
new ENXP("III")
}
)
{
Flavor = "EN.PN"
};
string actualXml = R2SerializationHelper.SerializeAsString(inti);
var int2 = R2SerializationHelper.ParseString <PN>(actualXml);
Assert.AreEqual(inti, int2);
}
public void R2RTOUncertainRangeParseTest()
{
RTO <IQuantity, IQuantity> inti = new RTO <IQuantity, IQuantity>();
inti.UncertainRange = new IVL <MARC.Everest.DataTypes.Interfaces.IQuantity>(
new RTO <PQ, PQ>(
new PQ(1, "d")
{
Translation = new SET <PQR>(
new PQR(24, "hr", "UCUM")
)
},
new PQ(2, "d")
),
new RTO <PQ, PQ>(
new PQ(3, "d"),
new PQ(4, "d")
)
);
//string expectedXml = @"<test xmlns:xsi=""http://www.w3.org/2001/XMLSchema-instance"" xmlns=""urn:hl7-org:v3""><uncertainRange><low xsi:type=""RTO""><numerator xsi:type=""MO"" value=""1.23"" currency=""CAD""/><denominator xsi:type=""PQ"" value=""1"" unit=""hr""/></low><high xsi:type=""RTO""><numerator xsi:type=""MO"" value=""2.23"" currency=""CAD""/><denominator xsi:type=""PQ"" value=""1"" unit=""hr""/></high></uncertainRange></test>";
var actualXml = R2SerializationHelper.SerializeAsString(inti);
var int2 = R2SerializationHelper.ParseString <RTO <IQuantity, IQuantity> >(actualXml);
Assert.AreEqual(inti, int2);
}
public void R2CDQualifierNestedCodeParseTest()
{
var cdi = new CD <String>("64572001", "2.16.840.1.113883.6.96", "SNOMED-CT", null, null, new ED("Some original text"));
cdi.Qualifier = new LIST <CR <string> >();
cdi.Qualifier.Add(new CR <string>(
new CV <String>("116676008", "2.16.840.1.113883.6.96", "SNOMED-CT", null, null, null),
new CD <String>("72704001", "2.16.840.1.113883.6.96", "SNOMED-CT", null, null, null)
));
cdi.Qualifier.Add(new CR <String>(
new CV <String>("363698007", "2.16.840.1.113883.6.96", "SNOMED-CT", null, null, null),
new CD <String>("12611008", "2.16.840.1.113883.6.96", "SNOMED-CT", null, null, null)
{
Qualifier = LIST <CR <String> > .CreateList(
new CR <String>(
new CV <String>("272741003", "2.16.840.1.113883.6.96", "SNOMED-CT", null, null, null),
new CD <String>("7771000", "2.16.840.1.113883.6.96", "SNOMED-CT", null, null, null)
)
)
}
));
string actualXml = R2SerializationHelper.SerializeAsString(cdi);
var cd2 = R2SerializationHelper.ParseString <CD <String> >(actualXml);
Assert.AreEqual(cdi, cd2);
}
public void R2TELParseTest2()
{
TEL telType = new TEL("tel:+15556755745",
new CS <TelecommunicationAddressUse>[] {
TelecommunicationAddressUse.Home,
TelecommunicationAddressUse.WorkPlace
});
telType.Capabilities = new SET <CS <TelecommunicationCabability> >()
{
TelecommunicationCabability.Voice,
TelecommunicationCabability.Fax
};
telType.ValidTimeLow = null;
telType.ValidTimeHigh = null;
telType.NullFlavor = null;
telType.UpdateMode = null;
telType.UseablePeriod = null;
var actualXml = R2SerializationHelper.SerializeAsString(telType);
var set2 = R2SerializationHelper.ParseString <TEL>(actualXml);
Assert.AreEqual(telType, set2);
}
public void R2ADBasicParseTest()
{
var adi = AD.CreateAD(new ADXP("1050 Wishard Blvd"), new ADXP(null, AddressPartType.Delimiter));
String actualXml = R2SerializationHelper.SerializeAsString(adi);
var ad2 = R2SerializationHelper.ParseString <AD>(actualXml);
Assert.AreEqual(adi, ad2);
}
public void R2EDContentBinParseTest()
{
var ved = new ED(System.Text.Encoding.UTF8.GetBytes("This is binary"), "bin/plain");
String actualXml = R2SerializationHelper.SerializeAsString(ved);
var ved2 = R2SerializationHelper.ParseString <ED>(actualXml);
Assert.AreEqual(ved, ved2);
}
public void R2EDContentTextParseTest()
{
var ved = new ED("this is my test");
String actualXml = R2SerializationHelper.SerializeAsString(ved);
var ved2 = R2SerializationHelper.ParseString <ED>(actualXml);
Assert.AreEqual(ved, ved2);
}
public void R2ADBasicPartTypesParseTest()
{
var adi = AD.CreateAD(new ADXP("1050 Wishard Blvd", AddressPartType.AddressLine), new ADXP("RG 5th Floor", AddressPartType.AddressLine), new ADXP("Ontario", AddressPartType.State));
String actualXml = R2SerializationHelper.SerializeAsString(adi);
var ad2 = R2SerializationHelper.ParseString <AD>(actualXml);
Assert.AreEqual(adi, ad2);
}
public void R2CDSimpleCodeParseTest()
{
var cdi = new CD <String>("784.0", "2.16.840.1.113883.6.42", "ICD-9", null, new ST("Headache"), new ED("gen. headache"));
string actualXml = R2SerializationHelper.SerializeAsString(cdi);
var cd2 = R2SerializationHelper.ParseString <CD <String> >(actualXml);
Assert.AreEqual(cdi, cd2);
}
public void R2INTBasicParseTest()
{
INT inti = 8;
var actualXml = R2SerializationHelper.SerializeAsString(inti);
var int2 = R2SerializationHelper.ParseString <INT>(actualXml);
Assert.AreEqual(inti, int2);
}
public void R2IIBasicParseTest()
{
string ext = Guid.NewGuid().ToString();
II inti = new II("1.2.3.4.5", ext);
var actualXml = R2SerializationHelper.SerializeAsString(inti);
var int2 = R2SerializationHelper.ParseString <II>(actualXml);
Assert.AreEqual(inti, int2);
}
public void R2REALBasicParseTest()
{
REAL inti = 8.2358;
var actualXml = R2SerializationHelper.SerializeAsString(inti);
var int2 = R2SerializationHelper.ParseString <REAL>(actualXml);
Assert.AreEqual(inti, int2);
Assert.AreEqual(4, int2.Precision);
}
public void R2LISTSimpleParseTest()
{
LIST <INT> inti = LIST <INT> .CreateList(1, 2, 3, 4);
string actualXml = R2SerializationHelper.SerializeAsString(inti);
LIST <INT> int2 = R2SerializationHelper.ParseString <LIST <INT> >(actualXml);
Assert.AreEqual(inti, int2);
}
public void R2SETSimpleParseTest()
{
SET <INT> inti = SET <INT> .CreateSET(1, 2, 3, 4);
string actualXml = R2SerializationHelper.SerializeAsString(inti);
SET <INT> int2 = R2SerializationHelper.ParseString <SET <INT> >(actualXml);
Assert.AreEqual(inti, int2);
}
public void R2REALUncertainRangeParseTest()
{
REAL inti = 8.24;
inti.UncertainRange = new IVL <MARC.Everest.DataTypes.Interfaces.IQuantity>(new REAL(3), new REAL(5));
var actualXml = R2SerializationHelper.SerializeAsString(inti);
var int2 = R2SerializationHelper.ParseString <REAL>(actualXml);
Assert.AreEqual(inti, int2);
}
public void R2EDContentTextCompressionParseTest()
{
ED ved = new ED("this is my test");
ved = ved.Compress(EncapsulatedDataCompression.GZ);
String actualXml = R2SerializationHelper.SerializeAsString(ved);
var ved2 = R2SerializationHelper.ParseString <ED>(actualXml);
Assert.AreEqual(ved, ved2);
}
public void R2EDContentBinThumbnailParseTest()
{
ED ved = new ED(Encoding.UTF8.GetBytes("this is a binary with thumbnail"), "text/plain");
ved.Thumbnail = ved.Compress(EncapsulatedDataCompression.GZ);
String actualXml = R2SerializationHelper.SerializeAsString(ved);
var ved2 = R2SerializationHelper.ParseString <ED>(actualXml);
Assert.AreEqual(ved, ved2);
}
public void R2CDNullFlavorParseTest()
{
var cdi = new CD <String>(null, "2.16.840.1.113883.6.96", null, null, null, new ED("Burnt ear with iron. Burnt other ear calling for ambulance"));
cdi.NullFlavor = NullFlavor.Other;
string actualXml = R2SerializationHelper.SerializeAsString(cdi);
var cd2 = R2SerializationHelper.ParseString <CD <String> >(actualXml);
Assert.AreEqual(cdi, cd2);
}
public void R2IIScopeParseTest()
{
string ext = Guid.NewGuid().ToString();
II inti = new II("1.2.3.4.5", ext);
inti.Scope = IdentifierScope.ObjectIdentifier;
var actualXml = R2SerializationHelper.SerializeAsString(inti);
var int2 = R2SerializationHelper.ParseString <II>(actualXml);
Assert.AreEqual(inti, int2);
}
public void R2IIReliabilityParseTest()
{
string ext = Guid.NewGuid().ToString();
II inti = new II("1.2.3.4.5", ext);
inti.Reliability = IdentifierReliability.IssuedBySystem;
var actualXml = R2SerializationHelper.SerializeAsString(inti);
var int2 = R2SerializationHelper.ParseString <II>(actualXml);
Assert.AreEqual(inti, int2);
}
public void R2MOPrecisionParseTest()
{
MO inti = new MO((decimal)1.300, "CAD")
{
Precision = 3
};
string actualXml = R2SerializationHelper.SerializeAsString(inti);
MO int2 = R2SerializationHelper.ParseString <MO>(actualXml);
Assert.AreEqual(inti, int2);
}
public void R2REALUncertaintyParseTest()
{
REAL inti = 8.24;
inti.Uncertainty = new REAL(0.93);
inti.UncertaintyType = QuantityUncertaintyType.Normal;
var actualXml = R2SerializationHelper.SerializeAsString(inti);
var int2 = R2SerializationHelper.ParseString <REAL>(actualXml);
Assert.AreEqual(inti, int2);
}
public void R2TNQualifierParseTest()
{
TN inti = new TN("Sir Dr. John Jacob Jingleheimer-Schmidt III")
{
Flavor = "EN.TN"
};
string actualXml = R2SerializationHelper.SerializeAsString(inti);
var int2 = R2SerializationHelper.ParseString <TN>(actualXml);
Assert.AreEqual(inti, int2);
}
public void R2PQPrecisionParseTest()
{
PQ inti = new PQ((decimal)1.300, "hr")
{
Precision = 3
};
string actualXml = R2SerializationHelper.SerializeAsString(inti);
PQ int2 = R2SerializationHelper.ParseString <PQ>(actualXml);
Assert.AreEqual(inti, int2);
}
public void R2ADUnknownAddressParseTest()
{
var adi = new AD(PostalAddressUse.WorkPlace)
{
NullFlavor = NullFlavor.NoInformation
};
String actualXml = R2SerializationHelper.SerializeAsString(adi);
var ad2 = R2SerializationHelper.ParseString <AD>(actualXml);
Assert.AreEqual(adi, ad2);
}
