Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Printing a form with object values and no table needed
Message
De
28/08/2003 12:13:43
 
 
À
28/08/2003 10:08:25
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00824145
Message ID:
00824254
Vues:
18
>I do this by creating a temporary cursor before printing the report that has nothing but a space in a single field. I include the temporary cursor's field on the form which does not print because it is only a space.
>
>
>PRIVATE myalias, myrecno
>Myalias=""
>Myrecno=0
>Myalias=ALIAS()
>IF !EMPTY(Myalias)
>    Myrecno=recno()
>ENDIF
>SELE 0
>CREATE CURSOR tmp (cblank c(1))
>APPEND BLANK
>REPLACE tmp.cblank WITH " "
>GO TOP
>REPORT FORM ... NEXT 1 NOCONSOLE TO PRINT
>*or
>REPORT FORM ... NEXT 1 PREVIEW
>USE IN tmp
>IF !EMPTY(Myalias)
>    SELECT (Myalias)
>    IF Myrecno>0
>        GOTO Myrecno
>    ENDIF
>ENDIF
>
>
>
>>Before when I wanted to print a report to display the values of objects before they are written to a record, or just data entered on a screen with a preview, I would do a command like: report form FORMNAME record recno() preview. The reason is the preview would run through every record in the table, but if I did just the current recno() of whatever table was open at the time, it would print the value of my objects just once and since they didn't reference any values in the table, it didn't matter what table was open or what record number it was on. This works almost all the time, but sometimes in different forms it will print an extra page with just the header, etc. I was wondering if there was an easier way to print a report with just object values with a edit box with overflow at the end and have it only print just that (preview and print)?
>>
>>Kev


__________________________________________________________________
What's new Tracy?

I tried it that way and got the same thing, so I looked around a little bit more and found that all I needed was to open up the objects on the report that stretched with overflow and under the Print When button, I checked No under Print Repeated Values.

PRINT REPEATED VALUES DIALOG BOX:
No
Object will not print at all unless one or both of the following are checked: In first whole band of new page/column and When detail overflows to new page/column.

Doing this eliminated it printing an extra page with just a header at times. I am going to leave my report commands the same (ex. report form FORMNAME record recno() preview) because I think it will give more efficiency then creating a new table and displaying a blank field on the form. Thanks for your input though hun.

So did your little one start school yet?
``` Appreciate a normal day, it is always better than a bad one ```

Kev
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform