Welcome To The Home Of The Visual FoxPro Experts  
home. signup. forum. archives. search. google. articles. downloads. faq. members. weblogs. file info. rss.
 From: Stefan Wuebbe
  Where is Stefan Wuebbe?
 Hamburg
 Germany
 Stefan Wuebbe
 To: Roland Nyberg
  Where is Roland Nyberg?
 SODERTALJE
 Sweden
 Roland Nyberg
 Tags
Subject: RE: Variable don´t accept content
Thread ID: 228344 Message ID: 228350 # Views: 1 # Ratings: 1
Version: Visual FoxPro 8 Category: General VFP Topics
Date: Monday, May 18, 2009 12:25:17 PM         
   


Hi Roland,

> pcSearchUnivStr = [(UPPER(Tbldocintr.intrid) = '' and ; && rätt intressen

Your string concatenation does not seem to have opening and closing string delimiters [] for each part.
I'd say, while that approach sometimes works, it does not always.
However, for better readabilty and maintenace I'd suggest to use Text/EndText, e.g.

Local pcSearchUnivStr
Text To pcSearchUnivStr NoShow TextMerge Flags 1 PreText 15
     (UPPER(Tbldocintr.intrid) = '' and 
     (UPPER(Tbldocintr.intrtype) = 'GRP')) and 

and so on.


hth
-Stefan


PS: Did not see that Cetin already had replied.


> Hi all!
> I have problems with filling a variable (pcSearchUnivStr) with a rather long content. Can sombody see what is wrong?
>
> Best regards
> Roland
>
> pcSearchUnivStr = [(UPPER(Tbldocintr.intrid) = '' and ; && rätt intressen
> (UPPER(Tbldocintr.intrtype) = 'GRP')) and ; && rätt intressenttyp (grupp i detta fall)
> UPPER(tblAccDocs.accessCode) = '1' and ; && rätt behörighet
> UPPER(tblextfiles.filename) LIKE UPPER(pcSrchStrUniv+'%') ;
> and ;
> ; && (0,0) allas, inte arkiverade
> (?pnGrpOnlyMineValue = 0 and ; && inte begränsat till bara mina
> ?pnGrpArchValue = 0 and ; && visa inte arkiverade
> tblDocIntr.intrarch = 0 and ; && ej arkivmärkt
> tblDocIntr.Intrtype == 'Grp' and ; && utesluter ftg-merom
> (UPPER(Tblaccdocs.accesscode) = ?pcVwUserUsrAccess or ; && tillräcklig behörighet
> ?pcVwUserUsraccess == '000') and ; && tillräcklig behörighet (SYSOP)
> (tblDocIntr.private = .F. or ;
> tblDocIntr.usrid_d == ?PcVwUserUsrId_u) or ; && ej privat alternativt skapad av inloggad
> ?pcVwUserUsraccess == '000') or ; && eller inloggad = Sysop
> ;
> ; && (1,0) bara mina, icke arkiverade
> (?pnGrpOnlyMineValue = 1 and ; && begränsat till bara mina
> ?pnGrpArchValue = 0 and ; && visa inte arkiverade
> tblDocIntr.Intrtype == 'Grp' and ; && utesluter ftg-merom
> tblDocIntr.usrid_d = pcVwUserUsrId_u and ; && bara mina
> tblDocIntr.intrarch = 0 and ; && ej arkivmärkt
> (UPPER(Tblaccdocs.accesscode) = ?pcVwUserUsrAccess or ; && tillräcklig behörighet
> ?pcVwUserUsraccess == '000') and ; && tillräcklig behörighet
> (tblDocIntr.private = .F. or tblDocIntr.usrid_d == ?PcVwUserUsrId_u)) or ;&& ej privat eller skapad av inloggad
> ;
> ; && (1,1) bara mina, arkiverade
> (?pnGrpOnlyMineValue = 1 and ; && begränsat till bara mina
> ?pnGrpArchValue = 1 and ; && visa arkiverade
> tblDocIntr.usrid_d = pcVwUserUsrId_u and ; && bara mina och
> (UPPER(Tblaccdocs.accesscode) = ?pcVwUserUsrAccess or ; && tillräcklig behörighet
> ?pcVwUserUsraccess == '000') and ; && tillräcklig behörighet
> (tblDocIntr.private = .F. or tblDocIntr.usrid_d == ?PcVwUserUsrId_u)) or;&& ej privat eller skapad av inloggad
> ;
> ; && (0,1) arkiverade
> (?pnGrpOnlyMineValue = 0 and ; && inte begränsat till bara mina
> ?pnGrpArchValue = 1 and ; && visa arkiverade
> (UPPER(Tblaccdocs.accesscode) = ?pcVwUserUsrAccess or ; && tillräcklig behörighet
> ?pcVwUserUsraccess == '000') and ; && tillräcklig behörighet
> (tblDocIntr.private = .F. or tblDocIntr.usrid_d == ?PcVwUserUsrId_u))]

ENTIRE THREAD

Variable don´t accept content Posted by Roland Nyberg @ 5/18/2009 12:03:35 PM
RE: Variable don´t accept content Posted by Cetin Basoz @ 5/18/2009 12:19:36 PM
RE: Variable don´t accept content Posted by Roland Nyberg @ 5/19/2009 6:05:41 PM
RE: Variable don´t accept content Posted by Stefan Wuebbe @ 5/18/2009 12:25:17 PM
RE: Variable don´t accept content Posted by Cetin Basoz @ 5/18/2009 12:31:56 PM
RE: Variable don´t accept content Posted by Stefan Wuebbe @ 5/18/2009 12:46:49 PM