%
% database the current gallery images
%
% the gallery name derived from title setting in portal
%
[+TrakImage]
[Reset]

"gal_VehicleandLicenseImages.txt" connexec

%
% look for the current license plate
%

/*
destUrl = "\"~/ImageGallery/BulkUpload.aspx?mid="
            + ModuleId
            + "&pageid=" + PageId
                  !Bulk.Url
ModuleId          !Bulk.ModID
PageId            !Bulk.PageID
imageFolderPath   !Bulk.Path
thumnailBaseUrl   !Bulk.Thumb
webSizeBaseUrl    !Bulk.Web
fullSizeBaseUrl   !Bulk.Full
usGuid            !Bulk.User
keyw              !Bulk.PageKeys
["ItemID"]        [(]
["MetaDataXml"]   [(]
["Description"]   [(]
["Caption"]       [(]
cntr              !Bulk.Gallery
*/

empty !Sim.Vehicle
empty !Sim.License
%
% search the captions for vehicle or license entry
%

_Bulk.Gallery
countup
{
 pop
 [Pop] unescape [Pop] unescape false [Pop] unescape
%
% stack:   caption description has-extra meta-info
%
 "license" fifth Str.Found
 {
  fourth "license" right$ trim "," left$ %%% " " left$
 _License eq$
 {
  dup "WebImageFile=""" right$ """" left$ ^_Bulk.Web
  "~" "/Portal" replall
  !Sim.License
  pop2nd true exch
 } if

 } if

 "vehicle" fifth Str.Found
 {
  fourth "vehicle" right$ trim "," left$ %%% " " left$
  _License eq$
  {
   dup "WebImageFile=""" right$ """" left$ ^_Bulk.Web
   "~" "/Portal" replall
   !Sim.Vehicle
   pop2nd true exch
  } if
 } if
%
% stack: meta-info description has-extra caption
%
 pop !Sim.Found pop2

 [/]
} for