Choose
Jump to navigation
Jump to search
Choose
è un comando che permette di visualizzare una finestra di selezione personalizzata.
Ecco un esempio che recupera da tabella un elenco di record e poi in base alla scelta popola i campi della videata.
Va notato che il carattere &
deve essere il primo della riga.
Subprog S_YCODMAR(VALEUR) Variable Char VALEUR() Choose [F:YCE] Order By [F:YCE]YCODMAR Asc; [F:YCE]YSEQMAR Asc Using & [F:YCE]YCODMAR Titled "Cod.Marchio", & [F:YCE]YSEQMAR Titled "Sequenza", & [F:YCE]YNUMFILE Titled "NumFile", & [F:YCE]YTXTETI Titled "TestoEti", & [F:YCE]YGRPCERT Titled "GrpCert" & Sized(120,360) & Titled "Seleziona certificazione " # Lo status a 28 indica che un record è stato scelto ed è come se fosse stata fatta una READ puntuale sul record selezionato If [S]status = 28 Then #[M:YCC1]YCODMAR(nolign-1)=[F:YCE]YCODMAR VALEUR =[F:YCE]YCODMAR [M:YCC1]YSEQMAR(nolign-1)=[F:YCE]YSEQMAR [M:YCC1]YNUMFILE(nolign-1)=[F:YCE]YNUMFILE [M:YCC1]YTXTETI(nolign-1)=[F:YCE]YTXTETI [M:YCC1]YGRPCERT(nolign-1)=[F:YCE]YGRPCERT Endif End
Vedi help istruzione status:
- 27 GSTALFT Click on left list
- 28 GSTALF2 Double-click on left list