PICKE
Descrizione
Questa azione è chiamata subito dopo la selezione di un elemento nella lista di picking.
Tipo di oggetto
Semplice, Combinato
Transazione
No
Utilizzo
Permette di effettuare dei controlli per verificare che sia possibile o meno selezionare l'elemento.
Se è possibile selezionare l'elemento, questa azione permette di alimentare la parte destra della videata con le informazioni collegate al record selezionato.
Se non lo è, lo si notifica al supervisore posizionando OK=0.
Esempio
La gestione dei lock viene fatta automaticamente dalla gestione oggetto: Quando si cerca di entrare in modifica su un record già utilizzato da un altro utente, la chiave piccola è presente in basso a destra della videata e si ottiene il messaggio di errore "Modifica in corso su un'altra postazione".
Queste righe sono da aggiungere nelle sezioni PICKE e FIN_PICKE come indicato nell'esempio qui sotto:
Nota: Il gosub AVANT_MOD è facoltativo, è possibile che questa sezione non esista!
$PICKE
# Nuovo elemento selezionato #
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
When GBOXPI1 : Gosub PICKE_FAC2 From SUBPIHD
When GBOXPN1 : Gosub PICKE_RET From SUBPIHD
Endcase
Return
$FIN_PICK
# Fin picking #
If REP=""
If !VERROU
GMESSAGE=mess(10,100,1) : GERR=1 : OK=0 : Return
Elsif !CLECUR | !ACTMOD | GCONSULT
GMESSAGE=mess(9,123,1) : GERR=1 : OK=0 : Return
Endif
Endif
Affzo [PIH3]1-99
Gosub TEST_VALID From SUBPIH : # Agg basi tassabili e calcolo tasse elementi fatturazione
Return
Azioni associate
 | |
PICKE | |
| | |
