proceduraScopo
Enumera tutti gli oggetti contenuti nella lista associata ad una proprietà di tipo lista dell'oggetto. Popola una lista con i puntatori degli oggetti contenuti in una proprietà di tipo lista. Attualmente l'unica proprietà di tipo lista è Lista Campi dell'oggetto Foreign Key.
Sintassi
Collection lista = null // Lista di oggetti
//
INDE.GetPropList(lista, id oggetto, proprietà, indice)
//
INDE.GetPropList(lista, id oggetto, proprietà, indice)
Argomenti
| Lista | Lista da riempire con i puntatori degli oggetti |
| ID Oggetto | Puntatore dell'oggetto di cui leggere la proprietà |
| Proprietà | Indice della proprietà di cui leggere il valore |
| Indice | Indice del valore nel caso la proprietà sia una collezione di valori |
Esempio di codice
// ************************
// Carica l'oggetto da INDE
// ************************
public boolean Relazione.LoadFromINDE(
int Puntatore // Puntatore dell'oggetto
)
{
// Provo a recuperare le proprietà
try
{
base.LoadFromINDE(Puntatore)
//
if EsempiMS.INDE.IsPropReadable(Puntatore, Lista campi)
{
Collection lista = null //
int i = 0 //
//
// Scorro gli oggetti facenti parte della relazione
EsempiMS.INDE.GetPropList(lista, Puntatore, Lista campi, ??)
while i < lista.Count()
{
OggettoBase obj = new() //
//
// Carico l'oggetto
obj.LoadFromINDE(lista.GetInteger(i))
Oggetti.Add(obj)
//
i := i + ONE
}
}
}
catch
{
return False
}
this.SetOriginal()
//
return True
}
// Carica l'oggetto da INDE
// ************************
public boolean Relazione.LoadFromINDE(
int Puntatore // Puntatore dell'oggetto
)
{
// Provo a recuperare le proprietà
try
{
base.LoadFromINDE(Puntatore)
//
if EsempiMS.INDE.IsPropReadable(Puntatore, Lista campi)
{
Collection lista = null //
int i = 0 //
//
// Scorro gli oggetti facenti parte della relazione
EsempiMS.INDE.GetPropList(lista, Puntatore, Lista campi, ??)
while i < lista.Count()
{
OggettoBase obj = new() //
//
// Carico l'oggetto
obj.LoadFromINDE(lista.GetInteger(i))
Oggetti.Add(obj)
//
i := i + ONE
}
}
}
catch
{
return False
}
this.SetOriginal()
//
return True
}
- Non è necessario inizializzare la collection poichè viene fatto comunque all'interno del metodo.
- Se il puntatore passato come parametro ID Oggetto non corrisponde ad alcun oggetto nel progetto aperto, allora verrà generata un'eccezione.
- I valori della lista vanno letti con il metodo GetInteger.
Ultima modifica: 25/10/2016 / Validità: da 7.1.3300