Progress Code Uppercase

Yahoo Archive
1
PartNumber = caps(Joboper.PartNum).

but progress is not usually configured to be case sensitive?

try this:

{vbp/vb.i}
FIND FIRST Joboper NO-LOCK WHERE rowid(JobOper) = GetCurrentROWID()
NO-ERROR.
IF AVAIL JobOper THEN
FIND FIRST PartOpr NO-LOCK WHERE PartOpr.Partnum = JobOper.PartNum
NO-ERROR.
IF AVAIL PartOpr THEN
MESSAGE PartOpr.Partnum VIEW-AS ALERT-BOX.


also unless you created a unique index on part number, this would search a
LOT faster to utilize an index. Epicor uses a multiple key index's on their
tables that all start with the desired company.

BobT





-----Original Message-----
From: othyghost [mailto:Eric@...]
Sent: Thursday, January 22, 2004 5:50 AM
To: vantage@yahoogroups.com
Subject: [Vantage] Progress Code Uppercase


I am writing a progress script where I am doing a find between the
JobOper and the PartOpr tables. It keep telling me the part number
was not found so I did a little investigating in Crystal and it
seems that the Part Number is in Caps in one table and not in the
other. Does anybody know the syntax to tell it to compare the CAPS
JobOper Partnum to the CAPS PartOpr Partnum to find the correct
record? Here is the code I have done so far...

{vbp/vb.i}
DEF VAR PartNumber like joboper.partnum NO-UNDO.
Find Joboper where rowid(JobOper) = GetCurrentROWID() NO-LOCK.
Assign PartNumber = Partnum.
Find PartOpr where (PartOpr.Partnum = PartNumber) no-lock no-error.
setStringValue("text_1.scrvalue",PartOpr.Character01).
RETURN.

Thanks

Eric



Useful links for the Yahoo!Groups Vantage Board are: ( Note: You must have
already linked your email address to a yahoo id to enable access. )
(1) To access the Files Section of our Yahoo!Group for Report Builder and
Crystal Reports and other 'goodies', please goto:
http://groups.yahoo.com/group/vantage/files/.
<http://groups.yahoo.com/group/vantage/files/.>
(2) To search through old msg's goto:
http://groups.yahoo.com/group/vantage/messages
<http://groups.yahoo.com/group/vantage/messages>
(3) To view links to Vendors that provide Vantage services goto:
http://groups.yahoo.com/group/vantage/links
<http://groups.yahoo.com/group/vantage/links>



Yahoo! Groups Sponsor

ADVERTISEMENT

<http://rd.yahoo.com/SIG=12cdcdtq9/M=267637.4116732.5333197.1261774/D=egroup
web/S=1705007183:HM/EXP=1074865818/A=1945637/R=0/*http://www.netflix.com/Def
ault?mqso=60178397&partid=4116732> click here

<http://us.adserver.yahoo.com/l?M=267637.4116732.5333197.1261774/D=egroupmai
l/S=:HM/A=1945637/rand=595240001>


_____

Yahoo! Groups Links


* To visit your group on the web, go to:
http://groups.yahoo.com/group/vantage/
<http://groups.yahoo.com/group/vantage/>


* To unsubscribe from this group, send an email to:
vantage-unsubscribe@yahoogroups.com
<mailto:vantage-unsubscribe@yahoogroups.com?subject=Unsubscribe>


* Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service
<http://docs.yahoo.com/info/terms/> .




[Non-text portions of this message have been removed]
2
I am writing a progress script where I am doing a find between the
JobOper and the PartOpr tables. It keep telling me the part number
was not found so I did a little investigating in Crystal and it
seems that the Part Number is in Caps in one table and not in the
other. Does anybody know the syntax to tell it to compare the CAPS
JobOper Partnum to the CAPS PartOpr Partnum to find the correct
record? Here is the code I have done so far...

{vbp/vb.i}
DEF VAR PartNumber like joboper.partnum NO-UNDO.
Find Joboper where rowid(JobOper) = GetCurrentROWID() NO-LOCK.
Assign PartNumber = Partnum.
Find PartOpr where (PartOpr.Partnum = PartNumber) no-lock no-error.
setStringValue("text_1.scrvalue",PartOpr.Character01).
RETURN.

Thanks

Eric