Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Writing a Report Exception (in case table empty)
Message
From
09/03/2010 13:32:56
 
General information
Forum:
Visual FoxPro
Category:
Reports & Report designer
Miscellaneous
Thread ID:
01453531
Message ID:
01453537
Views:
42
sooo
  do case 
             case thisform.ogstatus.value=1
            select  vclient.acc
             if _tally=0
            messagebox('no records')
              else
              Clientstat="A"
endcase
?

>The simplest way would be to select the data into a cursor and check using _TALLY variable if there are records.
>
>
>
>
>>Hello!
>>i have this form with two option groups so i use the two of them to help me formula a report
>>name OG status and OG design both hav four option groups
>>
>>so my code is somethin like this
>>
>>Do case
>>      case thisform.OGstatus.value=1
>>                  Clientstat="A"
>>      case thisform.OGstatus.value=2
>>                  Clientstat="b"
>>      case thisform.OGstatus.value=3
>>                  Clientstat="c"
>>      case thisform.OGstatus.value=4
>>                  Clientstat="d"
>>&&A,B,C and D being values in a table
>>endcase 
>>
>>Case thisform.ogstatus.value<5 and thisform.ogdesign.value=1
>>report form report1 for vclient.acc=clientstat preview
>>
>>Case thisform.ogstatus.value<5 and thisform.ogdesign.value=2
>>report form report1 for vclient.acc=clientstat preview
>>
>>Case thisform.ogstatus.value<5 and thisform.ogdesign.value=3
>>report form report1 for vclient.acc=clientstat preview
>>
>>Case thisform.ogstatus.value<5 and thisform.ogdesign.value=4
>>report form report1 for vclient.acc=clientstat preview
>>
>>this works fine. but just that i cant think of a statement in the event there is no A,B C or D in the data base. SO if i select OGStatus and the table has no "A" the report only flashes :( im trying to think of a statment to stop that
Previous
Reply
Map
View

Click here to load this message in the networking platform