mml-ruby 0.0.2 → 0.0.3

data/spec/mml/lifestyle_module_spec.rb

@@ -0,0 +1,50 @@
+describe MML::Lifestyle do
+  let(:lifestyle) {MML::Lifestyle.new(occupation: 'physician', tobacco: 'never', alcohol: 'social', other: 'no constipation')}
+
+  it 'is an instance of MML::Lifestyle' do
+    expect(lifestyle).to be_an_instance_of MML::Lifestyle
+  end
+
+  it 'occupation should be assigned properly' do
+    expect(lifestyle.occupation).to eq 'physician'
+  end
+
+  it 'occupation is mandatory' do
+    expect{lifestyle.occupation = nil}.to raise_error ArgumentError
+  end
+
+  it 'tobacco should be assigned properly' do
+    expect(lifestyle.tobacco).to eq 'never'
+  end
+
+  it 'tobacco is mandatory' do
+    expect{lifestyle.tobacco = nil}.to raise_error ArgumentError
+  end
+
+  it 'alcohol should be assigned properly' do
+    expect(lifestyle.alcohol).to eq 'social'
+  end
+
+  it 'alcohol is mandatory' do
+    expect{lifestyle.alcohol=nil}.to raise_error ArgumentError
+  end
+
+  it 'other should be assigned properly' do
+    expect(lifestyle.other).to eq 'no constipation'
+  end
+
+  it 'other is optional' do
+    expect{lifestyle.other=nil}.not_to raise_error
+  end
+
+  describe '#to_xml' do
+    subject {lifestyle.to_xml}
+
+    it {should match "<mmlLs:LifestyleModule>"}
+    it {should match '<mmlLs:occupation>physician</mmlLs:occupation>'}
+    it {should match '<mmlLs:tobacco>never</mmlLs:tobacco>'}
+    it {should match '<mmlLs:alcohol>social</mmlLs:alcohol>'}
+    it {should match '<mmlLs:other>no constipation</mmlLs:other>'}
+    it {should match "</mmlLs:LifestyleModule>"}
+  end
+end

data/spec/mml/nationality_spec.rb

@@ -0,0 +1,19 @@
+describe MML::Nationality do
+  let(:nationality) {MML::Nationality.new(value: 'JPN', subtype: 'USA') }
+
+  it 'should be an instance of MMLNationality' do
+    expect(nationality).to be_an_instance_of MML::Nationality
+  end
+
+  it 'value should be assigned properly' do
+    expect(nationality.value).to eq 'JPN'
+  end
+
+  it 'value is mandatory' do
+    expect {nationality.value = nil}.to raise_error ArgumentError
+  end
+
+  it 'subtype should be assgined properly' do
+    expect(nationality.subtype).to eq 'USA'
+  end
+end

data/spec/mml/objective_spec.rb

@@ -0,0 +1,51 @@
+describe MML::Objective do
+  let(:extref) {MML::ExtRef.new(href: 'snd://localhost/chest.wav')}
+  let(:physical_exam_item) {MML::PhysicalExamItem.new(title: 'Chest auscultation', result: 'Respiratory sounds vesicular', interpretation: 'no rale', referenceInfo: [extref])}
+  let(:test_extref) {MML::ExtRef.new(href: 'http://record.net/result')}
+  let(:test_result) {MML::ValueWithLink.new(value: 'WBC 9000/microl', link: [test_extref] )}
+  let(:rx_extref) { MML::ExtRef.new(href: 'http://druginfo/recipie')}
+  let(:rx_record) {MML::ValueWithLink.new(value: 'Ampcilin 1200mg/day', link: [rx_extref])}
+  let(:tx_extref) {MML::ExtRef.new(href: 'http://treatment/fig1')}
+  let(:tx_record) {MML::ValueWithLink.new(value: 'antibiotics, p.o.', link: [tx_extref])}
+  let(:objective) {MML::Objective.new(objectiveNotes: 'looks pale', physicalExam: [physical_exam_item], testResult: test_result, rxRecord: rx_record, txRecord: tx_record)}
+
+  it 'is an instance of MML::Objective' do
+    expect(objective).to be_an_instance_of MML::Objective
+  end
+
+  it 'objectiveNotes should be assigned properly' do
+    expect(objective.objectiveNotes).to eq 'looks pale'
+  end
+
+  it 'physicalExam should be assigned properly' do
+    expect(objective.physicalExam[0].title).to eq 'Chest auscultation'
+  end
+
+  it 'physicalExam is optional' do
+    expect {objective.physicalExam = nil}.not_to raise_error
+  end
+
+  it 'testResult should be assigned properly' do
+    expect(objective.testResult.value).to eq 'WBC 9000/microl'
+  end
+
+  it 'testResult is optional' do
+    expect {objective.testResult = nil}.not_to raise_error
+  end
+
+  it 'rxRecord should be assigned properly' do
+    expect(objective.rxRecord.link[0].href).to eq 'http://druginfo/recipie'
+  end
+
+  it 'rxRecord is optional' do
+    expect {objective.rxRecord = nil}.not_to raise_error
+  end
+
+  it 'txRexord should be assigned properly' do
+    expect(objective.txRecord.value).to eq 'antibiotics, p.o.'
+  end
+
+  it 'txRecord is optional' do
+    expect {objective.txRecord = nil}.not_to raise_error
+  end
+end

data/spec/mml/operation_element_item_spec.rb

@@ -0,0 +1,31 @@
+describe MML::OperationElementItem do
+  let(:operation_element_item) {MML::OperationElementItem.new(title: 'coronary artery bipass grafting', code: 'K552', system: 'MHLW')}
+
+  it 'is an instance of MML::OperationElementItem' do
+    expect(operation_element_item).to be_an_instance_of MML::OperationElementItem
+  end
+
+  it 'title should be assigned properly' do
+    expect(operation_element_item.title).to eq 'coronary artery bipass grafting'
+  end
+
+  it 'title is mandatory' do
+    expect {operation_element_item.title = nil}.to raise_error ArgumentError
+  end
+  
+  it 'code should be assgined properly' do
+    expect(operation_element_item.code).to eq 'K552'
+  end
+
+  it 'code is optional' do
+    expect {operation_element_item.code = nil}.not_to raise_error
+  end
+
+  it 'system should be assigned properly' do
+    expect(operation_element_item.system).to eq 'MHLW'
+  end
+
+  it 'system is optional' do
+    expect {operation_element_item.system = nil}.not_to raise_error
+  end
+end

data/spec/mml/organization_info_spec.rb

@@ -0,0 +1,35 @@
+describe MML::OrganizationInfo do
+  let(:facility_name) {double(MML::FacilityName, value: 'MML Hospital')}
+  let(:facility) {double(MML::Facility, name: [facility_name])}
+  let(:address) {double(MML::Address, city: 'Kyoto-city')}
+  let(:phone) {double(MML::Phone, area: '075')}
+  let(:organization) {MML::OrganizationInfo.new(facility: facility, addresses: [address], phones: [phone])}
+
+  it 'is an instance of MML::OrganizationInfo' do
+    expect(organization).to be_an_instance_of MML::OrganizationInfo
+  end
+
+  it 'facility should be assigned properly' do
+    expect(organization.facility.name[0].value).to eq 'MML Hospital'
+  end
+
+  it 'facility is optional' do
+    expect{organization.facility = nil}.not_to raise_error
+  end
+
+  it 'addresses should be assigned properly' do
+    expect(organization.addresses[0].city).to eq 'Kyoto-city'
+  end
+
+  it 'addresses are optional' do
+    expect{organization.addresses = nil}.not_to raise_error
+  end
+
+  it 'phones should be assigned properly' do
+    expect(organization.phones[0].area).to eq '075'
+  end
+
+  it 'phones are optional' do
+    expect{organization.phones = nil}.not_to raise_error
+  end
+end

data/spec/mml/other_blood_type_spec.rb

@@ -0,0 +1,31 @@
+describe MML::OtherBloodType do
+  let(:other_blood_type) {MML::OtherBloodType.new(typeName: 'MNS blood type', typeJudgement: 'MN', description: 'examination at 2 years ago')}
+
+  it 'is an instance of MML::OtherBloodType' do
+    expect(other_blood_type).to be_an_instance_of MML::OtherBloodType
+  end
+
+  it 'typeName should be assigned properly' do
+    expect(other_blood_type.typeName).to eq 'MNS blood type'
+  end
+
+  it 'typeName is mandatory' do
+    expect{other_blood_type.typeName = nil}.to raise_error ArgumentError
+  end
+
+  it 'typeJudgement should be assigned properly' do
+    expect(other_blood_type.typeJudgement).to eq 'MN'
+  end
+
+  it 'typeJudgement is mandatory' do
+    expect {other_blood_type.typeJudgement = nil}.to raise_error ArgumentError
+  end
+
+  it 'description should be assigned properly' do
+    expect(other_blood_type.description).to eq 'examination at 2 years ago'
+  end
+
+  it 'description is optional' do
+    expect {other_blood_type.description = nil}.not_to raise_error
+  end
+end

data/spec/mml/outpatient_item_spec.rb

@@ -0,0 +1,48 @@
+describe MML::OutpatientItem do
+  let(:id) {MML::Id.new(type: 'facility', tableId: 'MML0024', value: '00123')}
+  let(:name) {MML::Name.new(repCode: 'A', fullname: 'Hiroyuki Yoshihara')}
+  let(:personalized_info) {MML::PersonalizedInfo.new(id: id, personName: [name])}
+  let(:creator_license) { MML::CreatorLicense.new(tableId: 'MML0026', value: 'doctor')}
+  let(:staff_info) {MML::StaffInfo.new(personalizedInfo: personalized_info, creatorLicense: [creator_license])}
+  let(:outpatient_item) {MML::OutpatientItem.new(date: '2013-08-25', first: true, emergency: true, outPatientCondition: '10A.M.the patient was put into the ambulance on a stretcher and driven to our hospital.', staffs: [staff_info])}
+
+   it 'is an instance of MML::OutpatientItem' do
+    expect(outpatient_item).to be_an_instance_of MML::OutpatientItem
+  end
+
+  it 'date should be assigned properly' do
+    expect(outpatient_item.date).to eq '2013-08-25'
+  end
+
+  it 'date is mandatory' do
+    expect {outpatient_item.date = nil}.to raise_error ArgumentError
+  end
+
+  it 'first should be assigned properly' do
+    expect(outpatient_item.first).to be_true
+  end
+
+  it 'first is optional' do
+    expect {outpatient_item.first = nil}.not_to raise_error
+  end
+
+  it 'emergency should be assigned properly' do
+    expect(outpatient_item.emergency).to be_true
+  end
+
+  it 'emergency is optional' do
+    expect {outpatient_item.emergency = nil}.not_to raise_error
+  end
+
+  it 'outPatientCondition should be assigned properly' do
+    expect(outpatient_item.outPatientCondition).to eq '10A.M.the patient was put into the ambulance on a stretcher and driven to our hospital.'
+  end
+
+  it 'staffs should be assigned properly' do
+    expect(outpatient_item.staffs[0].creatorLicense[0].value).to eq 'doctor'
+  end
+
+  it 'staffs is optional' do
+    expect {outpatient_item.staffs = nil}.not_to raise_error
+  end
+end

data/spec/mml/past_history_item_spec.rb

@@ -0,0 +1,23 @@
+describe MML::PastHistoryItem do
+  let(:past_history_item) {MML::PastHistoryItem.new(timeExpression: '6 years old', eventExpression: ['appendectomy'])}
+
+  it 'is an instance of MML::PastHistoryItem' do
+    expect(past_history_item).to be_an_instance_of MML::PastHistoryItem
+  end
+
+  it 'timeExpression should be assigned properly' do
+    expect(past_history_item.timeExpression).to eq '6 years old'
+  end
+
+  it 'timeExpression is mandatory' do
+    expect {past_history_item.timeExpression = nil}.to raise_error ArgumentError
+  end
+
+  it 'eventExpression should be assigned properly' do
+    expect(past_history_item.eventExpression).to eq ['appendectomy']
+  end
+
+  it 'eventExpression is optional' do
+    expect {past_history_item.eventExpression = nil}.not_to raise_error
+  end
+end

data/spec/mml/past_history_spec.rb

@@ -0,0 +1,17 @@
+describe MML::PastHistory do
+  let(:past_history_item1) {MML::PastHistoryItem.new(timeExpression: '6 years old', eventExpression: ['appendectomy'])}
+  let(:past_history_item2) {MML::PastHistoryItem.new(timeExpression: '5 years ago', eventExpression: ['hypertension'])}
+  let(:past_history) {MML::PastHistory.new(freeNote: 'Appendectomy (6 years old), hypertension (5 years ago)', pastHistoryItem: [past_history_item1, past_history_item2])}
+
+  it 'is an instance of MML::PastHistory' do
+    expect(past_history).to be_an_instance_of MML::PastHistory
+  end
+
+  it 'freeNote shuld be assigned properly' do
+    expect(past_history.freeNote).to eq 'Appendectomy (6 years old), hypertension (5 years ago)'
+  end
+
+  it 'pastHistoryItem should be assigned properly' do
+    expect(past_history.pastHistoryItem.size).to eq 2
+  end
+end

data/spec/mml/patient_info_spec.rb

@@ -0,0 +1,126 @@
+describe MML::PatientInfo do
+  let(:master_id) { MML::Id.new(value: '0001', type: 'facility', tableId: 'MML0024') }
+  let(:other_id) { MML::OtherId.new(type: 'spouseId', id: MML::Id.new(value: '000A', type: 'facility', tableId: 'MML0024')) }
+  let(:person_name) { MML::Name.new(repCode: 'A', fullname: 'Shinji KOBAYASHI')}
+  let(:nationality) { MML::Nationality.new(value: 'JPN', subtype: 'USA') } # for rspec, not real
+  let(:race) {MML::Race.new(value: 'Japanese', raceCode: '2039-6', raceCodeId: 'Race & Ethnicity - CDC')}
+  let(:address) { MML::Address.new(repCode: 'A', addressClass: 'business', tableId: 'MML0025', full: '506, Dept. 9, Kyoto Research Park (KRP), Awata-cho 91, Chudoji, Shimogyo-ku, Kyoto-city')}
+  let(:email) { 'skoba@mmlexample.net' }
+  let(:phone) { MML::Phone.new(telEquipType: 'PH', area: '075', city: '874', number: '7030') }
+  let(:death) { MML::Death.new(flag: false)}
+  let(:patient_info) { MML::PatientInfo.new(masterId: master_id, otherId: [other_id], personName: [person_name], birthday: '1970-04-19', sex: 'male', nationality: nationality, race: race, marital: 'married', addresses: [address], emailAddresses: [email], phones: [phone], accountNumber: 'ABC0123', socialIdentification: 'KYO4567', death: death) }
+
+  it 'should be an instance of MML::PatientInfo' do
+    expect(patient_info).to be_an_instance_of MML::PatientInfo
+  end
+
+  it 'masterId should be assigned properly' do
+    expect(patient_info.masterId.value).to eq '0001'
+  end
+
+  it 'masterId is mandatory' do
+    expect {patient_info.masterId = nil}.to raise_error ArgumentError
+  end
+  it 'otherId should be assigned properly' do
+    expect(patient_info.otherId[0].id.value).to eq '000A'
+  end
+
+  it 'personName should be assigned properly' do
+    expect(patient_info.personName[0].fullname).to eq 'Shinji KOBAYASHI'
+  end
+
+  it 'personName is mandatory' do
+    expect { patient_info.personName = nil }.to raise_error ArgumentError
+  end
+
+  it 'birthday should be assigned properly' do
+    expect(patient_info.birthday).to eq '1970-04-19'
+  end
+
+  it 'birthday is mandatory' do
+    expect {patient_info.birthday = nil}.to raise_error ArgumentError
+  end
+
+  it 'sex(gender) should be described' do
+    expect(patient_info.sex).to eq 'male'
+  end
+
+  it 'nationality should be assigned properly' do
+    expect(patient_info.nationality.value).to eq 'JPN'
+  end
+
+  it 'race should be assigned properly' do
+    expect(patient_info.race.value).to eq 'Japanese'
+  end
+  it 'marital should be assigned properly. not real' do
+    expect(patient_info.marital).to eq 'married'
+  end
+
+  it 'address should be properly assigned' do
+    expect(patient_info.addresses[0].addressClass).to eq 'business'
+  end
+
+  it 'emailAddresses should be assigned properly' do
+    expect(patient_info.emailAddresses[0]).to eq 'skoba@mmlexample.net'
+  end
+
+  it 'phones should be properly assigned' do
+    expect(patient_info.phones[0].city).to eq '874'
+  end
+
+  it 'accountNumber should be assigned properly' do
+    expect(patient_info.accountNumber).to eq 'ABC0123'
+  end
+
+  it 'socialNumber should be assigned properly' do
+    expect(patient_info.socialIdentification).to eq 'KYO4567'
+  end
+
+  it 'death flag should be assigned porperly' do
+    expect(patient_info.death.flag).to be_false
+  end
+
+  context '#to_xml' do
+    subject { patient_info.to_xml }
+
+    it {should match '<mmlPi:PatientModule>'}
+    it {should match '<mmlPi:uniqueInfo>'}
+    it {should match '<mmlPi:masterId>'}
+    it {should match '<mmlCm:Id'}
+    it {should match '>0001</mmlCm:Id>'}
+    it {should match '</mmlPi:masterId>'}
+    it {should match '<mmlPi:otherId mmlPi:type="spouseId"'}
+    it {should match '>000A</mmlCm:Id>'}
+    it {should match '</mmlPi:uniqueInfo>'}
+    it {should match '<mmlPi:personName>'}
+    it {should match '<mmlNm:Name'}
+    it {should match '<mmlNm:fullname>Shinji KOBAYASHI</mmlNm:fullname>'}
+    it {should match '</mmlNm:Name>'}
+    it {should match '</mmlPi:personName>'}
+    it {should match '<mmlPi:birthday>1970-04-19</mmlPi:birthday>'}
+    it {should match '<mmlPi:sex>male</mmlPi:sex>'}
+    it {should match '<mmlPi:nationality mmlPi:subtype="USA"'}
+    it {should match '>JPN</mmlPi:nationality>'}
+    it {should match '<mmlPi:race'}
+    it {should match 'mmlPi:raceCode='}
+    it {should match '<mmlPi:marital>married</mmlPi:marital>'}
+    it {should match '<mmlPi:addresses>'}
+    it {should match '<mmlAd:Address'}
+    it {should match '<mmlAd:full>506, Dept.'}
+    it {should match 'Kyoto-city</mmlAd:full>'}
+    it {should match '</mmlAd:Address>'}
+    it {should match '</mmlPi:addresses>'}
+    it {should match '<mmlPi:emailAddresses>'}
+    it {should match '<mmlCm:email>skoba@mmlexample.net</mmlCm:email>'}
+    it {should match '</mmlPi:emailAddresses>'}
+    it {should match '<mmlPi:phones>'}
+    it {should match '<mmlPh:Phone mmlPh:telEquipType="PH">'}
+    it {should match '<mmlPh:area>075</mmlPh:area>'}
+    it {should match '</mmlPh:Phone>'}
+    it {should match '</mmlPi:phones>'}
+    it {should match '<mmlPi:accountNumber>ABC0123</mmlPi:accountNumber>'}
+    it {should match '<mmlPi:socialIdentification>KYO4567</mmlPi:socialIdentification>'}
+    it {should match '<mmlPi:death>false</mmlPi:death>'}
+    it {should match '</mmlPi:PatientModule>'}
+  end
+end

data/spec/mml/phone_spec.rb

@@ -1,5 +1,5 @@
 describe MML::Phone do
-  let(:phone) { MML::Phone.new(telEquipType: 'PH', area: '075', city: '874', number: '7030', extension: '123', country: '81', memo: 'daytime') }
+  let(:phone) { MML::Phone.new(telEquipType: 'PH', area: '075', city: '874', number: '7030', full: '078-874-7030(123)', extension: '123', country: '81', memo: 'daytime') }
 
   it 'should be an instance of MML::Phone' do
     expect(phone).to be_an_instance_of MML::Phone
@@ -25,6 +25,9 @@ describe MML::Phone do
     expect(phone.extension).to eq '123'
   end
 
+  it 'full should be assigned properly' do
+    expect(phone.full).to eq '078-874-7030(123)'
+  end
   it 'country code should be assigned properly' do
     expect(phone.country).to eq '81'
   end
@@ -41,6 +44,7 @@ describe MML::Phone do
     it {should match '<mmlPh:city>874</mmlPh:city>'}
     it {should match '<mmlPh:number>7030</mmlPh:number>'}
     it {should match '<mmlPh:extension>123</mmlPh:extension>'}
+    it {should match '<mmlPh:full>078-874-7030\(123\)</mmlPh:full>'}
     it {should match '<mmlPh:country>81</mmlPh:country>'}
     it {should match '<mmlPh:memo>daytime</mmlPh:memo>'}
     it {should match '</mmlPh:Phone>'}