Search  
Friday, May 25, 2012 ..:: Forum ::.. Register  Login
 Forum Minimize
Pentru a putea posta mesaje trebuie să vă înregistraţi.
Notă: Mesajele cu conţinut jignitor sau ilegal (inclusiv cereri de soft piratat) nu sunt acceptate şi vor fi şterse imediat .

Pentru a primi raspunsuri rapide si corecte, scrieti in mesaj ce intentionati sa faceti, ce mesaj de eroare primiti, in ce context si in urma caror actiuni. De asemenea, mentionati versiunea de FoxPro in care lucrati!
Dacă nu specificați versiunea, se consideră VFP 9.0 SP2.
SearchForum Home
  Visual FoxPro  Cod, sintaxa si comenzi  raport...
 raport
 
 5/7/2010 2:25:15 AM
User is offlinedarky85
119 posts
5th


raport
 (N/A)
Va rog daca puteti sa ma ajutati si pe mine in urmatoarea problema: am un buton si vreau sa scot un raport care este codul sursa pentru asa ceva. multumesc anticipat
 5/7/2010 8:29:54 AM
User is offlinecostin_mentor
492 posts
www.accessoft.ro
2nd




Re: raport
 (N/A) Modified By costin_mentor on 5/7/2010 8:30:45 AM)
Sa presupunem ca ai construit cu report designer un raport numit : test

La evenimentul Click al butonului pui :

local oRaport
PRIVATE oRaport
DEFINE WINDOW wRaport SYSTEM FROM 2,1 TO 13,75 TITLE 'Document' NAME oRaport
oRaport.TitleBar=0
oRaport.WindowState=2 && maximize
oRaport.Show(1)

report form test TO PRINTER PROMPT PREVIEW WINDOW wRaport

oRaport.Release
RELEASE oRaport
 5/8/2010 12:15:35 PM
User is offlinedarky85
119 posts
5th


Re: raport
 (N/A)
Multumesc merge foarte bine
 5/8/2010 6:52:31 PM
User is offlinecostin_mentor
492 posts
www.accessoft.ro
2nd




Re: raport
 (N/A)
Cu placere
 5/9/2010 1:13:41 AM
User is offlinedarky85
119 posts
5th


Re: raport
 (N/A)
In speranta in care nu o sa fiu injurat v-as ruga sa ma ajutati in urmatoare problema. Am mai multe facturi fiecare cu data cand a fost facuta si etc. Cum pot face sa afisez in care data sa se incadreze in alte date.De ex: am o factura cu data de 08/08/2010 si alta din 09/09/2010 si eu sa ii dau sa imi afiseze doar facurile dintre 07/08/2010 si 09/08/2010 adica sa imi afiseze ce din 08/08/2010 Ulterior sa am posibilitatea sa scot si un raport ar fi perfect Multumesc anticipat
 5/10/2010 9:11:55 AM
User is offlinecostin_mentor
492 posts
www.accessoft.ro
2nd




Re: raport
 (N/A)
In spatele unui raport sta un cursor. Ideea este sa-ti construiesti acest cursor plecand de la tabelele tale.
Sa presupunem ca :
tabela ta de facturi se numeste : tfacturi
campul in care tii minte data facturii se numeste: dataf

Inainte de comanda "report form" construiesti cursorul :

d1={08/07/2010}
d2={09/08/2010}

select camp1, camp2,dataf,camp3,....campx from tfacturi where dataf>=?d1 and dataf<=?d2 into cursor c1 order by .....

si apoi pui comanda "report form"
 5/10/2010 10:40:43 AM
User is offlinedarky85
119 posts
5th


Re: raport
 (N/A)
multumesc mult. as mai avea o intrebare dupa care cred ca ma potolesc :) Pot intr-un grid sa afisez dintr-o tabele doar campurile pe care le vreau ? si daca da cum
 5/10/2010 10:52:37 AM
User is offlinecostin_mentor
492 posts
www.accessoft.ro
2nd




Re: raport
 (N/A)
Ideea ar fi cam aceiasi. in spatele unui grid sta tot un cursor.

Varianta 1.
In Init-ul formei (sau in alta metoda formei) creezi cursorul care va sta in spatele gridului adica:
select cod, mnemonica,denumire,departamentden from compartimente into cursor ccompartimente

apoi ceva in genul :

WITH thisform.grdCompartimente
.RecordSourceType= 1
.RecordSource='ccompartimente'
.ColumnCount=3
.column1.ControlSource='ccompartimente.denumire'
.column2.ControlSource='ccompartimente.DepartamentDen'
.column3.ControlSource='ccompartimente.Mnemonica'
.column1.Width=250
.column2.Width=205
.column3.Width=70
for lni=1 to 3
.columns[lni].movable=.f.
.columns[lni].resizable=.f.
.columns[lni].readonly=.t.
ENDFOR
.SetFocus
.AfterRowColChange
ENDWITH

Varianta 2:
In DataEnviroment creezi cursorul , iar apoi in Form designer te duci la grid si setezi proprietatile de la varianta 1.
 5/10/2010 4:36:53 PM
User is offlinedarky85
119 posts
5th


Re: raport
 (N/A)
sper sa nu te superi dar a mai aparut o mica problema pe care acum am observato. Cand ii dau sa imi scoata raportul el le scoate pe toate cum ii pot da sa imi scoata doar raportul pe care il selectez
 5/10/2010 4:49:22 PM
User is offlinecostin_mentor
492 posts
www.accessoft.ro
2nd




Re: raport
 (N/A)
Inainte de comanda "report form" pune comenzile urmatoare:

select cursorul_pregatit_pentru_raport
brow

Aici ar trebui sa vezi ce trimiti la raport.

PS. Daca tot nu merge , cumva pe forma unde ai butonul cu comanda "report form" ai si un grid? Daca da, ai grija ca setfocusul sa nu fie pe grid sau ascunzi gridul :

thisform.gridultau.visible= .f.
report form ....
thisform.gridultau.visible= .t.
 5/10/2010 5:11:48 PM
User is offlinedarky85
119 posts
5th


Re: raport
 (N/A)
da am grid :D
 5/10/2010 5:25:34 PM
User is offlinedarky85
119 posts
5th


Re: raport
 (N/A)
da am grid :D P.S. mai zi si mie ca cred ca explodez am o baza de date pentru clienti si mai am una pentru facturi in facturi printre altele am un camp nume cum ii dau dupa ce ii completez numele restu cum ar fi J , RO , Banca etc sa mi le puna automat ... oricum dupa ce termin sunt dator cu multe beri
 5/11/2010 12:19:01 AM
User is offlinedarky85
119 posts
5th


Re: raport
 (N/A)
problema cu raportul tot nu merge e vre-o problema ca in form am 2 table ?
 5/11/2010 7:42:33 AM
User is offlinedarky85
119 posts
5th


Re: raport
 (N/A)
 darky85 wrote
da am grid :D P.S. mai zi si mie ca cred ca explodez am o baza de date pentru clienti si mai am una pentru facturi in facturi printre altele am un camp nume cum ii dau dupa ce ii completez numele restu cum ar fi J , RO , Banca etc sa mi le puna automat ... oricum dupa ce termin sunt dator cu multe beri
am reusit ceva ceva dar imi zice ca tabela t_factura nu exista aste e codul If thisform.text1.Value = " " Messagebox('Nu ati introdus nimic',32) ENDIF Locate For T_clienti.nume=thisform.text1.Value If Found() thisform.text2.Value=T_clienti.pers_conta T_factura.nume.Value=T_clienti.nume MESSAGEBOX('oky',64) ELSE MESSAGEBOX('Nu exista inregistrare \Eroare 10 ',48) ENDIF thisform.text1.SetFocus ai idee ce o fi :-? tabela sigur exista :))
 5/11/2010 7:53:06 AM
User is offlinedarky85
119 posts
5th


Re: raport
 (N/A)
mai exact eroare este object T_factura is not found
 5/11/2010 8:30:21 AM
User is offlinecostin_mentor
492 posts
www.accessoft.ro
2nd




Re: raport
 (N/A) Modified By costin_mentor on 5/11/2010 8:33:52 AM)
problema vine de aici : "T_factura.nume.Value" , mai exact de la ".value" care nu are ce cauta

Poti sa ai si x tabele pe form, nu ar trebui sa fie nici o problema.

Referitor la datele clientului, ele se afla intr-o tabela xclient (sa zicem), atunci in raport ar trebui sa pui asa :
xclient.nume
xclient.banca
.....
 5/11/2010 10:33:02 AM
User is offlinedarky85
119 posts
5th


Re: raport
 (N/A)
si fara .value tot asa zice o fi de la fox-ul meu sau alt ceva ?
 5/11/2010 10:35:37 AM
User is offlinedarky85
119 posts
5th


Re: raport
 (N/A)
 darky85 wrote
si fara .value tot asa zice o fi de la fox-ul meu sau alt ceva ?
P.S. acum am vazut ca in debugg jos unde arata tabelele cu care lucreaza , tabele t_clienti nu apare
 5/12/2010 1:23:50 AM
User is offlinedarky85
119 posts
5th


Re: raport
 (N/A)
am mai rezolvat din probleme :) dar logic ca a aparut alta. am o forma cu 2 tabele cum pot sa ii dau sa imi inregistreze doar in a 2-a tabela mltumesc anticipat
 5/12/2010 8:36:05 AM
User is offlinecostin_mentor
492 posts
www.accessoft.ro
2nd




Re: raport
 (N/A)
Cu ajutorul comenzii :
select tabela_nr2
 Page 1 of 1
NextPreviousNo Rating
  Visual FoxPro  Cod, sintaxa si comenzi  raport...
Search  Forum Home         

 Google Ads Minimize
    

Copyright 2002-2010 Profox   Terms Of Use  Privacy Statement