xp_comm_proj/rd_dicom/Papyrus3/PapyInitModules3.c
/********************************************************************************/
/*										*/
/*	init_VisitScheduling : initializes the elements of the module		*/
/*	Visit Scheduling 							*/
/*										*/
/********************************************************************************/
init_VisitScheduling : initializes the elements of the module
Visit Scheduling
init_VisitScheduling : initializes the elements of the module Visit Scheduling
void
init_VisitScheduling (SElement ioElem [])
{
  SElement	*theWrkP;
  theWrkP = &ioElem [papScheduledAdmissionDate];
  theWrkP->group = 0x0038;
  theWrkP->element = 0x001A;
  theWrkP->length = 0L;
  theWrkP->vr = DA;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papScheduledAdmissionTime];
  theWrkP->group = 0x0038;
  theWrkP->element = 0x001B;
  theWrkP->length = 0L;
  theWrkP->vr = TM;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papScheduledDischargeDate];
  theWrkP->group = 0x0038;
  theWrkP->element = 0x001C;
  theWrkP->length = 0L;
  theWrkP->vr = DA;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papScheduledDischargeTime];
  theWrkP->group = 0x0038;
  theWrkP->element = 0x001D;
  theWrkP->length = 0L;
  theWrkP->vr = TM;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papScheduledPatientInstitutionResidence];
  theWrkP->group = 0x0038;
  theWrkP->element = 0x001E;
  theWrkP->length = 0L;
  theWrkP->vr = LO;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
}
void init_VisitScheduling ( SElement ioElem [ ] ) { SElement * theWrkP ; theWrkP = & ioElem [ papScheduledAdmissionDate ] ; theWrkP -> group = 0x0038 ; theWrkP -> element = 0x001A ; theWrkP -> length = 0L ; theWrkP -> vr = DA ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papScheduledAdmissionTime ] ; theWrkP -> group = 0x0038 ; theWrkP -> element = 0x001B ; theWrkP -> length = 0L ; theWrkP -> vr = TM ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papScheduledDischargeDate ] ; theWrkP -> group = 0x0038 ; theWrkP -> element = 0x001C ; theWrkP -> length = 0L ; theWrkP -> vr = DA ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papScheduledDischargeTime ] ; theWrkP -> group = 0x0038 ; theWrkP -> element = 0x001D ; theWrkP -> length = 0L ; theWrkP -> vr = TM ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papScheduledPatientInstitutionResidence ] ; theWrkP -> group = 0x0038 ; theWrkP -> element = 0x001E ; theWrkP -> length = 0L ; theWrkP -> vr = LO ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; }
init_VisitScheduling : initializes the elements of the module
Visit Scheduling
init_VisitScheduling : initializes the elements of the module Visit Scheduling