PICKE
Description
This action is called just after the selection of an element in the picking list.
OBJect type
Single, Combined
Transaction
No
Use
It is used to carryout the controls in order to verify whether the element can or cannot be selected.
If the element can be selected, this action is used to load the right hand side of the screen, the the information linked to the selected record.
If it cannot be selected, the supervisor is notified by setting OK=0.
Example
The management of the locks is automatically made by the OBJect management : When an attempt is made to enter a modification in a record already used by another user, the small key is present in the bottom right of the screen and an error message is obtained "Modification in process on another workstation". However the lock management is not processed, when adding lines by picking. Addition of the first line will open it up in modification mode but without in control. To correct this problem, it is necessary to add several lines in the application processes managing the pickings.
These lines are to be added in the PICKE and FIN_PICKE section as indicated in the example below :
$PICKE
# New selected element #
If !find(currbox,GBOXPO1,GBOXPT1,GBOXPI1,GBOXPN1) Return : Endif
If REP=""
If !CLECUR | !VERROU | !ACTMOD | GCONSULT OK=0 : Return : Endif
Gosub AVANT_MOD : If !OK Return : Endif
Endif
Case currbox
When GBOXPO1 : Gosub PICKE_CDE From SUBPIHD
When GBOXPT1 : Gosub PICKE_RCP From SUBPIHD
$FIN_PICK
Associated actions
 |
|
|
PICKE |
|
| |
|
