campo-sirio/pr/pr1400.uml
luca 31707a203e Patch level :10.0 216
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :modernizzate un casino di maschere!


git-svn-id: svn://10.65.10.50/trunk@18142 c028cbd2-c16b-5b4b-a496-9718f37d4682
2009-01-28 12:06:23 +00:00

127 lines
1.8 KiB
Plaintext
Executable File

#include "pr1400.h"
TOOLBAR "topbar" 0 0 0 2
#include <printbar.h>
ENDPAGE
PAGE "Stampa statistiche temporali" 0 2 0 0
LISTBOX F_ORDINAMENTO 16
BEGIN
PROMPT 2 2 "Ordinamento per "
FLAGS "U"
ITEM "C|Codice"
MESSAGE HIDE,G_RAGSOC@|SHOW,G_CODAGE@
ITEM "R|Ragione sociale"
MESSAGE SHOW,G_RAGSOC@|HIDE,G_CODAGE@
END
GROUPBOX DLG_NULL 76 4
BEGIN
PROMPT 2 3 "Intervallo agenti"
END
STRING F_DAAGE 5
BEGIN
PROMPT 3 4 "Dall'agente "
FLAGS "UZ"
USE LF_AGENTI
INPUT CODAGE F_DAAGE
DISPLAY "Codice" CODAGE
DISPLAY "Descr@50" RAGSOC
OUTPUT F_DAAGE CODAGE
OUTPUT F_DESFROM RAGSOC
CHECKTYPE NORMAL
GROUP G_CODAGE
END
STRING F_DESFROM 50
BEGIN
PROMPT 25 4 ""
FLAGS "D"
GROUP G_CODAGE
END
STRING F_AAGE 5
BEGIN
PROMPT 3 5 "All'agente "
FLAGS "UZ"
COPY USE F_DAAGE
INPUT CODAGE F_AAGE
COPY DISPLAY F_DAAGE
OUTPUT F_AAGE CODAGE
OUTPUT F_DESTO RAGSOC
CHECKTYPE NORMAL
GROUP G_CODAGE
END
STRING F_DESTO 50
BEGIN
PROMPT 25 5 ""
FLAGS "D"
GROUP G_CODAGE
END
STRING F_DADES 50
BEGIN
PROMPT 3 4 "Dall'agente "
USE LF_AGENTI KEY 2
INPUT RAGSOC F_DADES
DISPLAY "Descr@50" RAGSOC
DISPLAY "Codice@20" CODAGE
OUTPUT F_DADES RAGSOC
CHECKTYPE NORMAL
GROUP G_RAGSOC
END
STRING F_ADES 50
BEGIN
PROMPT 3 5 "All'agente "
COPY USE F_DADES
INPUT RAGSOC F_ADES
COPY DISPLAY F_DADES
OUTPUT F_ADES RAGSOC
CHECKTYPE NORMAL
GROUP G_RAGSOC
END
GROUPBOX DLG_NULL 38 3
BEGIN
PROMPT 2 7 "Intervallo date"
END
DATE F_DATEFROM
BEGIN
PROMPT 3 8 "Da "
CHECKTYPE REQUIRED
END
DATE F_DATETO
BEGIN
PROMPT 24 8 "A "
FLAGS "A"
CHECKTYPE REQUIRED
END
LISTBOX F_GROUPMONTH 2
BEGIN
PROMPT 42 8 "Mesi da raggruppare "
ITEM "1|1"
ITEM "2|2"
ITEM "3|3"
ITEM "4|4"
ITEM "5|5"
ITEM "6|6"
ITEM "7|7"
ITEM "8|8"
ITEM "9|9"
ITEM "10|10"
ITEM "11|11"
ITEM "12|12"
END
ENDPAGE
ENDMASK