1be4579e67
Files correlati : ve2.exe ve2400.uml Commento : Aggiunta gestione conai negli articoli Implemented #56
55 lines
881 B
Plaintext
55 lines
881 B
Plaintext
// SHEET 3 (CONAI) DI VE2400
|
|
|
|
PAGE "Pagina CONAI" 5 5 75 15
|
|
|
|
LIST FS_CAT_CONAI 12
|
|
BEGIN
|
|
PROMPT 3 2 "Codice categoria "
|
|
ITEM "|"
|
|
ITEM "AC|Acciaio"
|
|
ITEM "AL|Alluminio"
|
|
ITEM "CA|Carta"
|
|
ITEM "LE|Legno"
|
|
ITEM "PL|Plastica"
|
|
ITEM "VE|Vetro"
|
|
END
|
|
|
|
STRING FS_SCAT_CONAI 2
|
|
BEGIN
|
|
PROMPT 2 4 "Sottocategoria "
|
|
USE &SCC
|
|
INPUT CODTAB[1,2] FS_CAT_CONAI
|
|
INPUT CODTAB[3,4] FS_SCAT_CONAI
|
|
DISPLAY "Categoria" CODTAB[1,2]
|
|
DISPLAY "Sottocategoria" CODTAB[3,4]
|
|
DISPLAY "Descrizione@50" S0
|
|
OUTPUT FS_CAT_CONAI CODTAB[1,2]
|
|
OUTPUT FS_SCAT_CONAI CODTAB[3,4]
|
|
CHECKTYPE REQUIRED
|
|
END
|
|
|
|
NUMBER FS_PES_CONAI 15 5
|
|
BEGIN
|
|
PROMPT 2 6 "Peso in Kg "
|
|
CHECKTYPE REQUIRED
|
|
END
|
|
|
|
BUTTON DLG_OK 10 2
|
|
BEGIN
|
|
PROMPT -13 -1 ""
|
|
END
|
|
|
|
BUTTON DLG_CANCEL 10 2
|
|
BEGIN
|
|
PROMPT -23 -1 ""
|
|
END
|
|
|
|
BUTTON DLG_DELREC 10 2
|
|
BEGIN
|
|
PROMPT -33 -1 "Elimina"
|
|
MESSAGE EXIT,K_DEL
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
ENDMASK |