campo-sirio/pr/pr0700a.uml
alex c066a934f5 Patch level : 10.0 62
Files correlati     :
Ricompilazione Demo : [ ]
Commento           :

Revisione Maschere modulo pr


git-svn-id: svn://10.65.10.50/trunk@16682 c028cbd2-c16b-5b4b-a496-9718f37d4682
2008-05-30 14:26:20 +00:00

72 lines
1006 B
Plaintext
Executable File

#include "pr0700a.h"
TOOLBAR "" 0 0 0 2
BUTTON DLG_OK 11 2
BEGIN
PROMPT -14 -11 "Selezione"
END
BUTTON DLG_INFO 10 2
BEGIN
PROMPT -24 -11 ""
END
BUTTON DLG_HELP 10 2
BEGIN
PROMPT -34 -11 ""
END
BUTTON DLG_QUIT 11 2
BEGIN
PROMPT -44 -11 ""
END
ENDPAGE
PAGE "Gestione Provvigioni" 0 0 0 0
GROUPBOX DLG_NULL 80 4
BEGIN
PROMPT 1 1 "Agente"
FLAGS "R"
END
STRING F_CODAGE 5
BEGIN
PROMPT 2 2 "Codice "
FLAGS "UZ"
USE LF_AGENTI
INPUT CODAGE F_CODAGE
DISPLAY "Codice@8R" CODAGE
DISPLAY "Descrizione@50" RAGSOC
OUTPUT F_CODAGE CODAGE
OUTPUT F_RAGSOC RAGSOC
CHECKTYPE REQUIRED
ADD RUN PR0 -4
END
STRING F_RAGSOC 50
BEGIN
PROMPT 2 3 "Ragione sociale "
USE LF_AGENTI KEY 2
INPUT RAGSOC F_RAGSOC
DISPLAY "Descrizione@50" RAGSOC
DISPLAY "Codice@8R" CODAGE
OUTPUT F_RAGSOC RAGSOC
OUTPUT F_CODAGE CODAGE
CHECKTYPE REQUIRED
ADD RUN PR0 -4
END
NUMBER F_FILTERANNO 4
BEGIN
PROMPT 2 5 "Mostra solo i documenti dell'anno "
FLAGS "U"
END
ENDPAGE
ENDMASK