` Printed Icetips Article

Icetips Article



Files, drivers etc.: Using who and where to update a field based on the fieldname
2004-03-08 -- Michael Ware
 
Newsgroups: softvelocity.clarion.language

"Michael Ware"  wrote in message
news:A921.1078782798.4795@discuss.softvelocity.com...

 In C55 something like this should work:

 SetDate    PROCEDURE (FILE F)
 REC &GROUP
 DT_Field    ANY
   CODE
     REC &= F{Prop:Record}
     DT_Field &= WHAT(REC,WHERE(REC,'CrtDate'))
     DT_Field = TODAY()
   RETURN

 -Mike

(NOTE: that code is going to blow up all over the place if you pass it a able that doesn't
have a CrtDate field in it .  You might want to test the return value of the WHERE call
before using the What().)



Printed November 21, 2024, 7:17 am
This article has been viewed/printed 35360 times.
Google search has resulted in 3 hits on this article since January 25, 2004.