Re: method to assign values to a field

> --
> My new e-mail address is gilliam@.... The "From" box may continue to read gilliam@... until Time-Warner learns how to use the technology they've acquired.
>
> ---- Allen Matlick  wrote:
>
> =============
> gilliam@... wrote:
>> I continue to try to teach myself 4D. The following project method selects the records I want and puts them in order, but it does not do the next step: loop through the selection and assign "True" to the boolean field "LastVisit." Any suggestions would be appreciated.
>>
>> ALL RECORDS([ProgNotes])
>> QUERY([ProgNotes];[ProgNotes]DOS>Current date-90)
>
> A minor comment. You don't need to use the ALL RECORDS([ProgNotes])
> line. The QUERY command automatically works on all of the records in
> the table referred to.
>
> In contrast the QUERY SELECTION command works on the currently selected
> records. If you use QUERY SELECTION the ALL RECORDS command would not
> be redundant.
>
> Allen
>
>
>
>
>> ORDER BY([ProgNotes];[Patients]NameLast;[Patients]NameFirst;[ProgNotes]DOS;)
>> For ($vlRecord;1;Records in selection([ProgNotes]))
>> MODIFY RECORD([ProgNotes];*)LastVisit:=True
>> ACCEPT
>> NEXT RECORD([ProgNotes])
>> End for
>>
>>
>> **********************************************************************
>> 4D Basics hosted by 4D, Inc. http://www.4D.com/
>>
>> An all-new List box. More features, more power.
>> Headers, footers, cell formatting and other goodies.
>> See it here first! /www.4d.com/livedemos>
>>
>> To Unsubscribe: mailto:4DBasics-off@...
>> **********************************************************************
>>
>>
>
>
> **********************************************************************
> 4D Basics hosted by 4D, Inc. http://www.4D.com/
>
> An all-new List box. More features, more power.
> Headers, footers, cell formatting and other goodies.
> See it here first! /www.4d.com/livedemos>
>
> To Unsubscribe: mailto:4DBasics-off@...
> **********************************************************************
>
>
>
> **********************************************************************
> 4D Basics hosted by 4D, Inc.                       http://www.4D.com/
>
> An all-new List box. More features, more power.
> Headers, footers, cell formatting and other goodies.
> See it here first! <http://www.4d.com/livedemos>
>
> To Unsubscribe:                        mailto:4DBasics-off@...
> **********************************************************************
>
>