xp_comm_proj/rd_dicom/Papyrus3/PapyInitModules3.c
/********************************************************************************/
/*										*/
/*	init_GeneralEquipment : initializes the elements of the module		*/
/*	General Equipment 							*/
/*										*/
/********************************************************************************/
init_GeneralEquipment : initializes the elements of the module
General Equipment
init_GeneralEquipment : initializes the elements of the module General Equipment
void
init_GeneralEquipment (SElement ioElem [])
{
  SElement	*theWrkP;
  theWrkP = &ioElem [papManufacturerGE];
  theWrkP->group = 0x0008;
  theWrkP->element = 0x0070;
  theWrkP->length = 0L;
  theWrkP->vr = LO;
  theWrkP->vm = "1";
  theWrkP->type_t = T2;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papInstitutionNameGE];
  theWrkP->group = 0x0008;
  theWrkP->element = 0x0080;
  theWrkP->length = 0L;
  theWrkP->vr = LO;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papInstitutionAddressGE];
  theWrkP->group = 0x0008;
  theWrkP->element = 0x0081;
  theWrkP->length = 0L;
  theWrkP->vr = ST;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papStationName];
  theWrkP->group = 0x0008;
  theWrkP->element = 0x1010;
  theWrkP->length = 0L;
  theWrkP->vr = SH;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papInstitutionalDepartmentName];
  theWrkP->group = 0x0008;
  theWrkP->element = 0x1040;
  theWrkP->length = 0L;
  theWrkP->vr = LO;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papManufacturersModelName];
  theWrkP->group = 0x0008;
  theWrkP->element = 0x1090;
  theWrkP->length = 0L;
  theWrkP->vr = LO;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papDeviceSerialNumberGE];
  theWrkP->group = 0x0018;
  theWrkP->element = 0x1000;
  theWrkP->length = 0L;
  theWrkP->vr = LO;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papSoftwareVersionsGE];
  theWrkP->group = 0x0018;
  theWrkP->element = 0x1020;
  theWrkP->length = 0L;
  theWrkP->vr = LO;
  theWrkP->vm = "1-n";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papSpatialResolution];
  theWrkP->group = 0x0018;
  theWrkP->element = 0x1050;
  theWrkP->length = 0L;
  theWrkP->vr = DS;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papDateofLastCalibration];
  theWrkP->group = 0x0018;
  theWrkP->element = 0x1200;
  theWrkP->length = 0L;
  theWrkP->vr = DA;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papTimeofLastCalibration];
  theWrkP->group = 0x0018;
  theWrkP->element = 0x1201;
  theWrkP->length = 0L;
  theWrkP->vr = TM;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papPixelPaddingValue];
  theWrkP->group = 0x0028;
  theWrkP->element = 0x0120;
  theWrkP->length = 0L;
  theWrkP->vr = USS;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
}
void init_GeneralEquipment ( SElement ioElem [ ] ) { SElement * theWrkP ; theWrkP = & ioElem [ papManufacturerGE ] ; theWrkP -> group = 0x0008 ; theWrkP -> element = 0x0070 ; theWrkP -> length = 0L ; theWrkP -> vr = LO ; theWrkP -> vm = " " ; theWrkP -> type_t = T2 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papInstitutionNameGE ] ; theWrkP -> group = 0x0008 ; theWrkP -> element = 0x0080 ; theWrkP -> length = 0L ; theWrkP -> vr = LO ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papInstitutionAddressGE ] ; theWrkP -> group = 0x0008 ; theWrkP -> element = 0x0081 ; theWrkP -> length = 0L ; theWrkP -> vr = ST ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papStationName ] ; theWrkP -> group = 0x0008 ; theWrkP -> element = 0x1010 ; theWrkP -> length = 0L ; theWrkP -> vr = SH ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papInstitutionalDepartmentName ] ; theWrkP -> group = 0x0008 ; theWrkP -> element = 0x1040 ; theWrkP -> length = 0L ; theWrkP -> vr = LO ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papManufacturersModelName ] ; theWrkP -> group = 0x0008 ; theWrkP -> element = 0x1090 ; theWrkP -> length = 0L ; theWrkP -> vr = LO ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papDeviceSerialNumberGE ] ; theWrkP -> group = 0x0018 ; theWrkP -> element = 0x1000 ; theWrkP -> length = 0L ; theWrkP -> vr = LO ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papSoftwareVersionsGE ] ; theWrkP -> group = 0x0018 ; theWrkP -> element = 0x1020 ; theWrkP -> length = 0L ; theWrkP -> vr = LO ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papSpatialResolution ] ; theWrkP -> group = 0x0018 ; theWrkP -> element = 0x1050 ; theWrkP -> length = 0L ; theWrkP -> vr = DS ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papDateofLastCalibration ] ; theWrkP -> group = 0x0018 ; theWrkP -> element = 0x1200 ; theWrkP -> length = 0L ; theWrkP -> vr = DA ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papTimeofLastCalibration ] ; theWrkP -> group = 0x0018 ; theWrkP -> element = 0x1201 ; theWrkP -> length = 0L ; theWrkP -> vr = TM ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papPixelPaddingValue ] ; theWrkP -> group = 0x0028 ; theWrkP -> element = 0x0120 ; theWrkP -> length = 0L ; theWrkP -> vr = USS ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; }
init_GeneralEquipment : initializes the elements of the module
General Equipment
init_GeneralEquipment : initializes the elements of the module General Equipment