root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level :10.0

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :Nuova versione stampa mangano, lavatrice


git-svn-id: svn://10.65.10.50/trunk@20233 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
lvietri 2010-03-16 09:22:10 +00:00
parent b3e0e9f6fe
commit 7b77236a7c
2 changed files with 33 additions and 29 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
lv/lv0800a.uml
View File

@ -16,13 +16,14 @@ BEGIN
PROMP 2 3 "Da Data " PROMP 2 3 "Da Data "
FIELD #F_DATADOC_DA FIELD #F_DATADOC_DA
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
FLAGS "A"
END END
DATE F_DATADOC_A_1 DATE F_DATADOC_A_1
BEGIN BEGIN
PROMP 40 3 "Da Data " PROMP 40 3 "A Data "
FIELD #F_DATADOC_A FIELD #F_DATADOC_A
VALIDATE DATE_CMP_FUNC >= F_DATADOC_A VALIDATE DATE_CMP_FUNC >= F_DATADOC_A_1
WARNING "La data finale non deve essere successiva a quella finale" WARNING "La data finale non deve essere successiva a quella finale"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
FLAGS "A" FLAGS "A"
@ -33,11 +34,11 @@ BEGIN
PROMPT 2 5 "Numerazione " PROMPT 2 5 "Numerazione "
HELP "Codice numerazione" HELP "Codice numerazione"
USE %NUM USE %NUM
INPUT CODTAB F_CODNUM INPUT CODTAB F_CODNUM_1
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
OUTPUT F_CODNUM CODTAB OUTPUT F_CODNUM_1 CODTAB
OUTPUT F_DESCODNUM S0 OUTPUT F_DESCODNUM_1 S0
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
FLAGS "UPA" FLAGS "UPA"
WARNING "Numerazione assente" WARNING "Numerazione assente"
@ -49,11 +50,11 @@ BEGIN
PROMPT 24 5 "" PROMPT 24 5 ""
HELP "Descrizione Numerazione" HELP "Descrizione Numerazione"
USE %NUM KEY 2 USE %NUM KEY 2
INPUT S0 F_DESCODNUM INPUT S0 F_DESCODNUM_1
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
OUTPUT F_CODNUM CODTAB OUTPUT F_CODNUM_1 CODTAB
OUTPUT F_DESCODNUM S0 OUTPUT F_DESCODNUM_1 S0
FIELD #F_DESCODNUM FIELD #F_DESCODNUM
END END
@ -62,12 +63,12 @@ BEGIN
PROMPT 2 6 "Tipo " PROMPT 2 6 "Tipo "
HELP "Codice tipo documento" HELP "Codice tipo documento"
USE %TIP USE %TIP
INPUT CODTAB F_TIPODOC INPUT CODTAB F_TIPODOC_1
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
OUTPUT F_TIPODOC CODTAB OUTPUT F_TIPODOC_1 CODTAB
OUTPUT F_DESTIPODOC S0 OUTPUT F_DESTIPODOC_1 S0
FLAGS "UP" FLAGS "UPA"
FIELD #F_TIPODOC FIELD #F_TIPODOC
END END
@ -76,10 +77,11 @@ BEGIN
PROMPT 24 6 "" PROMPT 24 6 ""
HELP "Descrizione tipo documento" HELP "Descrizione tipo documento"
USE %TIP KEY 2 USE %TIP KEY 2
INPUT S0 F_DESTIPODOC INPUT S0 F_DESTIPODOC_1
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
COPY OUTPUT F_TIPODOC OUTPUT F_TIPODOC_1 CODTAB
OUTPUT F_DESTIPODOC_1 S0
FIELD #F_DESTIPODOC FIELD #F_DESTIPODOC
END END

32
lv/lv0900a.uml
View File

@ -1,4 +1,4 @@
#include "lv0800a.h" #include "lv0900a.h"
TOOLBAR "topbar" 0 0 0 2 TOOLBAR "topbar" 0 0 0 2
#include "printbar.h" #include "printbar.h"
@ -16,13 +16,14 @@ BEGIN
PROMP 2 3 "Da Data " PROMP 2 3 "Da Data "
FIELD #F_DATADOC_DA FIELD #F_DATADOC_DA
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
FLAGS "A"
END END
DATE F_DATADOC_A_1 DATE F_DATADOC_A_1
BEGIN BEGIN
PROMP 40 3 "Da Data " PROMP 40 3 "A Data "
FIELD #F_DATADOC_A FIELD #F_DATADOC_A
VALIDATE DATE_CMP_FUNC >= F_DATADOC_A VALIDATE DATE_CMP_FUNC >= F_DATADOC_A_1
WARNING "La data finale non deve essere successiva a quella finale" WARNING "La data finale non deve essere successiva a quella finale"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
FLAGS "A" FLAGS "A"
@ -33,11 +34,11 @@ BEGIN
PROMPT 2 5 "Numerazione " PROMPT 2 5 "Numerazione "
HELP "Codice numerazione" HELP "Codice numerazione"
USE %NUM USE %NUM
INPUT CODTAB F_CODNUM INPUT CODTAB F_CODNUM_1
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
OUTPUT F_CODNUM CODTAB OUTPUT F_CODNUM_1 CODTAB
OUTPUT F_DESCODNUM S0 OUTPUT F_DESCODNUM_1 S0
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
FLAGS "UPA" FLAGS "UPA"
WARNING "Numerazione assente" WARNING "Numerazione assente"
@ -49,11 +50,11 @@ BEGIN
PROMPT 24 5 "" PROMPT 24 5 ""
HELP "Descrizione Numerazione" HELP "Descrizione Numerazione"
USE %NUM KEY 2 USE %NUM KEY 2
INPUT S0 F_DESCODNUM INPUT S0 F_DESCODNUM_1
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
OUTPUT F_CODNUM CODTAB OUTPUT F_CODNUM_1 CODTAB
OUTPUT F_DESCODNUM S0 OUTPUT F_DESCODNUM_1 S0
FIELD #F_DESCODNUM FIELD #F_DESCODNUM
END END
@ -62,12 +63,12 @@ BEGIN
PROMPT 2 6 "Tipo " PROMPT 2 6 "Tipo "
HELP "Codice tipo documento" HELP "Codice tipo documento"
USE %TIP USE %TIP
INPUT CODTAB F_TIPODOC INPUT CODTAB F_TIPODOC_1
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
OUTPUT F_TIPODOC CODTAB OUTPUT F_TIPODOC_1 CODTAB
OUTPUT F_DESTIPODOC S0 OUTPUT F_DESTIPODOC_1 S0
FLAGS "UP" FLAGS "UPA"
FIELD #F_TIPODOC FIELD #F_TIPODOC
END END
@ -76,10 +77,11 @@ BEGIN
PROMPT 24 6 "" PROMPT 24 6 ""
HELP "Descrizione tipo documento" HELP "Descrizione tipo documento"
USE %TIP KEY 2 USE %TIP KEY 2
INPUT S0 F_DESTIPODOC INPUT S0 F_DESTIPODOC_1
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
COPY OUTPUT F_TIPODOC OUTPUT F_TIPODOC_1 CODTAB
OUTPUT F_DESTIPODOC_1 S0
FIELD #F_DESTIPODOC FIELD #F_DESTIPODOC
END END