campo-sirio/ps/pd5317100.uml
lvietri f34a9362f8 Patch level :10.0
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :Ricompilazione files


git-svn-id: svn://10.65.10.50/trunk@19971 c028cbd2-c16b-5b4b-a496-9718f37d4682
2010-01-22 09:23:06 +00:00

72 lines
1.1 KiB
Plaintext
Executable File

#include "pd5317100.h"
TOOLBAR "topbar" 0 0 0 2
#include "printbar.h"
ENDPAGE
PAGE "Stampa Listino Carrelli" -1 -1 40 5
GROUPBOX DLG_NULL 76 5
BEGIN
PROMPT 1 1 "@b Parametri Carrelli"
END
STRING F_COD_CMS 6
BEGIN
PROMPT 2 2 "Da Numero"
FLAGS "U"
USE 147
INPUT CODCMS F_COD_CMS
DISPLAY "Codice" CODCMS
DISPLAY "Descrizione@50" DESCRIZ
OUTPUT F_COD_CMS CODCMS
OUTPUT F_DES_CMS DESCRIZ
CHECKTYPE SEARCH
MESSAGE EMPTY "",F_DES_CMS
FIELD #FROM
END
STRING F_DES_CMS 50
BEGIN
PROMPT 25 2 ""
FLAGS "D"
END
STRING F_COD_CMS_TO 6
BEGIN
PROMPT 2 3 "A Numero "
FLAGS "U"
USE 147
INPUT CODCMS F_COD_CMS_TO
DISPLAY "Codice" CODCMS
DISPLAY "Descrizione@50" DESCRIZ
OUTPUT F_COD_CMS_TO CODCMS
OUTPUT F_DES_CMS_TO DESCRIZ
CHECKTYPE SEARCH
MESSAGE EMPTY "",F_DES_CMS_TO
FIELD #TO
END
STRING F_DES_CMS_TO 50
BEGIN
PROMPT 25 3 ""
FLAGS "D"
END
BOOLEAN F_VENDUTO
BEGIN
FIELD #F_VEN
PROMPT 2 6 "Venduti"
MESSAGE TRUE " ",F_CARICO
END
BOOLEAN F_CARICO
BEGIN
FIELD #F_CAR
PROMPT 2 8 "In Carico"
MESSAGE TRUE " ",F_VENDUTO
END
ENDPAGE
ENDMASK