2009-03-17 12:30:06 +00:00
|
|
|
#include "pd5317100.h"
|
|
|
|
|
|
|
|
TOOLBAR "topbar" 0 0 0 2
|
|
|
|
#include "printbar.h"
|
2010-01-22 09:23:06 +00:00
|
|
|
ENDPAGE
|
2009-03-17 12:30:06 +00:00
|
|
|
|
|
|
|
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
|