function setShape(st) {
         if(st.length > 0) {
            shSelBox = document.getElementById('columnShape');
            while (shSelBox.firstChild)
               remove(shSelBox.firstChild);

            if((st == 'P1001') || (st == 'P3002') || (st == 'P3004')) {
               elm = document.createElement('OPTION');
               elm.value = '';
               elmTxt = document.createTextNode('');
               elm.appendChild(elmTxt);
               shSelBox.appendChild(elm);
               elm = document.createElement('OPTION');
               elm.value = 'R1';
               elmTxt = document.createTextNode('R1');
               elm.appendChild(elmTxt);
               shSelBox.appendChild(elm);
               elm = document.createElement('OPTION');
               elm.value = 'R2';
               elmTxt = document.createTextNode('R2');
               elm.appendChild(elmTxt);
               shSelBox.appendChild(elm);
               elm = document.createElement('OPTION');
               elm.value = 'R3';
               elmTxt = document.createTextNode('R3');
               elm.appendChild(elmTxt);
               shSelBox.appendChild(elm);
            } else {
               elm = document.createElement('OPTION');
               elm.value = '';
               elmTxt = document.createTextNode('');
               elm.appendChild(elmTxt);
               shSelBox.appendChild(elm);
               elm = document.createElement('OPTION');
               elm.value = 'P1.5';
               elmTxt = document.createTextNode('P1.5');
               elm.appendChild(elmTxt);
               shSelBox.appendChild(elm);
               elm = document.createElement('OPTION');
               elm.value = 'P1.7';
               elmTxt = document.createTextNode('P1.7');
               elm.appendChild(elmTxt);
               shSelBox.appendChild(elm);
               elm = document.createElement('OPTION');
               elm.value = 'P1.9';
               elmTxt = document.createTextNode('P1.9');
               elm.appendChild(elmTxt);
               shSelBox.appendChild(elm);
               elm = document.createElement('OPTION');
               elm.value = 'P2.5';
               elmTxt = document.createTextNode('P2.5');
               elm.appendChild(elmTxt);
               shSelBox.appendChild(elm);
               elm = document.createElement('OPTION');
               elm.value = 'P2.7';
               elmTxt = document.createTextNode('P2.7');
               elm.appendChild(elmTxt);
               shSelBox.appendChild(elm);
               elm = document.createElement('OPTION');
               elm.value = 'P2.9';
               elmTxt = document.createTextNode('P2.9');
               elm.appendChild(elmTxt);
               shSelBox.appendChild(elm);
               elm = document.createElement('OPTION');
               elm.value = 'BC1.0';
               elmTxt = document.createTextNode('BC1.0');
               elm.appendChild(elmTxt);
               shSelBox.appendChild(elm);
               elm = document.createElement('OPTION');
               elm.value = 'BC2.0';
               elmTxt = document.createTextNode('BC2.0');
               elm.appendChild(elmTxt);
               shSelBox.appendChild(elm);
            }
         }
      }

      function remove(elem) {
         if (elem) elem.parentNode.removeChild(elem);
      }