Dec 212017
Create DBASE IV field selection popup with up to 3 fields rather than the standard 1 field. | |||
---|---|---|---|
File Name | File Size | Zip Size | Zip Type |
DEMO1.PRG | 4845 | 1731 | deflated |
NAMES.DBF | 1325 | 507 | deflated |
NAMES.MDX | 4097 | 1181 | deflated |
PICKLIST.DBO | 6648 | 3023 | deflated |
PICKLIST.DOC | 4160 | 1592 | deflated |
TSCR.ASM | 2449 | 907 | deflated |
TSCR.BIN | 48 | 41 | deflated |
Download File PICKLIST.ZIP Here
Contents of the PICKLIST.DOC file
Files included in picklist.zip
- PICKLIST.DOC
- DEMO1.PRG
- TSCR.ASM
- TSCR.BIN
- PICKLIST.DBO
- NAMES.DBF
- NAMES.MDX
===============================================================================
PICKLIST 1.0 DOCUMENTATION
About PICKLIST:
What does PICKLIST do?
After PICKLIST is called, the program displays a box containing
a list of records. The user can navigate throughout the list
with the pgup, pgdn, and up/down arrow keys. The user then has
the option of selecting an item from the list (by pressing enter)
or (escape or left/right arrow) to do nothing. If enter is pressed
then the record pointer is positioned to the selected record. If
escape or left/right arrow are pressed then the record pointer
is not re-positioned.
The programer needs only to decide on the screen location
of the list, the fields to be displayed, and the number of
items to be displayed (height).
Upon return from PICKLIST the record pointer is positioned to
the selected record, providing that the user actually selected
an item. (WAS_PICK=.T.)
SEE DEMO1.PRG FOR AN EXAMPLE
USAGE:
DO PICKLIST WITH "FIELD","FIELD","FIELD",ROW,COLUMN,# TO DISPLAY,WAS_PICK
Where: FIELD IS A .DBF FIELD NAME (MUST BE IN QUOTES)
If only one or two fields need to be displayed then create a
variable such as NULL="" and use "NULL" in place of "FIELD".
Example: DO PICKLIST WITH "LASTNAME",FIRSTNAME","NULL",0,0,5,WAS_PICK
ROW = starting row of list window
COLUMN = starting column of list window
# TO DISPLAY = number of records to display in list (height of window)
WAS_PICK = a logical value that is returned true if the user presses
the [Enter] key within the picklist. A false value is
returned when the user presses escape or left/right arrow.
Note: PICKLIST does not validate ANY parameters. You must make sure that
you enter valid screen coordinates and at the same time making sure
that the width and height of the displayed picklist will also fit
on the screen.
NOTES ABOUT PICKLIST:
- THE FILE TSCR.BIN MUST BE IN THE DEFAULT DIRECTORY. THIS ROUTINE
IS ESSENTIAL TO THE OPERATION OF PICKLIST.
- For ver 1.1 only and was compiled on a color system
- Numeric fields are converted to a length of 10 with two decimals
- Only works with indexed .dbf's (.mdx works, haven't tried .ndx)
- Window refresh is acceptable on 286 machine, do not know about 8088
- Refresh is faster with less items displayed. (5-10)
- Do not use work area #10. PICKLIST creates a "mirror" image of the
current .dbf in use by using the USE IN AGAIN statement.
- Variables used: (all are RELEASED after return from PICKLIST)
row col cnt p1 p2 p3 p4 height
end_row end_col startrow ptr beg_row beg_col
parm top_rec width curr_dbf curr_ord
- Navigation keys
[Esc], left/right arrow = exit list
[Return] = select item in list
PgUp, PgDn, up/down arrow = just what they imply
===============================================================================
Please leave comments, suggestions, or questions via mail on the
Ashton Tate BBS addressed to user name SLICE.
- PICKLIST.DOC
- DEMO1.PRG
- TSCR.ASM
- TSCR.BIN
- PICKLIST.DBO
- NAMES.DBF
- NAMES.MDX
===============================================================================
PICKLIST 1.0 DOCUMENTATION
About PICKLIST:
What does PICKLIST do?
After PICKLIST is called, the program displays a box containing
a list of records. The user can navigate throughout the list
with the pgup, pgdn, and up/down arrow keys. The user then has
the option of selecting an item from the list (by pressing enter)
or (escape or left/right arrow) to do nothing. If enter is pressed
then the record pointer is positioned to the selected record. If
escape or left/right arrow are pressed then the record pointer
is not re-positioned.
The programer needs only to decide on the screen location
of the list, the fields to be displayed, and the number of
items to be displayed (height).
Upon return from PICKLIST the record pointer is positioned to
the selected record, providing that the user actually selected
an item. (WAS_PICK=.T.)
SEE DEMO1.PRG FOR AN EXAMPLE
USAGE:
DO PICKLIST WITH "FIELD","FIELD","FIELD",ROW,COLUMN,# TO DISPLAY,WAS_PICK
Where: FIELD IS A .DBF FIELD NAME (MUST BE IN QUOTES)
If only one or two fields need to be displayed then create a
variable such as NULL="" and use "NULL" in place of "FIELD".
Example: DO PICKLIST WITH "LASTNAME",FIRSTNAME","NULL",0,0,5,WAS_PICK
ROW = starting row of list window
COLUMN = starting column of list window
# TO DISPLAY = number of records to display in list (height of window)
WAS_PICK = a logical value that is returned true if the user presses
the [Enter] key within the picklist. A false value is
returned when the user presses escape or left/right arrow.
Note: PICKLIST does not validate ANY parameters. You must make sure that
you enter valid screen coordinates and at the same time making sure
that the width and height of the displayed picklist will also fit
on the screen.
NOTES ABOUT PICKLIST:
- THE FILE TSCR.BIN MUST BE IN THE DEFAULT DIRECTORY. THIS ROUTINE
IS ESSENTIAL TO THE OPERATION OF PICKLIST.
- For ver 1.1 only and was compiled on a color system
- Numeric fields are converted to a length of 10 with two decimals
- Only works with indexed .dbf's (.mdx works, haven't tried .ndx)
- Window refresh is acceptable on 286 machine, do not know about 8088
- Refresh is faster with less items displayed. (5-10)
- Do not use work area #10. PICKLIST creates a "mirror" image of the
current .dbf in use by using the USE IN AGAIN statement.
- Variables used: (all are RELEASED after return from PICKLIST)
row col cnt p1 p2 p3 p4 height
end_row end_col startrow ptr beg_row beg_col
parm top_rec width curr_dbf curr_ord
- Navigation keys
[Esc], left/right arrow = exit list
[Return] = select item in list
PgUp, PgDn, up/down arrow = just what they imply
===============================================================================
Please leave comments, suggestions, or questions via mail on the
Ashton Tate BBS addressed to user name SLICE.
December 21, 2017
Add comments