AfArcAbmLstGet

AfArcAbmLstGet(alpha1, int2) : int
Liste der Arbeitsmappen zum Archiv ermitteln
alpha1 Nummer des Archives int2 Deskriptor einer leeren Cte-Liste Resultat int Fehlerwert Siehe Verwandte Befehle

Mit der Funktion lassen sich alle Arbeitsmappen ermitteln, denen das übergebene Archiv zugeordnet ist. Die Archiv-Nummer wird über den Parameter (alpha1) übermittelt.

Im zweiten Parameter muss der Deskriptor einer leeren Cte-Liste übergeben werden, die vor dem Aufruf der Funktion über den Befehl AfCteOpen() angelegt wurde.

Nach dem Aufruf der Funktion ist pro Arbeitsmappe ein Objekt in der Cte-Liste vorhanden. Die Objekte können geladen werden und über die Eigenschaft "Name" kann die Arbeitsmappen-Nummer und über die Eigenschaft "Custom" der Arbeitsmappen-Name ausgelesen werden.

Wird ein ungültiger Deskriptor übergeben, kommt es zu einem Laufzeitfehler.

Beispiel:

// Read all workfolders
local
{
  tErr     : int;
  tArcNo   : alpha(12);
  tAbmList : handle;
  tAbmItem : handle;
  tAbmNo   : int;
  tAbmName : alpha(250);
}

{
  tAbmList # AfCteOpen(_CteList);
  if (tAbmList > 0)
  {
    tErr # AfArcAbmLstGet(tArcNo, tAbmList);
    if (tErr = _ErrOk)
    {
      for tAbmItem # tAbmList->CteRead(_CteFirst);
      loop tAbmItem # tAbmList->CteRead(_CteNext, tAbmItem);
      while (tAbmItem > 0)
      {
        tAbmNo   # CnvIA(tAbmItem->spName);
        tAbmName # tAbmItem->spCustom;
        ...
      }
    }
    else
    {
      // Error handling AfArcAbmLstGet()
      ...
    }
    tAbmList->AfCteCloseAll();
  }
  else
  {
    // Error handling AfCteOpen()
    ...
  }
  ...
}

Neben den allgemeinen Fehlerwerten können folgende Werte zurückgegeben werden:

Konstante	Wert	Bedeutung
_ErrOk	0	ok - kein Fehler aufgetreten
_rNoRec	5	Es existiert kein Archiv mit der übergebenen Nummer.
sAfErrItemLimit	-20015	Die maximale Anzahl an übertragbaren Elementen (ca. 5000) wurde überschritten.
sAfErrNoRights	-20029	Die Berechtigungen reichen nicht aus.

Für weitere CONZEPT 16-spezifische Rückgabewerte siehe die aktuelle CONZEPT 16-Hilfe.