Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How do I test for empty cursor
Message
De
01/10/2007 08:16:33
 
 
À
01/10/2007 08:07:04
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
01257479
Message ID:
01257684
Vues:
22
>>>>How do Determine if a cursor is empty after doing select statement. The following is not working:
>>>>
>>>>
>>>>			Select crsprod, crsitemcode, sum(crsrequestamt) as inreq, sum(crsaccptamt) as whsaccpt, crsdelivertype, Count(*) as duplicate From crs_grid1 ;
>>>>			  	Group By  crsprod, crsitemcode, crsdelivertype HAVING duplicate > 1 AND crsdelivertype > 1 INTO CURSOR crs_find_dup
>>>>			IF isnull('crs_find_dup')
>>>>				MESSAGEBOX('empty cursor',0,'')
>>>>			ELSE
>>>>				MESSAGEBOX('not empty cursor',0,'')
>>>>			ENDIF 	
>>>>
>>>>
>>>>thanks
>>>>Nick
>>>
>>>After your SELECT, check _TALLY=0.
>>
>>thanks Fred, that worked.
>>
>>Nick
>PMFJI, Nick,
>
>That may not work in vfp9, because _tally returns a 1 because of the sum().
>You may need to do something like this in vfp 9:
>
>  SELECT SUM(capacity) AS capacity ;
>    FROM cVehCap ;
>    WHERE loadtype == lcType ;
>    INTO ARRAY latmp1
>  IF !ISNULL(latmp1) AND !EMPTY(latmp1)
>
In order to check if a cursor is empty, what I started doing in VFP9 is:
GO TOP
IF !BOF()
  * do whatever
ELSE
  * empty cursor
ENDIF
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform