The project creates auto-generated methods for non-unique indices.
Creates the following methods:
- IndexNameOpen(val)
- IndexNameFirst(val)
- IndexNameLast(val)
- IndexNameNext(val)
- IndexNamePrevious(val)
- set person = ##class(samples.Person).NameIndexOpen("Daniel")
- SET person = person.NameIndexFirst("Daniel")
- SET person = person.NameIndexLast("Daniel")
- SET person = person.NameIndexNext("Daniel")
- SET person = person.NameIndexPrevious("Daniel")
set person = ##class(samples.Person).PhoneIndexOpen("880-555-4323") While $IsObject(person) { write !, person.Name set person = person.PhoneIndexNext("880-555-4323") } - USER> zpm
- zpm: USER>install bondar-nav
- Add to persistent classes Extends bondar.indexnav.IndexNav
Example:
Class samples.Person Extends (%Persistent, bondar.indexnav.IndexNav, %Populate) - Compile the project