xp_comm_proj/rd_dicom/Papyrus3/PapyInitModules3.c
/********************************************************************************/
/*										*/
/*	init_XRayGrid : initializes the elements of the module		        */
/*	XRay Grid 							        */
/*										*/
/********************************************************************************/
init_XRayGrid : initializes the elements of the module
XRay Grid
init_XRayGrid : initializes the elements of the module XRay Grid
void
init_XRayGrid (SElement ioElem [])
{
  SElement	*theWrkP;
  theWrkP = &ioElem [papGridXRG];
  theWrkP->group = 0x0018;
  theWrkP->element = 0x1166;
  theWrkP->length = 0L;
  theWrkP->vr = CS;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papGridAbsorbingMaterialXRG];
  theWrkP->group = 0x0018;
  theWrkP->element = 0x7040;
  theWrkP->length = 0L;
  theWrkP->vr = LT;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papGridSpacingMaterialXRG];
  theWrkP->group = 0x0018;
  theWrkP->element = 0x7041;
  theWrkP->length = 0L;
  theWrkP->vr = LT;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papGridThicknessXRG];
  theWrkP->group = 0x0018;
  theWrkP->element = 0x7042;
  theWrkP->length = 0L;
  theWrkP->vr = DS;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papGridPitchXRG];
  theWrkP->group = 0x0018;
  theWrkP->element = 0x7044;
  theWrkP->length = 0L;
  theWrkP->vr = DS;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papGridAspectRatioXRG];
  theWrkP->group = 0x0018;
  theWrkP->element = 0x7046;
  theWrkP->length = 0L;
  theWrkP->vr = IS;
  theWrkP->vm = "2";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papGridPeriodXRG];
  theWrkP->group = 0x0018;
  theWrkP->element = 0x7048;
  theWrkP->length = 0L;
  theWrkP->vr = DS;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
  theWrkP = &ioElem [papGridFocalDistanceXRG];
  theWrkP->group = 0x0018;
  theWrkP->element = 0x704C;
  theWrkP->length = 0L;
  theWrkP->vr = DS;
  theWrkP->vm = "1";
  theWrkP->type_t = T3;
  theWrkP->nb_val = 0;
  theWrkP->value = NULL;
}
void init_XRayGrid ( SElement ioElem [ ] ) { SElement * theWrkP ; theWrkP = & ioElem [ papGridXRG ] ; theWrkP -> group = 0x0018 ; theWrkP -> element = 0x1166 ; theWrkP -> length = 0L ; theWrkP -> vr = CS ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papGridAbsorbingMaterialXRG ] ; theWrkP -> group = 0x0018 ; theWrkP -> element = 0x7040 ; theWrkP -> length = 0L ; theWrkP -> vr = LT ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papGridSpacingMaterialXRG ] ; theWrkP -> group = 0x0018 ; theWrkP -> element = 0x7041 ; theWrkP -> length = 0L ; theWrkP -> vr = LT ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papGridThicknessXRG ] ; theWrkP -> group = 0x0018 ; theWrkP -> element = 0x7042 ; theWrkP -> length = 0L ; theWrkP -> vr = DS ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papGridPitchXRG ] ; theWrkP -> group = 0x0018 ; theWrkP -> element = 0x7044 ; theWrkP -> length = 0L ; theWrkP -> vr = DS ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papGridAspectRatioXRG ] ; theWrkP -> group = 0x0018 ; theWrkP -> element = 0x7046 ; theWrkP -> length = 0L ; theWrkP -> vr = IS ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papGridPeriodXRG ] ; theWrkP -> group = 0x0018 ; theWrkP -> element = 0x7048 ; theWrkP -> length = 0L ; theWrkP -> vr = DS ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; theWrkP = & ioElem [ papGridFocalDistanceXRG ] ; theWrkP -> group = 0x0018 ; theWrkP -> element = 0x704C ; theWrkP -> length = 0L ; theWrkP -> vr = DS ; theWrkP -> vm = " " ; theWrkP -> type_t = T3 ; theWrkP -> nb_val = 0 ; theWrkP -> value = NULL ; }
init_XRayGrid : initializes the elements of the module
XRay Grid
init_XRayGrid : initializes the elements of the module XRay Grid