campo-sirio/src/ce/cestcgr.uml
mtollari 1b14ec9415 Spostamento cartella sorgenti
git-svn-id: svn://10.65.10.50/branches/R_10_00@23236 c028cbd2-c16b-5b4b-a496-9718f37d4682
2016-09-09 13:59:02 +00:00

55 lines
859 B
Plaintext
Executable File

//definizione maschera per stampa tabella gruppi cespiti
#include "cestcgr.h"
PAGE "Stampa Gruppi cespiti" -1 -1 78 6
NUMBER F_INIZIO 2
BEGIN
PROMPT 2 2 "Da codice "
FLAGS "UZ"
FIELD CODTAB
USE %CGR KEY 1
INPUT CODTAB F_INIZIO
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@60" S0
OUTPUT F_INIZIO CODTAB
OUTPUT F_D_INIZIO S0
GROUP 1
CHECKTYPE NORMAL
END
STRING F_D_INIZIO 60 50
BEGIN
PROMPT 17 2 ""
FLAGS "D"
END
NUMBER F_FINE 2
BEGIN
PROMPT 2 3 "A codice "
FLAGS "UZ"
FIELD CODTAB
USE %CGR KEY 1
INPUT CODTAB F_FINE
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@60" S0
OUTPUT F_FINE CODTAB
OUTPUT F_D_FINE S0
GROUP 2
CHECKTYPE NORMAL
END
STRING F_D_FINE 60 50
BEGIN
PROMPT 17 3 ""
FLAGS "D"
END
ENDPAGE
TOOLBAR "bottom" 0 0 0 2
#include <printbar.h>
ENDPAGE
ENDMASK