FldAlias

Beschreibung:

Liefert den Aliasnamen des Feldes zurück, das als fortlaufende Nummer übergeben wurde. Ist der Aliasname leer, wird der entsprechende physikalische Feldname zurückgegeben.

Parameter:

Parametername

Typ

Beschreibung

Index

Long

Die fortlaufende Nummer des gewünschten Feldes in der Datenbankstruktur von 1 bis FldCount.

Rückgabewert:

String

Beispiel VBScript:

' Dieses Beispiel basiert auf der Kontakte-Ansicht einer combit_Large-Solution

 

Dim oViewConfig : Set oViewConfig = cRM.CurrentProject.ViewConfigs.ItemByName("Kontakte")

Dim nFldCount : nFldCount = oViewConfig.FldCount

Dim nCounter : nCounter = 0

 

Dim sFldAlias : sFldAlias = ""

Dim nFldDec : nFldDec = 0

Dim bFldGDPRActive : bFldGDPRActive = False

Dim sFldName : sFldName = ""

Dim nFldLen : nFldLen = 0

Dim bFldReadOnly : bFldReadOnly = False

Dim nFldType : nFldType = 0

Dim nFldTypePhys : nFldTypePhys = 0

Dim sFldTypePhysNative : sFldTypePhysNative = ""

 

For nCounter = 1 To nFldCount

 

    sFldAlias = oViewConfig.FldAlias(nCounter)

    nFldDec = oViewConfig.FldDec(nCounter)

    bFldGDPRActive = oViewConfig.FldGDPRActive(nCounter)

    sFldName = oViewConfig.FldName(nCounter)

    nFldLen = oViewConfig.FldLen(nCounter)

    bFldReadOnly = oViewConfig.FldReadOnly(nCounter)

    nFldType = oViewConfig.FldType(nCounter)

    nFldTypePhys = oViewConfig.FldTypePhys(nCounter)

    sFldTypePhysNative = oViewConfig.FldTypePhysNative(nCounter)

   

    If (bFldGDPRActive = True) Then

        Call cRM.DialogMessageBox("Das physikalische Feld " & sFldName & " (Alias: " & sFldAlias & ", Länge: " & CStr(nFldLen) & ") hat folgende Typen: " & CStr(nFldType) & " - " & CStr(nFldTypePhys) & " - " & sFldTypePhysNative, "ViewConfig", vbOkOnly)

    End If

 

Next

 

Set oViewConfig = Nothing

Beispiel C#-Script:

// Dieses Beispiel basiert auf der Kontakte-Ansicht einer combit_Large-Solution

 

ViewConfig viewConfig = cRM.CurrentProject.ViewConfigs.ItemByName("Kontakte");

long fldCount = viewConfig.FldCount;

int counter = 0;

 

string fldAlias = null;

long fldDec = 0;

bool fldGDPRActive = false;

string fldName = null;

long fldLen = 0;

bool fldReadOnly = false;

long fldType = 0;

long fldTypePhys = 0;

string fldTypePhysNative = null;

 

for (counter = 1; counter <= fldCount; counter++)

{

    fldAlias = viewConfig.FldAlias(counter);

    fldDec = viewConfig.FldDec(counter);

    fldGDPRActive = viewConfig.FldGDPRActive(counter);

    fldName = viewConfig.FldName(counter);

    fldLen = viewConfig.FldLen(counter);

    fldReadOnly = viewConfig.FldReadOnly(counter);

    fldType = viewConfig.FldType(counter);

    fldTypePhys = viewConfig.FldTypePhys(counter);

    fldTypePhysNative = viewConfig.FldTypePhysNative(counter);

 

    if (fldGDPRActive == true)

    {

        cRM.DialogMessageBox("Das physikalische Feld " + fldName + " (Alias " + fldAlias + ", Länge: " + fldLen.ToString() + ") hat folgende Typen " + fldType.ToString() + " - " + fldTypePhys.ToString() + " - " + fldTypePhysNative, "ViewConfig", 0);

 

    }

}

 

viewConfig.Dispose();