V 8
2
LANG:0 16 IS-Tabellentypen
LANG:1 14 IS-Table types
PANEL,34 47 599 338 N "_3DFace" 0
"main()
{
  int        i;
  dyn_int    TableFieldLength,TableFieldIndexType;
  dyn_string TableType=dpNames(\"*\",\"_IS_TableType\"),
             TableFieldName,TableFieldType,TableFieldOrigin;

  string st;

  if (!_WIN32)
  {
    st=getCurrentTime();
    DebugN(\"IS::: \"+st+\" Error: Information Server runs only under Windows NT !\");
    RootPanelOn(\"vision/MessageWarning\",
      getCatStr(\"para\",\"warning\"),
      makeDynString(\"IS::: \"+st+\"\\nError: Information Server runs only under Windows NT !\"));
    return;
  }

  for (i=1;i<=dynlen(TableType);i++)
    TableType[i]=dpSubStr(TableType[i],DPSUB_DP);

  if (dynlen(TableType)<1 || dynContains(TableType,\"StandardHistory\")<1)
  {
    dpCreate(\"StandardHistory\",\"_IS_TableType\");
    dpSet(\"StandardHistory.TableFieldName:_original.._value\",
               makeDynString(\"DPE\",\"Zeit\",\"Wert\",\"Status\"),
          \"StandardHistory.TableFieldType:_original.._value\",
               makeDynString(\"String\",\"Date\",\"Double\",\"Long\"),
          \"StandardHistory.TableFieldLength:_original.._value\",
               makeDynInt(255,1,1,1),
          \"StandardHistory.TableFieldOrigin:_original.._value\",
               makeDynString(\"DPE\",\"_original.._stime\",\"_original.._value\",\"_original.._status\"),
          \"StandardHistory.TableFieldIndexType:_original.._value\",
               makeDynString(1,1,0,0));
    dynInsertAt(TableType,\"StandardHistory\",1);
  }
  
  dpGet(\"StandardHistory.TableFieldName:_original.._value\",TableFieldName,
        \"StandardHistory.TableFieldType:_original.._value\",TableFieldType,
        \"StandardHistory.TableFieldLength:_original.._value\",TableFieldLength,
        \"StandardHistory.TableFieldOrigin:_original.._value\",TableFieldOrigin,
        \"StandardHistory.TableFieldIndexType:_original.._value\",TableFieldIndexType);

  setMultiValue(\"TableFieldLength\",\"visible\",(TableFieldType[1]==\"String\"),
                \"TableFieldLength_txt\",\"visible\",(TableFieldType[1]==\"String\"));
  setMultiValue(\"TableType\",\"text\",\"StandardHistory\",
                \"TableType\",\"items\",TableType,
                \"TableFieldName\",\"selectedPos\",1,
                \"TableFieldName\",\"items\",TableFieldName,
                \"TableFieldType\",\"text\",TableFieldType[1],
                \"TableFieldLength\",\"text\",TableFieldLength[1],
                \"TableFieldOrigin\",\"text\",TableFieldOrigin[1],
                \"TableFieldIndexType\",\"state\",0,TableFieldIndexType[1]);
}" 0
 E E E E 1 -1 -1 0  10 10
""
NC
DISPLAY_LAYER, 1 1 1 1 1 1 1 1
LAYER, 0 
2
LANG:0 0 
LANG:1 0 
6 0
""
""
10 20 E E E 1 E 1 E N "_Window" E N "_3DFace" E E
 E EE E 0 0 0 0 1 E 0.983050847457628 0 0.714285714285711 1.16949152542372 36.7142857142858 0 E 10 20 600 90
6 1
""
""
10 20 E E E 1 E 1 E N "_3DText" E N "_3DFace" E E
 E EE E 0 0 0 0 1 E 0.983050847457627 0 0.714285714285711 0.169491525423727 35.7142857142857 0 E 10 20 600 90
2 4
""
""
20 -170 E E E 1 E 1 E N "_3DText" E N "_3DFace" E E
 E EE E 0 0 0 0 1 E U  1 E 0 0 0 "s" 0 0 0 0 0 0  20 10 1
2
LANG:0 68 -microsoft windows-arial-bold-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 68 -microsoft windows-arial-bold-r-normal-*-*-120-100-100-*-*-iso8859-1
0
2
LANG:0 27  Tabellentyp-Einstellungen 
LANG:1 21  Table type settings 
6 10
""
""
10 20 E E E 1 E 1 E N "_3DText" E N "_3DFace" E E
 E EE E 0 0 0 0 1 E 0.983050847457627 0 2.42857142857143 0.169491525423727 71.4285714285713 0 E 10 20 600 90
6 11
""
""
10 20 E E E 1 E 1 E N "_Window" E N "_3DFace" E E
 E EE E 0 0 0 0 1 E 0.983050847457628 0 2.42857142857143 1.16949152542372 72.4285714285714 0 E 10 20 600 90
13 15
""
""
310 60 E E E 1 E 1 E N "_3DText" E N "_3DFace" E E
 E E2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
 310 60 370 87

T 
2
LANG:0 3 Neu
LANG:1 3 New
"main()
{
  int        i;
  dyn_int    TableFieldLength,TableFieldIndexType;
  dyn_float  df;
  dyn_string TableType,ds,
             TableFieldName,TableFieldType,TableFieldOrigin;

  ChildPanelOnCentralModalReturn(\"vision/is/IS_NewTableType.pnl\",
    getCatStr(\"IS\",\"newtabletype\"),
    makeDynString(\"$TableType:\"),df,ds);

  if (df[1]<1) return;
  
  TableType=dpNames(\"*\",\"_IS_TableType\");
  
  for (i=1;i<=dynlen(TableType);i++)
    TableType[i]=dpSubStr(TableType[i],DPSUB_DP);

  if (dynlen(TableType)<1 || dynContains(TableType,\"StandardHistory\")<1)
  {
    dpCreate(\"StandardHistory\",\"_IS_TableType\");
    dpSet(\"StandardHistory.TableFieldName:_original.._value\",
               makeDynString(\"DPE\",\"Zeit\",\"Wert\",\"Status\"),
          \"StandardHistory.TableFieldType:_original.._value\",
               makeDynString(\"String\",\"Date\",\"Double\",\"Long\"),
          \"StandardHistory.TableFieldLength:_original.._value\",
               makeDynInt(255,0,0,0),
          \"StandardHistory.TableFieldOrigin:_original.._value\",
               makeDynString(\"DPE\",\"_original.._stime\",\"_original.._value\",\"_original.._status\"),
          \"StandardHistory.TableFieldIndexType:_original.._value\",
               makeDynString(1,1,0,0));
    dynInsertAt(TableType,\"StandardHistory\",1);
  }
  
  dpGet(\"StandardHistory.TableFieldName:_original.._value\",TableFieldName,
        \"StandardHistory.TableFieldType:_original.._value\",TableFieldType,
        \"StandardHistory.TableFieldLength:_original.._value\",TableFieldLength,
        \"StandardHistory.TableFieldOrigin:_original.._value\",TableFieldOrigin,
        \"StandardHistory.TableFieldIndexType:_original.._value\",TableFieldIndexType);

  setMultiValue(\"TableFieldLength\",\"visible\",(TableFieldType[1]==\"String\"),
                \"TableFieldLength_txt\",\"visible\",(TableFieldType[1]==\"String\"));
  setMultiValue(\"TableType\",\"text\",\"StandardHistory\",
                \"TableType\",\"items\",TableType,
                \"TableFieldName\",\"selectedPos\",1,
                \"TableFieldName\",\"items\",TableFieldName,
                \"TableFieldType\",\"text\",TableFieldType[1],
                \"TableFieldLength\",\"text\",TableFieldLength[1],
                \"TableFieldOrigin\",\"text\",TableFieldOrigin[1],
                \"TableFieldIndexType\",\"state\",0,TableFieldIndexType[1]);
}" 0
 E E E
13 16
""
""
520 60 E E E 1 E 1 E N "_3DText" E N "_3DFace" E E
 E E2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
 520 60 580 87

T 
2
LANG:0 7 Löschen
LANG:1 6 Delete
"main()
{
  int          i;
  string       TableType,type;
  dyn_float    df;
  dyn_string   ds,TableTypes,
               _IS_Table=dpNames(\"*\",\"_IS_Table\");

  getValue(\"TableType\",\"text\",TableType,
                       \"items\",TableTypes);
  if (!dpExists(TableType) || dpTypeName(TableType)!=\"_IS_TableType\")
    return;

  if  (TableType==\"StandardHistory\")
  {
    // error: used tabletype cannot be deleted
    ISShowWarning(\"usedtabletypecannotbedeleted\",\"StandardHistory\");
    return;
  }
  for (i=1;i<=dynlen(_IS_Table);i++)
  {
    dpGet(_IS_Table[i]+\".TableType:_original.._value\",type);
    if  (type==TableType)
    {
      // error: used tabletype cannot be deleted
      ISShowWarning(\"usedtabletypecannotbedeleted\",TableType+\" in \"+_IS_Table[i]);
      return;
    }
  }

  ChildPanelOnCentralModalReturn(\"vision/is/IS_MessageInfo.pnl\",
    getCatStr(\"IS\",\"deletingtabletype\")+TableType,
    makeDynString(getCatStr(\"IS\",\"deletetabletype\"),
                  getCatStr(\"IS\",\"yes\"),
                  getCatStr(\"IS\",\"no\")),
    df,ds);

  if (df[1]==1)
  {
    dpDelete(TableType);
    ISShowWarning(\"tabletypedeleted\",TableType);
    dynRemove(TableTypes,dynContains(TableTypes,TableType));
    setMultiValue(\"TableType\",\"text\",\"\",
                  \"TableType\",\"items\",TableTypes);
    setMultiValue(\"TableType\",\"text\",\"\",
                  \"TableFieldName\",\"items\",makeDynString(),
                  \"TableFieldType\",\"text\",\"\",
                  \"TableFieldLength\",\"text\",\"\",
                  \"TableFieldOrigin\",\"text\",\"\",
                  \"TableFieldIndexType\",\"state\",0,0);
  }
}" 0
 E E E
22 17
"TableType"
""
20 60 E E E 1 E 1 E N [0,0,0] E N "_Window" E E
 E E2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
 20 60 300 89
0

E
"main()
{
  int        i,pos;
  string     TableType;
  dyn_int    TableFieldLength;
  dyn_string TableFieldName,TableFieldType,TableFieldOrigin,TableFieldIndexType;

  getValue(\"\",\"text\",TableType);  
  
  dpGet(TableType+\".TableFieldName:_original.._value\",TableFieldName,
        TableType+\".TableFieldType:_original.._value\",TableFieldType,
        TableType+\".TableFieldLength:_original.._value\",TableFieldLength,
        TableType+\".TableFieldOrigin:_original.._value\",TableFieldOrigin,
        TableType+\".TableFieldIndexType:_original.._value\",TableFieldIndexType);

  setMultiValue(\"TableFieldLength\",\"visible\",(TableFieldType[1]==\"String\"),
                \"TableFieldLength_txt\",\"visible\",(TableFieldType[1]==\"String\"));
  setMultiValue(\"TableType\",\"text\",TableType,
                \"TableFieldName\",\"selectedPos\",1,
                \"TableFieldName\",\"items\",TableFieldName,
                \"TableFieldType\",\"text\",TableFieldType[1],
                \"TableFieldLength\",\"text\",TableFieldLength[1],
                \"TableFieldOrigin\",\"text\",TableFieldOrigin[1],
                \"TableFieldIndexType\",\"state\",0,TableFieldIndexType[1]);
}" 0

E
 0 0
17 20
"TableFieldName"
""
20 150 E E E 1 E 1 E N "_WindowText" E N "_3DFace" E E
 E E2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
 20 150 310 280
0

E
"main()
{
  int        i,pos;
  string     TableType;
  dyn_int    TableFieldLength,TableFieldIndexType;
  dyn_string TableFieldName,TableFieldType,TableFieldOrigin;

  getMultiValue(\"TableType\",\"text\",TableType,
                \"\",\"selectedPos\",pos);
  
  dpGet(TableType+\".TableFieldType:_original.._value\",TableFieldType,
        TableType+\".TableFieldLength:_original.._value\",TableFieldLength,
        TableType+\".TableFieldOrigin:_original.._value\",TableFieldOrigin,
        TableType+\".TableFieldIndexType:_original.._value\",TableFieldIndexType);

  setMultiValue(\"TableFieldLength\",\"visible\",(TableFieldType[pos]==\"String\"),
                \"TableFieldLength_txt\",\"visible\",(TableFieldType[pos]==\"String\"));
  setMultiValue(\"TableFieldType\",\"text\",TableFieldType[pos],
                \"TableFieldLength\",\"text\",TableFieldLength[pos],
                \"TableFieldOrigin\",\"text\",TableFieldOrigin[pos],
                \"TableFieldIndexType\",\"state\",0,TableFieldIndexType[pos]);
}" 0

E

0 1
2 21
""
""
20 -128 E E E 1 E 1 E N "_3DText" E N "_3DFace" E E
 E EE E 0 0 0 0 1 E U  1 E 0 0 0 "s" 0 0 0 0 0 0  20 40 1
2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
2
LANG:0 15  Tabellentypen 
LANG:1 13  Table types 
2 22
""
""
20 -58 E E E 1 E 1 E N "_3DText" E N "_3DFace" E E
 E EE E 0 0 0 0 1 E U  1 E 0 0 0 "s" 0 0 0 0 0 0  20 110 1
2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
2
LANG:0 15  Eigenschaften 
LANG:1 12  Properties 
2 23
""
""
20 -38 E E E 1 E 1 E N "_3DText" E N "_3DFace" E E
 E EE E 0 0 0 0 1 E U  1 E 0 0 0 "s" 0 0 0 0 0 0  20 130 1
2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
2
LANG:0 12  Feldnamen: 
LANG:1 14  Field names: 
2 24
"TableFieldLength_txt"
""
320 49 E E E 1 E 1 E N "_3DText" E N "_3DFace" E E
 E EE E 0 0 0 0 1 E U  1 E 0 0 0 "s" 0 0 0 0 0 0  320 217 1
2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
2
LANG:0 12  Feldlänge: 
LANG:1 15  Field length: 
14 26
"TableFieldLength"
""
409 210 E E E 1 E 1 E N "_WindowText" E N "_3DFace" E E
 E E2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
 409 210 576 239
2 "s" 0 0 0 0 0 -1  E E E
2 27
""
""
320 19 E E E 1 E 1 E N "_3DText" E N "_3DFace" E E
 E EE E 0 0 0 0 1 E U  1 E 0 0 0 "s" 0 0 0 0 0 0  320 187 1
2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
2
LANG:0 10  Feldtyp: 
LANG:1 13  Field type: 
14 28
"TableFieldType"
""
409 180 E E E 1 E 1 E N "_WindowText" E N "_3DFace" E E
 E E2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
 409 180 576 209
2 "s" 0 0 0 0 0 -1  E E E
2 29
""
""
320 -11 E E E 1 E 1 E N "_3DText" E N "_3DFace" E E
 E EE E 0 0 0 0 1 E U  1 E 0 0 0 "s" 0 0 0 0 0 0  320 157 1
2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
2
LANG:0 9  Quelle: 
LANG:1 9  Origin: 
14 30
"TableFieldOrigin"
""
409 150 E E E 1 E 1 E N "_WindowText" E N "_3DFace" E E
 E E2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
 409 150 576 179
2 "s" 0 0 0 0 0 -1  E E E
2 31
""
""
320 79 E E E 1 E 1 E N "_3DText" E N "_3DFace" E E
 E EE E 0 0 0 0 1 E U  1 E 0 0 0 "s" 0 0 0 0 0 0  320 247 1
2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
2
LANG:0 12  Indiziert: 
LANG:1 10  Indexed: 
13 33
""
""
480 300 E E E 1 E 1 E N "_3DText" E N "_3DFace" E E
 E E2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
 480 300 590 327

T 
2
LANG:0 9 Schließen
LANG:1 5 Close
"main()
{
  PanelOff();
}" 0
 E E E
13 34
""
""
380 60 E E E 1 E 1 E N "_3DText" E N "_3DFace" E E
 E E2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
 380 60 440 87

T 
2
LANG:0 6 Ändern
LANG:1 6 Modify
"main()
{
  int        i;
  string     s,type;
  dyn_int    TableFieldLength,TableFieldIndexType;
  dyn_float  df;
  dyn_string TableType,ds,
             TableFieldName,TableFieldType,TableFieldOrigin,
            _IS_Table=dpNames(\"*\",\"_IS_Table\");

  getValue(\"TableType\",\"text\",s);
  if (s==\"\") return;
  
  if  (s==\"StandardHistory\")
  {
    // error: tabletype StandardHistory cannot be modified
    ISShowWarning(\"standardcannotbemodified\",\"StandardHistory\");
    return;
  }
  for (i=1;i<=dynlen(_IS_Table);i++)
  {
    dpGet(_IS_Table[i]+\".TableType:_original.._value\",type);
    if  (type==s)
    {
      // error: used tabletype cannot be deleted
      ISShowWarning(\"usedtabletypecannotbechanged\",s+\" in \"+_IS_Table[i]);
      return;
    }
  }
  
  ChildPanelOnCentralModalReturn(\"vision/is/IS_NewTableType.pnl\",
    getCatStr(\"IS\",\"newtabletype\"),
    makeDynString(\"$TableType:\"+s),df,ds);

  if (df[1]<1) return;
  
  TableType=dpNames(\"*\",\"_IS_TableType\");
  
  for (i=1;i<=dynlen(TableType);i++)
    TableType[i]=dpSubStr(TableType[i],DPSUB_DP);

  if (dynlen(TableType)<1 || dynContains(TableType,\"StandardHistory\")<1)
  {
    dpCreate(\"StandardHistory\",\"_IS_TableType\");
    dpSet(\"StandardHistory.TableFieldName:_original.._value\",
               makeDynString(\"DPE\",\"Zeit\",\"Wert\",\"Status\"),
          \"StandardHistory.TableFieldType:_original.._value\",
               makeDynString(\"String\",\"Date\",\"Double\",\"Long\"),
          \"StandardHistory.TableFieldLength:_original.._value\",
               makeDynInt(255,0,0,0),
          \"StandardHistory.TableFieldOrigin:_original.._value\",
               makeDynString(\"DPE\",\"_original.._stime\",\"_original.._value\",\"_original.._status\"),
          \"StandardHistory.TableFieldIndexType:_original.._value\",
               makeDynString(1,1,0,0));
    dynInsertAt(TableType,\"StandardHistory\",1);
  }
  
  dpGet(\"StandardHistory.TableFieldName:_original.._value\",TableFieldName,
        \"StandardHistory.TableFieldType:_original.._value\",TableFieldType,
        \"StandardHistory.TableFieldLength:_original.._value\",TableFieldLength,
        \"StandardHistory.TableFieldOrigin:_original.._value\",TableFieldOrigin,
        \"StandardHistory.TableFieldIndexType:_original.._value\",TableFieldIndexType);

  setMultiValue(\"TableFieldLength\",\"visible\",(TableFieldType[1]==\"String\"),
                \"TableFieldLength_txt\",\"visible\",(TableFieldType[1]==\"String\"));
  setMultiValue(\"TableType\",\"text\",\"StandardHistory\",
                \"TableType\",\"items\",TableType,
                \"TableFieldName\",\"selectedPos\",1,
                \"TableFieldName\",\"items\",TableFieldName,
                \"TableFieldType\",\"text\",TableFieldType[1],
                \"TableFieldLength\",\"text\",TableFieldLength[1],
                \"TableFieldOrigin\",\"text\",TableFieldOrigin[1],
                \"TableFieldIndexType\",\"state\",0,TableFieldIndexType[1]);
}" 0
 E E E
13 35
"copy"
""
450 60 E E E 1 E 1 E N "_3DText" E N "_3DFace" E E
 E E2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
 450 60 510 87

T 
2
LANG:0 8 Kopieren
LANG:1 4 Copy
"main()
{
  int            pos,l;
  string         from,s,
                 TableFieldType,TableFieldLength,TableFieldOrigin;
  dyn_int        index;
  dyn_float      df;
  dyn_string     ds,types,list,type,length,origin;

  getValue(\"TableType\",\"text\",from,
                       \"items\",types);
  // table type name
  ChildPanelOnCentralModalReturn(\"vision/is/IS_NewGroup.pnl\",
    getCatStr(\"IS\",\"copytabletype\"),makeDynString(),df,ds);


  if (dynlen(ds)<1) return;

  s=strrtrim(strltrim(ds[1]));
  if (s==\"\")
  {
    ISShowWarning(\"emptytabletypename\",s);
    return;
  }

  if (!IS_CheckChar(s))
  {
    ISShowWarning(\"invalidchar\",\"\");
    return;
  }

  if (dpExists(s) && dpTypeName(s)!=\"_IS_TableType\")
  {
    ISShowWarning(\"dpnameoccupied\",s);
    return;
  }

  if (dynContains(types,s)>0)
  {
    df=makeDynFloat(); ds=makeDynString();
    ChildPanelOnCentralModalReturn(\"vision/is/IS_MessageInfo.pnl\",
      getCatStr(\"para\",\"warning\"),
      makeDynString(getCatStr(\"IS\",\"overwritetabletype\"),
                    getCatStr(\"IS\",\"yes\"),
                    getCatStr(\"IS\",\"no\")),df,ds);
    if (df[1]==0) return;
  }

  dpGet(from+\".TableFieldName:_original.._value\",list,
        from+\".TableFieldType:_original.._value\",type,
        from+\".TableFieldLength:_original.._value\",length,
        from+\".TableFieldOrigin:_original.._value\",origin,
        from+\".TableFieldIndexType:_original.._value\",index);

  if (!dpExists(s))
    dpCreate(s,\"_IS_TableType\");
  
  dpSet(s+\".TableFieldName:_original.._value\",list,
        s+\".TableFieldType:_original.._value\",type,
        s+\".TableFieldLength:_original.._value\",length,
        s+\".TableFieldOrigin:_original.._value\",origin,
        s+\".TableFieldIndexType:_original.._value\",index);

  if (dynContains(types,s)<1)
  {
    dynAppend(types,s);
    setValue(\"TableType\",\"items\",types); 
  }    
}" 0
 E E E
20 36
"TableFieldIndexType"
""
410 247 E E E 0 E 1 E N "_3DText" E N "_3DFace" E E
 E E2
LANG:0 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
LANG:1 70 -microsoft windows-arial-medium-r-normal-*-*-120-100-100-*-*-iso8859-1
0
 410 247 438 275
1
T 
2
LANG:0 0 
LANG:1 0 

0 E E
1
E E
0
LAYER, 1 
2
LANG:0 0 
LANG:1 0 
0
LAYER, 2 
2
LANG:0 0 
LANG:1 0 
0
LAYER, 3 
2
LANG:0 0 
LANG:1 0 
0
LAYER, 4 
2
LANG:0 0 
LANG:1 0 
0
LAYER, 5 
2
LANG:0 0 
LANG:1 0 
0
LAYER, 6 
2
LANG:0 0 
LANG:1 0 
0
LAYER, 7 
2
LANG:0 0 
LANG:1 0 
0
0