oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

[ 1363797 ] Calendar Javascript (Date/Time)

Browse source 
and some other minor annoyances.
This commit is contained in:
Matthew Wilson 2005-12-12 15:00:33 +00:00
parent f5f73c1681
commit e0786a6a11
5 changed files with 3 additions and 83 deletions
Download patch file Download diff file Expand all files Collapse all files

37
lib/WebGUI/Asset/Wobject/Article.pm
View file

@ -74,43 +74,6 @@ sub definition {
return $class->SUPER::definition($definition);
}
#-------------------------------------------------------------------
sub getIndexerParams {
my $self = shift;
my $now = shift;
return {
Article => {
sql => "select Article.assetId,
Article.linkTitle,
Article.linkURL,
assetData.title,
assetData.menuTitle,
assetData.url,
asset.className,
assetData.ownerUserId,
assetData.groupIdView,
assetData.synopsis,
wobject.description
from asset, Article
left join wobject on wobject.assetId = asset.assetId
left join assetData asset.assetId=assetData.assetId
where asset.assetId = Article.assetId
and assetData.startDate < $now
and assetData.endDate > $now",
fieldsToIndex => ["linkTitle" ,"linkURL","title","menuTitle","url","synopsis","description" ],
contentType => 'content',
url => 'WebGUI::URL::gateway($data{url})',
headerShortcut => 'select title from asset where assetId = \'$data{assetId}\'',
bodyShortcut => 'select description from wobject where assetId = \'$data{assetId}\'',
}
};
}
#-------------------------------------------------------------------
sub view {
my $self = shift;

43
lib/WebGUI/Asset/Wobject/DataForm.pm
View file

@ -274,49 +274,6 @@ sub getEditForm {
}
#-------------------------------------------------------------------
sub getIndexerParams {
my $self = shift;
my $now = shift;
return {
DataForm_field => {
sql => "select DataForm_field.label as label,
DataForm_field.subtext as subtext,
DataForm_field.possibleValues as possibleValues,
DataForm_field.assetId as assetId,
DataForm_field.DataForm_fieldId as fid,
asset.ownerUserId as ownerId,
asset.url as url,
asset.groupIdView as groupIdView
from DataForm_field, asset
where DataForm_field.assetId = asset.assetId
and asset.startDate < $now
and asset.endDate > $now",
fieldsToIndex => ["label", "subtext", "possibleValues"],
contentType => 'content',
url => 'WebGUI::URL::gateway($data{url})',
headerShortcut => 'select label from DataForm_field where DataForm_fieldId = \'$data{fid}\'',
bodyShortcut => 'select subtext, possibleValues from DataForm_field where DataForm_fieldId = \'$data{fid}\'',
},
DataForm_entryData => {
sql => "select distinct(DataForm_entryData.assetId) as assetId,
asset.ownerUserId as ownerId,
asset.url as url,
asset.groupIdView as groupIdView,
asset.groupIdEdit as special_groupIdView
from DataForm_entryData, asset
where DataForm_entryData.assetId = asset.assetId
and asset.startDate < $now
and asset.endDate > $now",
fieldsToIndex => ['select distinct(value) from DataForm_entryData where assetId = \'$data{assetId}\''],
contentType => 'assetDetail',
url => 'WebGUI::URL::append($data{url}, "func=viewList}")',
headerShortcut => 'select title from asset where assetId = \'$data{assetId}\'',
}
};
}
#-------------------------------------------------------------------
sub getListTemplateVars {
my $self = shift;