Re: Load Record Error - V11 - different idea

Code :

  `(m) utl_Read_Only
  `$1 - pointer - pointer to table to place into read only
  `leave selection as it started - but unsorted
  `∙Created 4-22-05 by Chip
C_POINTER($1;$Table)

$Table:=$1
CREATE SET($Table->;"Read_Only_Temp")  `save current record selection

REDUCE SELECTION($Table->;0)  `remove all records from current 
selection, so none are loaded
READ ONLY($Table->)  `make table read only
USE SET("Read_Only_Temp")  `replace selection
CLEAR SET("Read_Only_Temp")  `clean up
  `

**********************************************************************
The 4D v11 SQL Roadshow - coming to a city near you!
http://www.4D.com/roadshow/index.html

4th Dimension Internet Users Group (4D iNUG)
FAQ:  http://www.4d.com/support/faqnug.html
Archive:  http://dir.gmane.org/gmane.comp.lang.inug-4d.tech
Unsub:  mailto:4D_Tech-Unsubscribe@...
Post: mailto:4d_tech@...
Options: https://lists.4d.com/mailman/listinfo/4d_tech
**********************************************************************