>SELECT ALLTRIM(majver)+[.]+ALLTRIM(minver)+[.]+ALLTRIM(midver) as version ; >TOP 1 ; >FROM xmlpackages ; >WHERE BETWEEN(xmlpackages.pkey,"1000","1999") ; >ORDER BY 1 DESC INTO CURSOR curSelect nofilter > >SELECT curSelect > >SELECT xmlpackages.pkey, location.siteid AS Site, location.sitename AS NAME, location.phone, ; > location.contype AS contype, location.exevers AS ExeVersion, ; > COUNT(clients.clientno) AS Qty ; > FROM location ; > JOIN clients ON clients.siteid=location.siteid ; > GROUP BY location.siteid, location.sitename, location.phone, ; > location.contype, location.exevers ; > WHERE location.exevers < curSelect.version AND location.ACTIVE=.T. ; > ORDER BY location.sitename ; > INTO CURSOR curLocList >>
SELECT xmlpackages.pkey, location.siteid AS Site, location.sitename AS NAME, location.phone, ; location.contype AS contype, location.exevers AS ExeVersion, ; COUNT(clients.clientno) AS Qty ; FROM location ; JOIN clients ON clients.siteid=location.siteid ; GROUP BY location.siteid, location.sitename, location.phone, ; location.contype, location.exevers ; WHERE location.exevers < all ; (SELECT TOP 1 RTRIM(majver)+[.]+RTRIM(minver)+[.]+RTRIM(midver) ; FROM xmlpackages ; WHERE xmlpackages.pkey between "1000" AND "1999" ; ORDER BY 1 DESC) ; AND location.ACTIVE=.T. ; ORDER BY location.sitename ; INTO CURSOR curLocListCetin