Correzioni marginali alle maschere
git-svn-id: svn://10.65.10.50/trunk@627 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy
parent
4b80e1269f
commit
496edc10f2
@ -129,7 +129,7 @@ BEGIN
|
|||||||
FIELD LF_ALLEG->CODCF
|
FIELD LF_ALLEG->CODCF
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
KEY 1
|
KEY 1
|
||||||
COPY ALL,F_ANNO
|
COPY ALL F_ANNO
|
||||||
HELP "Indicare il codice relativo al cliente o fornitore"
|
HELP "Indicare il codice relativo al cliente o fornitore"
|
||||||
ADD RUN cg0 -1
|
ADD RUN cg0 -1
|
||||||
WARNING "Registrazione assente"
|
WARNING "Registrazione assente"
|
||||||
|
|||||||
@ -1,10 +1,10 @@
|
|||||||
// cg0500.cpp - Tabella causali
|
// cg0500.cpp - Tabella causali
|
||||||
|
|
||||||
#include <applicat.h>
|
#include <applicat.h>
|
||||||
|
#include <config.h>
|
||||||
#include <msksheet.h>
|
#include <msksheet.h>
|
||||||
#include <relapp.h>
|
#include <relapp.h>
|
||||||
#include <tabutil.h>
|
#include <tabutil.h>
|
||||||
#include <config.h>
|
|
||||||
#include <utility.h>
|
#include <utility.h>
|
||||||
|
|
||||||
#include <causali.h>
|
#include <causali.h>
|
||||||
@ -290,17 +290,16 @@ bool TCaus_app::tipodoc_hndl (TMask_field& f, KEY k)
|
|||||||
f.mask().hide(F_TIPO_MOV_2);
|
f.mask().hide(F_TIPO_MOV_2);
|
||||||
if (app().saldaconto()) f.mask().show(F_TIPO_MOV_1);
|
if (app().saldaconto()) f.mask().show(F_TIPO_MOV_1);
|
||||||
|
|
||||||
f.mask().enable(F_COD_REG);
|
field_reg.enable();
|
||||||
field_reg.check_type(CHECK_REQUIRED);
|
field_reg.check_type(CHECK_REQUIRED);
|
||||||
|
|
||||||
TipoIVA i = nessuna_iva;
|
|
||||||
TTable tabtpd("%TPD");
|
TTable tabtpd("%TPD");
|
||||||
tabtpd.put("CODTAB", val);
|
tabtpd.put("CODTAB", val);
|
||||||
|
|
||||||
if (tabtpd.read() == NOERR)
|
if (tabtpd.read() == NOERR)
|
||||||
{
|
{
|
||||||
i = (TipoIVA)tabtpd.get_int("I0"); // IVA acquisti, vendite, generica
|
const TipoIVA i = (TipoIVA)tabtpd.get_int("I0"); // IVA acquisti, vendite, generica
|
||||||
bool corrisp = tabtpd.get_bool("B0");
|
const bool corrisp = tabtpd.get_bool("B0");
|
||||||
|
|
||||||
if (i == 1) // vendite
|
if (i == 1) // vendite
|
||||||
{
|
{
|
||||||
@ -327,16 +326,15 @@ bool TCaus_app::tipodoc_hndl (TMask_field& f, KEY k)
|
|||||||
}
|
}
|
||||||
else // TIPODOC vuoto || IN || PG || AN
|
else // TIPODOC vuoto || IN || PG || AN
|
||||||
{
|
{
|
||||||
f.mask().set(F_COD_REG,"");
|
field_reg.reset();
|
||||||
f.mask().disable(F_COD_REG);
|
field_reg.disable();
|
||||||
|
|
||||||
f.mask().hide(F_TIPO_MOV_1);
|
f.mask().hide(F_TIPO_MOV_1);
|
||||||
if (app().saldaconto())
|
if (app().saldaconto())
|
||||||
f.mask().show(F_TIPO_MOV_2);
|
f.mask().show(F_TIPO_MOV_2);
|
||||||
}
|
}
|
||||||
|
|
||||||
// Ma davvero esiste il registro ?
|
// Ma davvero esiste il registro ?
|
||||||
const TString16 codreg(f.mask().get(F_COD_REG));
|
const TString16 codreg(field_reg.get());
|
||||||
if (codreg.not_empty())
|
if (codreg.not_empty())
|
||||||
{
|
{
|
||||||
TRegistro registro(codreg, app().anno_iva());
|
TRegistro registro(codreg, app().anno_iva());
|
||||||
@ -853,6 +851,7 @@ void TCaus_app::init_insert_mode(TMask& m)
|
|||||||
void TCaus_app::init_modify_mode(TMask& m)
|
void TCaus_app::init_modify_mode(TMask& m)
|
||||||
{
|
{
|
||||||
init_mask(m);
|
init_mask(m);
|
||||||
|
m.efield(F_COD_REG).check_type(CHECK_NONE); // Disabilita temporaneamente il check sui registri
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
@ -3,21 +3,18 @@
|
|||||||
|
|
||||||
MENU TASK_MENUBAR
|
MENU TASK_MENUBAR
|
||||||
SUBMENU MENU_FILE "~File"
|
SUBMENU MENU_FILE "~File"
|
||||||
ITEM BAR_ITEM(1) "~Selezione"
|
|
||||||
|
|
||||||
|
|
||||||
MENUBAR MENU_BAR(1)
|
MENUBAR MENU_BAR(1)
|
||||||
|
|
||||||
MENU MENU_BAR(1)
|
MENU MENU_BAR(1)
|
||||||
SUBMENU MENU_FILE "~File"
|
SUBMENU MENU_FILE "~File"
|
||||||
ITEM BAR_ITEM(1) "~Selezione"
|
|
||||||
|
|
||||||
|
|
||||||
MENUBAR MENU_BAR(2)
|
MENUBAR MENU_BAR(2)
|
||||||
|
|
||||||
MENU MENU_BAR(2)
|
MENU MENU_BAR(2)
|
||||||
SUBMENU MENU_FILE "~File"
|
SUBMENU MENU_FILE "~File"
|
||||||
SUBMENU BAR_ITEM(1) "~Sezione"
|
|
||||||
|
|
||||||
MENU BAR_ITEM(1)
|
MENU BAR_ITEM(1)
|
||||||
ITEM MENU_ITEM(1) "~Header"
|
ITEM MENU_ITEM(1) "~Header"
|
||||||
@ -33,17 +30,14 @@ MENUBAR MENU_BAR(4)
|
|||||||
|
|
||||||
MENU MENU_BAR(4)
|
MENU MENU_BAR(4)
|
||||||
SUBMENU MENU_FILE "~File"
|
SUBMENU MENU_FILE "~File"
|
||||||
ITEM BAR_ITEM(1) "~Selezione"
|
|
||||||
|
|
||||||
MENUBAR MENU_BAR(5)
|
MENUBAR MENU_BAR(5)
|
||||||
|
|
||||||
MENU MENU_BAR(5)
|
MENU MENU_BAR(5)
|
||||||
SUBMENU MENU_FILE "~File"
|
SUBMENU MENU_FILE "~File"
|
||||||
ITEM BAR_ITEM(1) "~Selezione"
|
|
||||||
|
|
||||||
MENUBAR MENU_BAR(6)
|
MENUBAR MENU_BAR(6)
|
||||||
|
|
||||||
MENU MENU_BAR(6)
|
MENU MENU_BAR(6)
|
||||||
SUBMENU MENU_FILE "~File"
|
SUBMENU MENU_FILE "~File"
|
||||||
ITEM BAR_ITEM(1) "~Selezione"
|
|
||||||
|
|
||||||
|
|||||||
480
cg/cg1500a.uml
480
cg/cg1500a.uml
@ -1,239 +1,241 @@
|
|||||||
#include "cg1500.h"
|
#include "cg1500.h"
|
||||||
|
|
||||||
PAGE "Pag. 1" -1 -1 74 16
|
PAGE "Stampa bilancio" -1 -1 74 16
|
||||||
|
|
||||||
NUMBER F_CODDITTA 5
|
NUMBER F_CODDITTA 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Ditta "
|
PROMPT 2 1 "Ditta "
|
||||||
FLAGS "FRD"
|
FLAGS "FRD"
|
||||||
USE LF_NDITTE KEY 1
|
USE LF_NDITTE KEY 1
|
||||||
CHECKTYPE REQUIRED
|
CHECKTYPE REQUIRED
|
||||||
INPUT CODDITTA F_CODDITTA
|
INPUT CODDITTA F_CODDITTA
|
||||||
DISPLAY "Codice" CODDITTA
|
DISPLAY "Codice" CODDITTA
|
||||||
DISPLAY "Ragione sociale @50" RAGSOC
|
DISPLAY "Ragione sociale @50" RAGSOC
|
||||||
OUTPUT F_CODDITTA CODDITTA
|
OUTPUT F_CODDITTA CODDITTA
|
||||||
OUTPUT F_RAGSOC RAGSOC
|
OUTPUT F_RAGSOC RAGSOC
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_RAGSOC 50
|
STRING F_RAGSOC 50
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 2 "Ragione sociale "
|
PROMPT 2 2 "Ragione sociale "
|
||||||
FLAGS "D"
|
FLAGS "D"
|
||||||
END
|
END
|
||||||
|
|
||||||
DATE F_DATASTAMPA
|
DATE F_DATASTAMPA
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 48 1 "Data stampa "
|
PROMPT 48 1 "Data stampa "
|
||||||
HELP "Data che verra' stampata sul bilancio"
|
HELP "Data che verra' stampata sul bilancio"
|
||||||
FLAGS "A"
|
FLAGS "A"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER F_ANNO 4
|
NUMBER F_ANNO 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "Anno esercizio "
|
PROMPT 2 3 "Anno esercizio "
|
||||||
HELP "Anno di cui si vuole ottenre il bilancio"
|
HELP "Anno di cui si vuole ottenere il bilancio"
|
||||||
USE ESC
|
USE ESC
|
||||||
INPUT CODTAB F_ANNO
|
INPUT CODTAB F_ANNO
|
||||||
DISPLAY "Anno" CODTAB
|
DISPLAY "Anno" CODTAB
|
||||||
DISPLAY "Data inizio esercizio" D0
|
DISPLAY "Data inizio esercizio" D0
|
||||||
DISPLAY "Data fine esercizio" D1
|
DISPLAY "Data fine esercizio" D1
|
||||||
OUTPUT F_ANNO CODTAB
|
OUTPUT F_ANNO CODTAB
|
||||||
//CHECKTYPE NORMAL
|
//CHECKTYPE NORMAL
|
||||||
//MESSAGE HIDE,98|HIDE,99|SHOW,96|SHOW,97 //se il campo e' vuoto manda questi messaggi
|
//MESSAGE HIDE,98|HIDE,99|SHOW,96|SHOW,97 //se il campo e' vuoto manda questi messaggi
|
||||||
//MESSAGE EMPTY HIDE,96|HIDE,97|SHOW,98|SHOW,99 //se invece e' pieno manda questi
|
//MESSAGE EMPTY HIDE,96|HIDE,97|SHOW,98|SHOW,99 //se invece e' pieno manda questi
|
||||||
FLAGS "RZ"
|
FLAGS "RZ"
|
||||||
END
|
END
|
||||||
|
|
||||||
RADIOBUTTON F_BILANCIO 33
|
RADIOBUTTON F_BILANCIO 33
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 5 "Tipo bilancio "
|
PROMPT 2 5 "Tipo bilancio "
|
||||||
HELP "Indicare il tipo di bilancio da stampare"
|
HELP "Indicare il tipo di bilancio da stampare"
|
||||||
ITEM "1|Bilancio a sezioni contrapposte"
|
ITEM "1|Bilancio a sezioni contrapposte"
|
||||||
MESSAGE HIDE,F_STAMPA1|RESET,F_STAMPA1|HIDE,F_VERIFICA|RESET,F_VERIFICA
|
MESSAGE HIDE,F_STAMPA1|RESET,F_STAMPA1|HIDE,F_VERIFICA|RESET,F_VERIFICA
|
||||||
MESSAGE HIDE,F_STAMPAV|RESET,F_STAMPAV|HIDE,F_DATADA|RESET,F_DATADA
|
MESSAGE HIDE,F_STAMPAV|RESET,F_STAMPAV|HIDE,F_DATADA|RESET,F_DATADA
|
||||||
MESSAGE HIDE,F_DATAA|RESET,F_DATAA|HIDE,F_SITUAZIONE|RESET,F_SITUAZIONE
|
MESSAGE HIDE,F_DATAA|RESET,F_DATAA|HIDE,F_SITUAZIONE|RESET,F_SITUAZIONE
|
||||||
MESSAGE HIDE,F_ORDINAMENTO|RESET,F_ORDINAMENTO|HIDE,F_STAMPAC|RESET,F_STAMPAC
|
MESSAGE HIDE,F_ORDINAMENTO|RESET,F_ORDINAMENTO|HIDE,F_STAMPAC|RESET,F_STAMPAC
|
||||||
MESSAGE HIDE,96|HIDE,97|HIDE,98|HIDE,99
|
MESSAGE HIDE,96|HIDE,97|HIDE,98|HIDE,99
|
||||||
MESSAGE HIDE,F_MODULO|RESET,F_MODULO
|
MESSAGE HIDE,F_MODULO|RESET,F_MODULO
|
||||||
MESSAGE SHOW,F_STAMPA|K_SPACE,F_STAMPA
|
MESSAGE SHOW,F_STAMPA|K_SPACE,F_STAMPA
|
||||||
ITEM "2|Bilancio di verifica"
|
MESSAGE HIDE,DLG_PAGE
|
||||||
MESSAGE HIDE,F_STAMPA|RESET,F_STAMPA
|
ITEM "2|Bilancio di verifica"
|
||||||
MESSAGE HIDE,F_DATALIM|RESET,F_DATALIM|HIDE,F_TOTALI|RESET,F_TOTALI
|
MESSAGE HIDE,F_STAMPA|RESET,F_STAMPA
|
||||||
MESSAGE HIDE,F_CODICI|RESET,F_CODICI|HIDE,F_SALDO|RESET,F_SALDO
|
MESSAGE HIDE,F_DATALIM|RESET,F_DATALIM|HIDE,F_TOTALI|RESET,F_TOTALI
|
||||||
MESSAGE HIDE,F_STAMPAV|RESET,F_STAMPAV
|
MESSAGE HIDE,F_CODICI|RESET,F_CODICI|HIDE,F_SALDO|RESET,F_SALDO
|
||||||
MESSAGE SHOW,F_VERIFICA|K_SPACE,F_VERIFICA|SHOW,F_STAMPA1|K_SPACE,F_STAMPA1
|
MESSAGE HIDE,F_STAMPAV|RESET,F_STAMPAV
|
||||||
MESSAGE SHOW,F_MODULO|K_SPACE,F_MODULO
|
MESSAGE SHOW,F_VERIFICA|K_SPACE,F_VERIFICA|SHOW,F_STAMPA1|K_SPACE,F_STAMPA1
|
||||||
MESSAGE SHOW,96|SHOW,97|SHOW,98|SHOW,99
|
MESSAGE SHOW,F_MODULO|K_SPACE,F_MODULO
|
||||||
END
|
MESSAGE SHOW,96|SHOW,97|SHOW,98|SHOW,99
|
||||||
|
MESSAGE SHOW,DLG_PAGE
|
||||||
RADIOBUTTON F_STAMPA 28
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 40 5 "Tipo stampa "
|
RADIOBUTTON F_STAMPA 28
|
||||||
HELP "Indicare il tipo di stampa"
|
BEGIN
|
||||||
ITEM "1|Per date limite"
|
PROMPT 40 5 "Tipo stampa "
|
||||||
MESSAGE SHOW,F_DATALIM|SHOW,F_TOTALI|SHOW,F_CODICI|SHOW,F_SALDO|SHOW,F_STAMPAMPROV
|
HELP "Indicare il tipo di stampa"
|
||||||
ITEM "2|All' ultima immissione"
|
ITEM "1|Per date limite"
|
||||||
MESSAGE HIDE,F_DATALIM|HIDE,F_STAMPAMPROV|RESET,F_DATALIM|RESET,F_STAMPAMPROV
|
MESSAGE SHOW,F_DATALIM|SHOW,F_TOTALI|SHOW,F_CODICI|SHOW,F_SALDO|SHOW,F_STAMPAMPROV
|
||||||
MESSAGE SHOW,F_TOTALI|SHOW,F_CODICI|SHOW,F_SALDO
|
ITEM "2|All' ultima immissione"
|
||||||
END
|
MESSAGE HIDE,F_DATALIM|HIDE,F_STAMPAMPROV|RESET,F_DATALIM|RESET,F_STAMPAMPROV
|
||||||
|
MESSAGE SHOW,F_TOTALI|SHOW,F_CODICI|SHOW,F_SALDO
|
||||||
RADIOBUTTON F_STAMPA1 28
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 40 5 "Tipo stampa "
|
RADIOBUTTON F_STAMPA1 28
|
||||||
//FLAGS "G"
|
BEGIN
|
||||||
HELP "Indicare il tipo di stampa"
|
PROMPT 40 5 "Tipo stampa "
|
||||||
ITEM "1|Per date limite"
|
//FLAGS "G"
|
||||||
MESSAGE SHOW,F_VERIFICA|SHOW,F_MODULO
|
HELP "Indicare il tipo di stampa"
|
||||||
ITEM "2|All' ultima immissione"
|
ITEM "1|Per date limite"
|
||||||
MESSAGE SHOW,F_VERIFICA|SHOW,F_MODULO
|
MESSAGE SHOW,F_VERIFICA|SHOW,F_MODULO
|
||||||
MESSAGE COPY,F_STAMPA
|
ITEM "2|All' ultima immissione"
|
||||||
END
|
MESSAGE SHOW,F_VERIFICA|SHOW,F_MODULO
|
||||||
|
MESSAGE COPY,F_STAMPA
|
||||||
DATE F_DATALIM
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 2 9 "Data limite "
|
DATE F_DATALIM
|
||||||
HELP "Data fino alla quale si vuole la stampa"
|
BEGIN
|
||||||
END
|
PROMPT 2 9 "Data limite "
|
||||||
|
HELP "Data fino alla quale si vuole la stampa"
|
||||||
BOOLEAN F_TOTALI
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 33 9 "Non stampare totali per gruppo "
|
BOOLEAN F_TOTALI
|
||||||
HELP "Indicare se non si devono stampare i totali dei gruppi"
|
BEGIN
|
||||||
END
|
PROMPT 33 9 "Non stampare totali per gruppo "
|
||||||
|
HELP "Indicare se non si devono stampare i totali dei gruppi"
|
||||||
BOOLEAN F_CODICI
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 2 10 "Non stampare codici conti "
|
BOOLEAN F_CODICI
|
||||||
HELP "Indicare se non si devono stampare i codici dei conti"
|
BEGIN
|
||||||
END
|
PROMPT 2 10 "Non stampare codici conti "
|
||||||
|
HELP "Indicare se non si devono stampare i codici dei conti"
|
||||||
BOOLEAN F_SALDO
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 33 10 "Non stampare movimenti con saldo a zero "
|
BOOLEAN F_SALDO
|
||||||
HELP "Indicare se non si devono stampare i movimenti con saldo nullo"
|
BEGIN
|
||||||
END
|
PROMPT 33 10 "Non stampare movimenti con saldo a zero "
|
||||||
|
HELP "Indicare se non si devono stampare i movimenti con saldo nullo"
|
||||||
TEXT 96
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 2 10 "Dalla data competenza "
|
TEXT 96
|
||||||
END
|
BEGIN
|
||||||
|
PROMPT 2 10 "Dalla data competenza "
|
||||||
TEXT 97
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 38 10 "Alla data competenza "
|
TEXT 97
|
||||||
END
|
BEGIN
|
||||||
|
PROMPT 38 10 "Alla data competenza "
|
||||||
TEXT 98
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 2 10 "Dalla data operazione "
|
TEXT 98
|
||||||
END
|
BEGIN
|
||||||
|
PROMPT 2 10 "Dalla data operazione "
|
||||||
TEXT 99
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 38 10 "Alla data operazione "
|
TEXT 99
|
||||||
END
|
BEGIN
|
||||||
|
PROMPT 38 10 "Alla data operazione "
|
||||||
DATE F_DATADA
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 24 10 ""
|
DATE F_DATADA
|
||||||
HELP "Data dalla quale iniziare la stampa"
|
BEGIN
|
||||||
END
|
PROMPT 24 10 ""
|
||||||
|
HELP "Data dalla quale iniziare la stampa"
|
||||||
DATE F_DATAA
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 60 10 ""
|
DATE F_DATAA
|
||||||
END
|
BEGIN
|
||||||
|
PROMPT 60 10 ""
|
||||||
BOOLEAN F_STAMPAMPROV
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 2 11 "Stampa movimenti provvisori "
|
BOOLEAN F_STAMPAMPROV
|
||||||
HELP "Indicare se stampare i movimenti provvisori"
|
BEGIN
|
||||||
END
|
PROMPT 2 11 "Stampa movimenti provvisori "
|
||||||
|
HELP "Indicare se stampare i movimenti provvisori"
|
||||||
BUTTON DLG_OK 9 2
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT -12 -1 ""
|
BUTTON DLG_OK 9 2
|
||||||
END
|
BEGIN
|
||||||
|
PROMPT -12 -1 ""
|
||||||
BUTTON DLG_QUIT 9 2
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT -22 -1 ""
|
BUTTON DLG_QUIT 9 2
|
||||||
END
|
BEGIN
|
||||||
|
PROMPT -22 -1 ""
|
||||||
ENDPAGE
|
END
|
||||||
|
|
||||||
PAGE "Pag. 2" -1 -1 74 20
|
ENDPAGE
|
||||||
|
|
||||||
RADIOBUTTON F_VERIFICA 27
|
PAGE "Stampa bilancio di verifica" -1 -1 74 20
|
||||||
BEGIN
|
|
||||||
PROMPT 2 1 "Stampa bilancio di verifica "
|
RADIOBUTTON F_VERIFICA 27
|
||||||
HELP "Tipo di bilancio di verifica"
|
BEGIN
|
||||||
ITEM "1|Bilancio"
|
PROMPT 2 1 "Stampa bilancio di verifica "
|
||||||
ITEM "2|Saldi di mastro"
|
HELP "Tipo di bilancio di verifica"
|
||||||
ITEM "3|Situazione C/F"
|
ITEM "1|Bilancio"
|
||||||
END
|
ITEM "2|Saldi di mastro"
|
||||||
|
ITEM "3|Situazione C/F"
|
||||||
RADIOBUTTON F_STAMPAC 35
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 35 1 "Tipo stampa "
|
RADIOBUTTON F_STAMPAC 35
|
||||||
HELP "Help tipo di stampa del bilancio"
|
BEGIN
|
||||||
ITEM "1|Conti movimentati"
|
PROMPT 35 1 "Tipo stampa "
|
||||||
ITEM "2|Conti con saldo diverso da zero"
|
HELP "Help tipo di stampa del bilancio"
|
||||||
END
|
ITEM "1|Conti movimentati"
|
||||||
|
ITEM "2|Conti con saldo diverso da zero"
|
||||||
RADIOBUTTON F_STAMPAV 35
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 35 1 "Tipo stampa "
|
RADIOBUTTON F_STAMPAV 35
|
||||||
HELP "Help tipo di stampa del bilancio"
|
BEGIN
|
||||||
ITEM "1|Conti movimentati"
|
PROMPT 35 1 "Tipo stampa "
|
||||||
ITEM "2|Conti con saldo diverso da zero"
|
HELP "Help tipo di stampa del bilancio"
|
||||||
ITEM "3|Tutti i conti"
|
ITEM "1|Conti movimentati"
|
||||||
END
|
ITEM "2|Conti con saldo diverso da zero"
|
||||||
|
ITEM "3|Tutti i conti"
|
||||||
LIST F_MODULO 10
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 2 8 "Stampa su modulo stretto "
|
LIST F_MODULO 10
|
||||||
HELP "Indicare il numero di caratteri del foglio (larghezza)"
|
BEGIN
|
||||||
ITEM "1|132 crt."
|
PROMPT 2 8 "Stampa su modulo stretto "
|
||||||
ITEM "2|198 crt."
|
HELP "Indicare il numero di caratteri del foglio (larghezza)"
|
||||||
END
|
ITEM "1|132 crt."
|
||||||
|
ITEM "2|198 crt."
|
||||||
LIST F_SITUAZIONE 11
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT 2 10 "Tipo situazione "
|
LIST F_SITUAZIONE 11
|
||||||
HELP "Indicare il tipo di situazione che si vuole ottenere"
|
BEGIN
|
||||||
ITEM " |Entrambi"
|
PROMPT 2 10 "Tipo situazione "
|
||||||
ITEM "C|Clienti"
|
HELP "Indicare il tipo di situazione che si vuole ottenere"
|
||||||
ITEM "F|Fornitori"
|
ITEM " |Entrambi"
|
||||||
END
|
ITEM "C|Clienti"
|
||||||
|
ITEM "F|Fornitori"
|
||||||
/*
|
END
|
||||||
RADIOBUTTON F_STAMPAC 35
|
|
||||||
BEGIN
|
/*
|
||||||
PROMPT 37 10 "Tipo stampa "
|
RADIOBUTTON F_STAMPAC 35
|
||||||
ITEM "1|Conti movimentati"
|
BEGIN
|
||||||
ITEM "2|Conti con saldo diverso da zero"
|
PROMPT 37 10 "Tipo stampa "
|
||||||
END
|
ITEM "1|Conti movimentati"
|
||||||
*/
|
ITEM "2|Conti con saldo diverso da zero"
|
||||||
|
END
|
||||||
LIST F_ORDINAMENTO 11
|
*/
|
||||||
BEGIN
|
|
||||||
PROMPT 2 11 "Tipo ordinamento "
|
LIST F_ORDINAMENTO 11
|
||||||
HELP "Indicare il tipo di ordinamento da effettuare"
|
BEGIN
|
||||||
ITEM "1|Per codice"
|
PROMPT 2 11 "Tipo ordinamento "
|
||||||
ITEM "2|Alfabetico"
|
HELP "Indicare il tipo di ordinamento da effettuare"
|
||||||
END
|
ITEM "1|Per codice"
|
||||||
|
ITEM "2|Alfabetico"
|
||||||
BUTTON DLG_OK 9 2
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT -12 -1 ""
|
BUTTON DLG_OK 9 2
|
||||||
END
|
BEGIN
|
||||||
|
PROMPT -12 -1 ""
|
||||||
BUTTON DLG_QUIT 9 2
|
END
|
||||||
BEGIN
|
|
||||||
PROMPT -22 -1 ""
|
BUTTON DLG_QUIT 9 2
|
||||||
END
|
BEGIN
|
||||||
|
PROMPT -22 -1 ""
|
||||||
ENDPAGE
|
END
|
||||||
|
|
||||||
ENDMASK
|
ENDPAGE
|
||||||
|
|
||||||
|
ENDMASK
|
||||||
|
|||||||
@ -312,14 +312,14 @@ bool TCausale::read(const char* cod, int year)
|
|||||||
rcaus.put(CAU_CODCAUS, cod);
|
rcaus.put(CAU_CODCAUS, cod);
|
||||||
rcaus.put(CAU_NRIGA, 0);
|
rcaus.put(CAU_NRIGA, 0);
|
||||||
|
|
||||||
err = rcaus.read(_isgteq); // Find first line
|
for (err = rcaus.read(_isgteq); // Find first line
|
||||||
if (err != NOERR) return FALSE;
|
err == NOERR && rcaus.get(CAU_CODCAUS) == cod;
|
||||||
|
err = rcaus.next() // Read next line
|
||||||
while (err == NOERR && rcaus.get(CAU_CODCAUS) == cod)
|
)
|
||||||
{
|
{
|
||||||
const int riga = rcaus.get_int(CAU_NRIGA);
|
const int riga = rcaus.get_int(CAU_NRIGA);
|
||||||
add(rcaus.curr(), riga);
|
add(rcaus.curr(), riga);
|
||||||
err = rcaus.next(); // Read next line
|
|
||||||
}
|
}
|
||||||
rcaus.zero();
|
rcaus.zero();
|
||||||
for (int riga = 1; riga < size(); riga++) // Fill gaps
|
for (int riga = 1; riga < size(); riga++) // Fill gaps
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user