Establece los miembros de una lista denominada.
Para Perl, se debe tener en cuenta que este parámetro es una matriz, por lo que no se necesita ningún delimitador para separar elementos de miembros.
VBScript
session.SetListMembers nombreLista, (Miembros)
Perl
$session->SetListMembers(nombreLista, Miembros);
Para Perl, una referencia a una matriz de series que contiene los miembros de la lista.
VBScript
' En este ejemplo se da por supuesto que hay, como mínimo,
' 1 lista dinámica
en la sesión de acceso a la base de datos actual.
set sessionObj = GetSession
sessionObj.UserLogon "admin", "", "SAMPL", AD_PRIVATE_SESSION, ""
Dim NewValues(2)
NewValues(0) = "ABC"
NewValues(1) = "123"
NewValues(2) = "XYZ"
DynamicListNamesRef = sessionObj.GetListDefNames
set ListName = DynamicListNamesRef(0)
print ListName
sessionObj.SetListMembers ListName, (NewValues)
members = sessionObj.GetListMembers(ListName)
' imprimir los miembros de la lista...
For Each member In members
print member
Next
Perl
# En este ejemplo se da por supuesto que hay, como mínimo, 1 lista dinámica
# en la sesión de acceso a la base de datos actual.
$sessionObj = $entity->GetSession();
$sessionObj->UserLogon("admin","","SAMPL","");
# Obtener una lista de los nombres de Listas dinámicas que existen
# en esta base de datos...
$ListDefNamesREF = $sessionObj->GetListDefNames();
$ListName = @$ListDefNamesREF[0];
# Utilizar SetListMembers() para establecer la lista en una lista
# de valores específicos...
print "\nSetting list '$ListName' to ('ABC', '123', 'XYZ')...\n";
@NewValues = ('ABC', '123', 'XYZ');
$sessionObj->SetListMembers($ListName, \@NewValues);
$members = $sessionObj->GetListMembers($ListName);
#imprimir los miembros de la lista
foreach $member (@$members){
print $member, "\n";
}