Aggiunta possibilita' selezione registro riepilogativo
git-svn-id: svn://10.65.10.50/trunk@2571 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
d24b916481
commit
1ba490e481
@ -77,19 +77,11 @@ BEGIN
|
||||
MESSAGE RESET,DA_CODICE|RESET,A_CODICE
|
||||
END
|
||||
|
||||
DATE DATA_STAMPA
|
||||
BEGIN
|
||||
PROMPT 28 7 "Data stampa "
|
||||
FLAGS "A"
|
||||
CHECKTYPE REQUIRED
|
||||
WARNING "Inserire la data di stampa"
|
||||
END
|
||||
|
||||
STRING CODICE_LIBRO 3
|
||||
BEGIN
|
||||
PROMPT 2 7 "Codice libro "
|
||||
HELP "Codice libro di cui si chiede la stampa; nel caso in cui non si indichi nessun codice verranno stampati tutti i libri delle ditte selezionate"
|
||||
USE REG SELECT (I0<"3") && (S6=="") && (CODTAB[1,4]==#111)
|
||||
USE REG SELECT (I0<="3") && (S6=="") && (CODTAB[1,4]==#111)
|
||||
INPUT CODTAB[1,4] ANNO
|
||||
INPUT CODTAB[5,7] CODICE_LIBRO
|
||||
DISPLAY "Anno " CODTAB[1,4]
|
||||
@ -106,7 +98,7 @@ STRING CODICE_LIBRO_PROVA 3
|
||||
BEGIN
|
||||
PROMPT 2 7 "Codice libro "
|
||||
HELP "Codice libro di cui si chiede la stampa; nel caso in cui non si indichi nessun codice verranno stampati tutti i libri delle ditte selezionate"
|
||||
USE REG SELECT (I0<"3") && (CODTAB[1,4]==#111)
|
||||
USE REG SELECT (I0<="3") && (CODTAB[1,4]==#111)
|
||||
INPUT CODTAB[1,4] ANNO
|
||||
INPUT CODTAB[5,7] CODICE_LIBRO_PROVA
|
||||
DISPLAY "Anno " CODTAB[1,4]
|
||||
@ -137,6 +129,14 @@ BEGIN
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
DATE DATA_STAMPA
|
||||
BEGIN
|
||||
PROMPT 28 7 "Data stampa "
|
||||
FLAGS "A"
|
||||
CHECKTYPE REQUIRED
|
||||
WARNING "Inserire la data di stampa"
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 52 3
|
||||
BEGIN
|
||||
PROMPT 2 8 "Stampa movimenti"
|
||||
@ -151,7 +151,7 @@ END
|
||||
|
||||
DATE A_DATA
|
||||
BEGIN
|
||||
PROMPT 30 9 "Alla data "
|
||||
PROMPT 30 9 "Alla data "
|
||||
HELP "Data di fine stampa registro"
|
||||
VALIDATE DATE_CMP_FUNC >= DA_DATA
|
||||
WARNING "Inserire una data non inferiore alla data limite inferiore"
|
||||
@ -228,7 +228,7 @@ STRING CODICE_LIBRO_IVA 3
|
||||
BEGIN
|
||||
PROMPT 2 3 "Eventuale codice libro IVA "
|
||||
HELP "Libro IVA da stampare. Vuoto = tutti"
|
||||
USE REG SELECT (I0<"3") && (CODTAB[1,4]==#111)
|
||||
USE REG SELECT (I0<="3") && (CODTAB[1,4]==#111)
|
||||
INPUT CODTAB[1,4] ANNO
|
||||
INPUT CODTAB[5,7] CODICE_LIBRO_IVA
|
||||
DISPLAY "Anno " CODTAB[1,4]
|
||||
|
Loading…
x
Reference in New Issue
Block a user