private void OrcaDiseaseCreateButton_Click(object sender, EventArgs e)
{
InterfaceFacade facade = new InterfaceFacade();
facade.Facility = CreateFacilityInfo();
facade.CreatorParson = CreateParsonInfo();
Mml mml = facade.CreateMml23("90000001");
var mdlitm = mml.CreateRegisteredDiagnosisModule();
var dis = (MedicalInterface.Mml23.MmlRd.RegisteredDiagnosisModule)mdlitm.Content;
dis.Diagnosis.Code = "123456789";
dis.Diagnosis.System = "TEST";
dis.Diagnosis.Text = "テスト病名";
dis.StartDate = new DateTime(2010, 4, 2);
mml.Body.AddModuleItem(mdlitm);
mdlitm = mml.CreateRegisteredDiagnosisModule();
dis = (MedicalInterface.Mml23.MmlRd.RegisteredDiagnosisModule)mdlitm.Content;
var disitm = new MedicalInterface.Mml23.MmlRd.DiagnosisItem();
disitm.Code = "123";
disitm.System = "TEST";
disitm.Text = "テスト接頭語";
dis.DiagnosisContents.Add(disitm);
disitm = new MedicalInterface.Mml23.MmlRd.DiagnosisItem();
disitm.Code = "456";
disitm.System = "TEST";
disitm.Text = "テスト幹病名";
dis.DiagnosisContents.Add(disitm);
disitm = new MedicalInterface.Mml23.MmlRd.DiagnosisItem();
disitm.Code = "789";
disitm.System = "TEST";
disitm.Text = "テスト接尾語";
dis.DiagnosisContents.Add(disitm);
dis.StartDate = new DateTime(2008, 8, 5);
dis.EndDate = new DateTime(2009, 3, 16);
dis.FirstEncounterDate = new DateTime(2006, 2, 25);
dis.Outcome.Text = "recovering";
//カテゴリはフラグに変換したほうがよい？
mml.Body.AddModuleItem(mdlitm);
facade.WriteMml23(mml, "Orca病名送信.xml");
}
