#!/bin/sh
#!/bin/sh

EXPR='<or><and><term>Lorraine (région)</term><term index="AffPays">Luxembourg (pays)</term></and><and><term>Lorraine (région)</term><term>Région wallonne</term></and><and><term>Lorraine (région)</term><or><term>Sarre (Land)</term><term>Rhénanie-Palatinat</term></or></and><and><term index="AffPays">Luxembourg (pays)</term><term>Région wallonne</term></and><and><term index="AffPays">Luxembourg (pays)</term><or><term>Sarre (Land)</term><term>Rhénanie-Palatinat</term></or></and><and><term>Région wallonne</term><or><term>Sarre (Land)</term><term>Rhénanie-Palatinat</term></or></and></or>'

while getopts aAblx c
do
  case $c in
     A) EXPR='<or><term>Lorraine (région)</term><term index="AffPays">Luxembourg (pays)</term><term>Région wallonne</term><term>Sarre (Land)</term><term>Rhénanie-Palatinat</term></or></or>' ;;
     x) HfdBaseQuery -b $EXPLOR_AREA/Data/Main/Exploration  -i AffRegion -e "$EXPR"
        exit ;;
     l) HfdBaseQuery -b $EXPLOR_AREA/Data/Main/Exploration  -i AffRegion -e "$EXPR" | SxmlSelect -s result/l/e/1 -p @s1
        exit ;;
  esac
done

HfdBaseQuery -b $EXPLOR_AREA/Data/Main/Exploration  -i AffRegion -e "$EXPR"