campo-sirio/ce/cestcat.uml
luca 8b6010d722 Patch level :10.0 962
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
0001678: 002659 - controllo qualità - richiesta parametri stampe tabelle cespiti
Descrizione le maschere di richesta parametri delle stampe delle tabelle comuni dei cespiti sono old style


git-svn-id: svn://10.65.10.50/branches/R_10_00@21823 c028cbd2-c16b-5b4b-a496-9718f37d4682
2011-03-24 16:29:19 +00:00

103 lines
1.7 KiB
Plaintext
Executable File

//definizione maschera per stampa tabella attivita'
#include "cestcat.h"
PAGE "Stampa Attivita' cespiti" -1 -1 78 10
NUMBER F_INIZIO 2
BEGIN
PROMPT 2 2 "Da codice gruppo "
FLAGS "UZ"
FIELD CODTAB[1,2]
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 26 2 ""
FLAGS "D"
END
STRING F_INIZIO2 4
BEGIN
PROMPT 2 3 " specie "
FLAGS "U_"
FIELD CODTAB[3,6]
USE %CAT KEY 1
INPUT CODTAB[1,2] F_INIZIO
INPUT CODTAB[3,6] F_INIZIO2
DISPLAY "Gruppo" CODTAB[1,2]
DISPLAY "Specie" CODTAB[3,6]
DISPLAY "Descrizione@60" S0
OUTPUT F_INIZIO CODTAB[1,2]
OUTPUT F_INIZIO2 CODTAB[3,6]
OUTPUT F_D_INIZIO2 S0
GROUP 1
CHECKTYPE NORMAL
END
STRING F_D_INIZIO2 60 50
BEGIN
PROMPT 26 3 ""
FLAGS "D"
END
NUMBER F_FINE 2
BEGIN
PROMPT 2 5 "A codice gruppo "
FLAGS "UZ"
FIELD CODTAB[1,2]
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 26 5 ""
FLAGS "D"
END
STRING F_FINE2 4
BEGIN
PROMPT 2 6 " specie "
FLAGS "U_"
FIELD CODTAB[3,6]
USE %CAT KEY 1
INPUT CODTAB[1,2] F_FINE
INPUT CODTAB[3,6] F_FINE2
DISPLAY "Gruppo" CODTAB[1,2]
DISPLAY "Specie" CODTAB[3,6]
DISPLAY "Descrizione@60" S0
OUTPUT F_FINE CODTAB[1,2]
OUTPUT F_FINE2 CODTAB[3,6]
OUTPUT F_D_FINE2 S0
GROUP 2
CHECKTYPE NORMAL
END
STRING F_D_FINE2 60 50
BEGIN
PROMPT 26 6 ""
FLAGS "D"
END
ENDPAGE
TOOLBAR "bottom" 0 0 0 2
#include <printbar.h>
ENDPAGE
ENDMASK