celldata = "";
RecordList = "";
RecordIDList = "";
RecordNameList = "";
RecordListCount = 0;
eventID = "";
eventData = StructNew();
eventQry = QueryNew('tmp');
eventTitle = "";
i=1;
// Set cell value to record list
RecordList = request.datasheet.currentColumnValue;
if ( LEN(TRIM(RecordList)) )
RecordListCount = ListLen(RecordList,",");
if ( RecordListCount EQ 0 )
RecordNameList = "[NONE SELECTED]";
else
{
eventID = '';
RecordNameList = '';
for ( i=1; i LTE RecordListCount; i++ )
{
eventID = ListGetAt(RecordList,i,",");
eventQry = application.ptCalendar.calEventsDAO.getEventsByEventID(eventID=eventID);
eventTitle = "";
if ( eventQry.RecordCount )
{
eventTitle = encodeForHTML(eventQry.title[1]);
if ( ListFindNoCase(RecordNameList,eventTitle,",") EQ 0 )
RecordNameList = ListAppend(RecordNameList,eventTitle,",");
}
}
if ( ListLen(RecordNameList,",") EQ 0 )
{
if ( RecordListCount GT 1 )
RecordNameList = "[SELECTED EVENTS DO NOT EXIST]";
else
RecordNameList = "[SELECTED EVENT DOES NOT EXIST]";
}
RecordNameList= REREPLACE(RecordNameList,",","
","all");
}
RecordNameList = REREPLACE(RecordNameList,"[\s]"," ","all");
#RecordNameList#