DICL ;SEA/TOAD,SF/TKW-VA FileMan: Lookup: Lister ;28APR2012
Source file <DICL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
LIST(DIFILE,DIFIEN,DIFIELDS,DIFLAGS,DINUMBER,DIFROM,DIPART,DINDEX,DISCREEN,DIWRITE,DILIST,DIMSGA,DIC) | ;
; ENTRY POINT--return a list of entries from a file ; (Note: DIC parameter only passed if called from ^DICQ) |
|
IN | ; Entry point from LIST^DIC
|
|
INPUT | ; Validate input parameters
|
|
OUTPUT | ; Establish output file name, starting output subscript no.
|
|
FILE | ; Validate file number and IENS.
|
|
CHECKS | ;
|
|
IXANDID | ; Gather information about index and field data to be returned.
|
|
IXNAME | ; Set default index name if null.
|
|
BADQ | ||
BRANCH | ; Continue on to actual search.
|
|
DINDEX(DIFILE,DIFLAGS) | ; Set DINDEX to index name for KEY. Also called at top of ^DIC & by DICF & DICF2
|
|
ERROUT | ||
OUT |