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  CUI-uri unice i...
 CUI-uri unice in 2 tabele
 
 2/5/2009 4:00:15 PM
User is offlinemarcelmuresan
15 posts


CUI-uri unice in 2 tabele
 (N/A)
as vrea sa stiu de ce nu merge minunatia asta de cod:

SELECT fisier
GO top
SCAN
STORE codf TO gccodul
    SELECT carei
    GO top
    LOCATE FOR codf=gccodul
        IF FOUND()
        replace carei.pctlucru WITH 11111111
            ELSE
        ENDIF
ENDSCAN

pentru ca nu inlocuieste decit a 10750-a inregistrare..
multumesc mult.
 2/5/2009 4:22:12 PM
User is offlinemyself
64 posts


Re: CUI-uri unice in 2 tabele
 (N/A)
dc nu incerci cu update? Update carei set codf = fisier.codf ; where codf = fisier.codf from fisier
 2/5/2009 4:26:50 PM
User is offlinemyself
64 posts


Re: CUI-uri unice in 2 tabele
 (N/A)

 myself wrote
dc nu incerci cu update? Update carei set codf = fisier.codf ; where codf = fisier.codf from fisier

scz...

   Update carei set pctlucru = 111111;

         where codf = fisier.codf

 2/5/2009 5:31:39 PM
User is offlinecostin_mentor
492 posts
www.accessoft.ro
2nd




Re: CUI-uri unice in 2 tabele
 (Romania)
vrei sa scanezi tabela fisier , incepi bine , iti selectezi tabela , te duci la inceput apoi vine scan-ul .
In interiorul scan-ului selectezi o alta zona de lucru (alegi tabela carei) si cauti in ea codul memorat in gccodul . Daca il gasesti faci ceva , daca nu altceva.
Problema la codul de mai sus este ca uiti sa te intorci in zona de lucru initiala , lipseste inainte de endscan :
select fisier
 2/5/2009 5:42:09 PM
User is offlineDaniel Buduru
2335 posts
1st




Re: CUI-uri unice in 2 tabele
 (Romania)
 costin_mentor wrote
vrei sa scanezi tabela fisier , incepi bine , iti selectezi tabela , te duci la inceput apoi vine scan-ul .
In interiorul scan-ului selectezi o alta zona de lucru (alegi tabela carei) si cauti in ea codul memorat in gccodul . Daca il gasesti faci ceva , daca nu altceva.
Problema la codul de mai sus este ca uiti sa te intorci in zona de lucru initiala , lipseste inainte de endscan :
select fisier

Dupa VFP HELP, nu este nevoie sa reselectezi zona, se face automat:

Remarks

SCAN automatically advances the record pointer to the next record that meets the specified conditions and executes the block of commands.

You can place comments after ENDSCAN on the same line. The comments are ignored during program compilation and execution.

SCAN ... ENDSCAN ensures that, upon reaching ENDSCAN, Visual FoxPro reselects the table that was current when the SCAN ... ENDSCAN loop began.


Daniel Buduru
 2/6/2009 8:46:14 AM
User is offlinemarcelmuresan
15 posts


Re: CUI-uri unice in 2 tabele
 (N/A)
Deci asa:
   Update carei set pctlucru = 111111;
    from fisier;
    where carei.codf = fisier.codf
merge.
In schimb prima varianta refuza categoric..
Multumesc pentru raspunsuri.
 2/6/2009 9:10:37 AM
User is offlinenae racaru
714 posts
www.rarom.ro
1st




Re: CUI-uri unice in 2 tabele
 (Romania) Modified By nae racaru on 2/6/2009 10:11:20 AM)
Locate asa cum l-ai dat gaseste intotdeauna numai prima inregistrare care corespunde codf=gccodul

SELECT fisier
GO top
SCAN
    STORE codf TO gccodul
    SELECT carei
    do while .t.
        LOCATE FOR codf=gccodul AND carei.pctlucru # 11111111
        IF FOUND()
                 replace carei.pctlucru WITH 11111111
                 loop
        ELSE
                 return
       ENDIF
    enddo
ENDSCAN
VFP 6 si 9 + Oracle
 2/6/2009 9:34:06 AM
User is offlinemarcelmuresan
15 posts


Re: CUI-uri unice in 2 tabele
 (N/A)
 nae racaru wrote
Locate asa cum l-ai dat gaseste intotdeauna numai prima inregistrare care corespunde codf=gccodul

SELECT fisier
GO top
SCAN
    STORE codf TO gccodul
    SELECT carei
    do while .t.
        LOCATE FOR codf=gccodul AND carei.pctlucru # 11111111
        IF FOUND()
                 replace carei.pctlucru WITH 11111111
                 loop
        ELSE
                 return
       ENDIF
    enddo
ENDSCAN


nici asa nu vrea, dar m-am descurcat cu 'update', multumesc.
 2/9/2012 1:23:38 PM
User is offlineEMRE.RESIT
76 posts


Re: CUI-uri unice in 2 tabele
 (Romania)
si in cazul in care nu mi-l gaseste pot sa-l adaug cu append from cumva?
 2/9/2012 1:50:54 PM
User is offlineDaniel Buduru
2335 posts
1st




Re: CUI-uri unice in 2 tabele
 (N/A)
Insert into tabela 1 (cui) Select cui from tabela 2 where cui not in (select cui from tabela1)


Daniel Buduru
 2/9/2012 2:10:46 PM
User is offlineDoru Constantin
321 posts
3rd




Re: CUI-uri unice in 2 tabele
 (N/A)
... si ambele "Go Top" sunt inutile !
 Page 1 of 1
NextPreviousNo Rating
  Visual FoxPro  Cod, sintaxa si comenzi  CUI-uri unice i...
Search  Forum Home         

 Google Ads Minimize
    

Copyright 2002-2010 Profox   Terms Of Use  Privacy Statement