52faa371ab
git-svn-id: svn://10.65.10.50/branches/R_10_00@22651 c028cbd2-c16b-5b4b-a496-9718f37d4682
95 lines
1.5 KiB
Plaintext
95 lines
1.5 KiB
Plaintext
#include "lv2a00a.h"
|
|
|
|
PAGE "Generazione automatica giri" -1 -1 53 9
|
|
|
|
GROUPBOX DLG_NULL 50 3
|
|
BEGIN
|
|
PROMPT 1 0 "@bParametri standard per contratti privi di giri"
|
|
END
|
|
|
|
STRING F_ITINERARIO 3
|
|
BEGIN
|
|
PROMPT 2 1 "Itinerario "
|
|
USE &ITI
|
|
JOIN &AUT TO &ITI ALIAS 1000 INTO CODTAB==S1
|
|
JOIN &MEZ TO &ITI ALIAS 2000 INTO CODTAB==S2
|
|
INPUT CODTAB F_ITINERARIO
|
|
DISPLAY "Codice" CODTAB
|
|
DISPLAY "Descrizione@50" S0
|
|
DISPLAY "Autista" S1
|
|
DISPLAY "Descrizione Autista@50" 1000@->S0
|
|
DISPLAY "Targa@8" S2
|
|
DISPLAY "Descrizione Mezzo@50" 2000@->S0
|
|
OUTPUT F_ITINERARIO CODTAB
|
|
FLAGS "UZ"
|
|
CHECKTYPE REQUIRED
|
|
END
|
|
|
|
NUMBER F_FREQUENZA 2
|
|
BEGIN
|
|
PROMPT 25 1 "Frequenza "
|
|
USE &FRQ
|
|
INPUT CODTAB F_FREQUENZA
|
|
DISPLAY "Codice" CODTAB
|
|
DISPLAY "Descrizione@50" S0
|
|
OUTPUT F_FREQUENZA CODTAB
|
|
CHECKTYPE REQUIRED
|
|
FLAGS "UZ"
|
|
END
|
|
|
|
RADIOBUTTON F_CONSEGNA 50
|
|
BEGIN
|
|
PROMPT 1 3 "@bModalità di consegna"
|
|
ITEM "C|Consegna"
|
|
ITEM "R|Ritiro"
|
|
ITEM "E|Entrambi"
|
|
FLAGS "Z"
|
|
END
|
|
|
|
GROUPBOX DLG_NULL 50 3
|
|
BEGIN
|
|
PROMPT 1 6 "@bGiorni di passaggio"
|
|
END
|
|
|
|
BOOLEAN F_LUNEDI
|
|
BEGIN
|
|
PROMPT 2 7 "Lun"
|
|
END
|
|
|
|
BOOLEAN F_MARTEDI
|
|
BEGIN
|
|
PROMPT 9 7 "Mar"
|
|
END
|
|
|
|
BOOLEAN F_MERCOLEDI
|
|
BEGIN
|
|
PROMPT 16 7 "Mer"
|
|
END
|
|
|
|
BOOLEAN F_GIOVEDI
|
|
BEGIN
|
|
PROMPT 23 7 "Gio"
|
|
END
|
|
|
|
BOOLEAN F_VENERDI
|
|
BEGIN
|
|
PROMPT 30 7 "Ven"
|
|
END
|
|
|
|
BOOLEAN F_SABATO
|
|
BEGIN
|
|
PROMPT 37 7 "Sab"
|
|
END
|
|
|
|
BOOLEAN F_DOMENICA
|
|
BEGIN
|
|
PROMPT 43 7 "Dom"
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
TOOLBAR "topbar" 0 0 0 2
|
|
#include "elabar.h"
|
|
END
|
|
|
|
ENDMASK |