xp_comm_proj/rd_dicom/Papyrus3/PapyInitModules3.c
/********************************************************************************/
/*										*/
/*	init_GeneralPatientSummary : initializes the elements of the module	*/
/*	General Patient Summary 						*/
/*										*/
/********************************************************************************/
init_GeneralPatientSummary : initializes the elements of the module
General Patient Summary
init_GeneralPatientSummary : initializes the elements of the module General Patient Summary
void
init_GeneralPatientSummary (SElement ioElem [])
{
  SElement	*theWrkP;
  theWrkP = &ioElem [papPatientsNameGPS];
  theWrkP->group = 0x0010;
  theWrkP->element = 0x0010;
  theWrkP->length = 0L;
  theWrkP->vr = PN;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papPatientsID];
  theWrkP->group = 0x0010;
  theWrkP->element = 0x0020;
  theWrkP->length = 0L;
  theWrkP->vr = LO;
  theWrkP->vm = "M";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papPatientsBirthDateGPS];
  theWrkP->group = 0x0010;
  theWrkP->element = 0x0030;
  theWrkP->length = 0L;
  theWrkP->vr = DA;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papPatientsSexGPS];
  theWrkP->group = 0x0010;
  theWrkP->element = 0x0040;
  theWrkP->length = 0L;
  theWrkP->vr = CS;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papPatientsHeight];
  theWrkP->group = 0x0010;
  theWrkP->element = 0x1020;
  theWrkP->length = 0L;
  theWrkP->vr = DS;
  theWrkP->vm = "M";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papPatientsWeightGPS];
  theWrkP->group = 0x0010;
  theWrkP->element = 0x1030;
  theWrkP->length = 0L;
  theWrkP->vr = DS;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
}
void init_GeneralPatientSummary ( SElement ioElem [ ] ) { SElement * theWrkP ; theWrkP = & ioElem [ papPatientsNameGPS ] ; theWrkP -> group = 0x0010 ; theWrkP -> element = 0x0010 ; theWrkP -> length = 0L ; theWrkP -> vr = PN ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papPatientsID ] ; theWrkP -> group = 0x0010 ; theWrkP -> element = 0x0020 ; theWrkP -> length = 0L ; theWrkP -> vr = LO ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papPatientsBirthDateGPS ] ; theWrkP -> group = 0x0010 ; theWrkP -> element = 0x0030 ; theWrkP -> length = 0L ; theWrkP -> vr = DA ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papPatientsSexGPS ] ; theWrkP -> group = 0x0010 ; theWrkP -> element = 0x0040 ; theWrkP -> length = 0L ; theWrkP -> vr = CS ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papPatientsHeight ] ; theWrkP -> group = 0x0010 ; theWrkP -> element = 0x1020 ; theWrkP -> length = 0L ; theWrkP -> vr = DS ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papPatientsWeightGPS ] ; theWrkP -> group = 0x0010 ; theWrkP -> element = 0x1030 ; theWrkP -> length = 0L ; theWrkP -> vr = DS ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; }
init_GeneralPatientSummary : initializes the elements of the module
General Patient Summary
init_GeneralPatientSummary : initializes the elements of the module General Patient Summary