Page History
...
This
...
script
...
locates
...
an
...
entry
...
in
...
a
...
browse
...
list.
...
The
...
position
...
of
...
the
...
entry
...
in
...
the
...
list
...
is
...
determined
...
by
...
the
...
value
...
entered
...
in
...
an
...
input
...
field.
...
Then,
...
perform
...
an
...
action
...
on
...
the
...
selected
...
the
...
entry.
...
In
...
this
...
script:
...
· utxtEmpno
...
is
...
the
...
name
...
given
...
to
...
the
...
field
...
to
...
position
...
to
...
in
...
the
...
form
...
using
...
newlook
...
Designer
...
.
· uDataGrid
...
Is
...
the
...
name
...
given
...
to
...
the
...
browselist/subfile
...
in
...
the
...
form
...
using
...
newlook
...
Designer
...
.
·
...
The
...
first
...
column
...
in
...
the
...
data
...
grid
...
contains
...
the
...
Option
...
field.
...
·
...
The
...
second
...
column
...
in
...
the
...
data
...
grid
...
contains
...
the
...
value
...
to
...
position
...
to.
...
·
...
The
...
VisualID1
...
of
...
the
...
Instance
...
List
...
has
...
the
...
employee
...
number
...
.
·
...
Use
...
option
...
2
...
to
...
change
...
the
...
details
...
of
...
an
...
employee
...
selected
...
in
...
the
...
Instance
...
List.
...
/* Set the value of a variable to that of the selected Employee */...
var strCompare = objListManager.VisualId1
...
[0...
];...
/* Set the value of the field in the form to that of the selected Employee */
...
SETVALUE("utxtEmpno", strCompare);
...
/* Send an Enter key to cause the list positioning */
...
SENDKEY(KeyEnter);
...
/* Get the number of rows in the data grid */
...
var intRowCount = GETVALUE("uDataGrid.RowCount");
...
/* Traverse the rows and compare the value of the second column with the one to position to. */
...
for (var intRowNo = 0; intRowNo < intRowCount; intRowNo++)
...
{
...
if ( GETVALUE("uDataGrid.Rows(" + intRowNo + ").Cells(1).Text") == strCompare)
...
...
{
...
/* Type a 2 next to the first entry and press enter */
...
SETVALUE("uDataGrid.Rows(" + intRowNo + ").Cells(0).Text", 2);
...
SENDKEY(KeyEnter);
...
break;
...
...
}
...
}
...