75 lines
2.3 KiB
OpenEdge ABL
75 lines
2.3 KiB
OpenEdge ABL
/**
|
|
* File Name: Ids
|
|
* Description: Primitive domain for the object type Id
|
|
*
|
|
* @author : architect ir. Wilhelmus G.J. Velzeboer
|
|
*
|
|
* Copyright (c), W.G.J. Velzeboer,
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without modification,
|
|
* are permitted provided that the following conditions are met:
|
|
*
|
|
* - Redistributions of source code must retain the above author notice,
|
|
* this list of conditions and the following disclaimer.
|
|
* - Redistributions in binary form must reproduce the above copyright notice,
|
|
* this list of conditions and the following disclaimer in the documentation
|
|
* and/or other materials provided with the distribution.
|
|
* - Neither the name of the author nor the names of its contributors
|
|
* may be used to endorse or promote products derived from this software without
|
|
* specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
|
|
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL
|
|
* THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
|
|
* EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
|
|
* OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
public virtual with sharing class Ids
|
|
extends Objects
|
|
{
|
|
public Ids(Set<Id> idSet)
|
|
{
|
|
super(new List<Id>(idSet));
|
|
}
|
|
|
|
public Ids(List<Id> ids)
|
|
{
|
|
super((List<Object>) ids);
|
|
}
|
|
|
|
public Ids(List<Object> elements)
|
|
{
|
|
super(elements);
|
|
}
|
|
|
|
public Ids(Objects objects)
|
|
{
|
|
super(getIdList(objects));
|
|
}
|
|
|
|
public Set<Id> getIds()
|
|
{
|
|
return new Set<Id>(getIdList());
|
|
}
|
|
|
|
public List<Id> getIdList()
|
|
{
|
|
return (List<Id>) getObjects();
|
|
}
|
|
|
|
private static List<Id> getIdList(Objects objects)
|
|
{
|
|
List<Id> result = new List<Id>();
|
|
for (Object obj : objects.getObjects())
|
|
{
|
|
if (!(obj instanceof Id)) continue;
|
|
|
|
result.add((Id) obj);
|
|
}
|
|
return result;
|
|
}
|
|
} |