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

Correzioni varie

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@60 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1994-08-25 09:34:49 +00:00
parent 84ecc65375
commit 8b6051e689
3 changed files with 301 additions and 303 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
ba/ba3700.cpp
View File

@ -32,15 +32,15 @@ Riga_tabrpg::Riga_tabrpg(long num_giorni,const char* perc,const char* tipo_pag,
class TRighe_tabrpg : public TArray class TRighe_tabrpg : public TArray
{ {
public: public:
void add_riga(long=0l,const char* percent="",const char* tipo_pagam="", const char* ult_class=""); void add_riga(long=0l,const char* percent="",const char* tipo_pagam="",
const char* ult_class="");
TRighe_tabrpg() {} TRighe_tabrpg() {}
}; };
void TRighe_tabrpg::add_riga(long num_giorni,const char* perc, const char* tipo_pag,const char* ulter_class) void TRighe_tabrpg::add_riga(long num_giorni,const char* perc, const char* tipo_pag,const char* ulter_class)
{ {
Riga_tabrpg* r=new Riga_tabrpg(num_giorni,perc,tipo_pag,ulter_class); add(new Riga_tabrpg(num_giorni,perc,tipo_pag,ulter_class));
add(r);
} }
@ -50,8 +50,6 @@ class BA3700_application : public TRelation_application
static bool rate_differenziate (TMask_field& f, KEY k); static bool rate_differenziate (TMask_field& f, KEY k);
static bool tipo_prima_rata (TMask_field& f, KEY k); static bool tipo_prima_rata (TMask_field& f, KEY k);
static bool numero_rate (TMask_field& f, KEY k); static bool numero_rate (TMask_field& f, KEY k);
// static bool ricalcolo_percentuale (TMask_field& f, KEY k);
// static bool ricalcola_numero_giorni (TMask_field& f, KEY k);
static bool mese_commerciale (TMask_field& f, KEY k); static bool mese_commerciale (TMask_field& f, KEY k);
static bool riga_sheet(int r, KEY k); static bool riga_sheet(int r, KEY k);

594
ba/ba6000a.uml
View File

@ -1,297 +1,297 @@
#include "ba6000a.h" #include "ba6100a.h"
#include <lffiles.h> #include <lffiles.h>
PAGE "Definizione Stampe" -1 -1 70 17 PAGE "Definizione Stampe" -1 -1 70 17
RADIOBUTTON RDB_BA6_TYPE 26 RADIOBUTTON RDB_BA6_TYPE 26
BEGIN BEGIN
PROMPT 4 1 "Oggetto" PROMPT 4 1 "Oggetto"
HELP "Selezionare l'archivio che si desidera stampare" HELP "Selezionare l'archivio che si desidera stampare"
ITEM "0|Persone Fisiche" ITEM "0|Persone Fisiche"
MESSAGE HIDE,FLD_DITTE_RAGSOCFR|HIDE,FLD_DITTE_RAGSOCTO MESSAGE HIDE,FLD_DITTE_RAGSOCFR|HIDE,FLD_DITTE_RAGSOCTO
MESSAGE HIDE,FLD_ANG_CODFR|HIDE,FLD_ANG_CODTO|HIDE,FLD_ANG_RAGSOCFR MESSAGE HIDE,FLD_ANG_CODFR|HIDE,FLD_ANG_CODTO|HIDE,FLD_ANG_RAGSOCFR
MESSAGE HIDE,FLD_ANG_RAGSOCTO|HIDE,FLD_DITTE_CODTO MESSAGE HIDE,FLD_ANG_RAGSOCTO|HIDE,FLD_DITTE_CODTO
MESSAGE SHOW,FLD_ANF_CODFR|SHOW,FLD_ANF_CODTO|SHOW,FLD_ANF_RAGSOCFR MESSAGE SHOW,FLD_ANF_CODFR|SHOW,FLD_ANF_CODTO|SHOW,FLD_ANF_RAGSOCFR
MESSAGE SHOW,FLD_ANF_RAGSOCTO|HIDE,FLD_DITTE_CODFR MESSAGE SHOW,FLD_ANF_RAGSOCTO|HIDE,FLD_DITTE_CODFR
MESSAGE ENABLE,CHK_BA6_INCLDI MESSAGE ENABLE,CHK_BA6_INCLDI
ITEM "1|Persone Giuridiche" ITEM "1|Persone Giuridiche"
MESSAGE HIDE,FLD_DITTE_CODTO|HIDE,FLD_DITTE_RAGSOCFR MESSAGE HIDE,FLD_DITTE_CODTO|HIDE,FLD_DITTE_RAGSOCFR
MESSAGE HIDE,FLD_DITTE_RAGSOCTO|HIDE,FLD_ANF_CODFR|HIDE,FLD_ANF_CODTO MESSAGE HIDE,FLD_DITTE_RAGSOCTO|HIDE,FLD_ANF_CODFR|HIDE,FLD_ANF_CODTO
MESSAGE HIDE,FLD_ANF_RAGSOCFR|HIDE,FLD_ANF_RAGSOCTO MESSAGE HIDE,FLD_ANF_RAGSOCFR|HIDE,FLD_ANF_RAGSOCTO
MESSAGE SHOW,FLD_ANG_CODFR|SHOW,FLD_ANG_CODTO|SHOW,FLD_ANG_RAGSOCFR MESSAGE SHOW,FLD_ANG_CODFR|SHOW,FLD_ANG_CODTO|SHOW,FLD_ANG_RAGSOCFR
MESSAGE SHOW,FLD_ANG_RAGSOCTO|HIDE,FLD_DITTE_CODFR MESSAGE SHOW,FLD_ANG_RAGSOCTO|HIDE,FLD_DITTE_CODFR
MESSAGE ENABLE,CHK_BA6_INCLDI MESSAGE ENABLE,CHK_BA6_INCLDI
MESSAGE DISABLE,BUT_BA6_ETICHETTE|RESET,BUT_BA6_ETICHETTE MESSAGE DISABLE,BUT_BA6_ETICHETTE|RESET,BUT_BA6_ETICHETTE
MESSAGE ENABLE,BUT_BA6_ETICHETTE|RESET,BUT_BA6_ETICHETTE MESSAGE ENABLE,BUT_BA6_ETICHETTE|RESET,BUT_BA6_ETICHETTE
ITEM "2|Ditte" ITEM "2|Ditte"
MESSAGE HIDE,FLD_ANF_CODFR|HIDE,FLD_ANF_CODTO MESSAGE HIDE,FLD_ANF_CODFR|HIDE,FLD_ANF_CODTO
MESSAGE HIDE,FLD_ANF_RAGSOCFR|HIDE,FLD_ANF_RAGSOCTO MESSAGE HIDE,FLD_ANF_RAGSOCFR|HIDE,FLD_ANF_RAGSOCTO
MESSAGE HIDE,FLD_ANG_CODFR|HIDE,FLD_ANG_CODTO MESSAGE HIDE,FLD_ANG_CODFR|HIDE,FLD_ANG_CODTO
MESSAGE HIDE,FLD_ANG_RAGSOCFR|HIDE,FLD_ANG_RAGSOCTO MESSAGE HIDE,FLD_ANG_RAGSOCFR|HIDE,FLD_ANG_RAGSOCTO
MESSAGE SHOW,FLD_DITTE_CODFR|SHOW,FLD_DITTE_CODTO MESSAGE SHOW,FLD_DITTE_CODFR|SHOW,FLD_DITTE_CODTO
MESSAGE SHOW,FLD_DITTE_RAGSOCFR|SHOW,FLD_DITTE_RAGSOCTO MESSAGE SHOW,FLD_DITTE_RAGSOCFR|SHOW,FLD_DITTE_RAGSOCTO
MESSAGE DISABLE,CHK_BA6_INCLDI MESSAGE DISABLE,CHK_BA6_INCLDI
MESSAGE RESET,CHK_BA6_INCLDI MESSAGE RESET,CHK_BA6_INCLDI
MESSAGE ENABLE,BUT_BA6_ETICHETTE|RESET,BUT_BA6_ETICHETTE MESSAGE ENABLE,BUT_BA6_ETICHETTE|RESET,BUT_BA6_ETICHETTE
END END
RADIOBUTTON RDB_BA6_SORT 26 RADIOBUTTON RDB_BA6_SORT 26
PROMPT 4 6 "Ordinamento" PROMPT 4 6 "Ordinamento"
HELP "Selezionare il tipo di ordinamento dei record stampati" HELP "Selezionare il tipo di ordinamento dei record stampati"
ITEM "1|per Codice" ITEM "1|per Codice"
MESSAGE DISABLE,FLD_ANF_RAGSOCFR|DISABLE,FLD_ANF_RAGSOCTO MESSAGE DISABLE,FLD_ANF_RAGSOCFR|DISABLE,FLD_ANF_RAGSOCTO
MESSAGE RESET,FLD_ANF_RAGSOCFR|RESET,FLD_ANF_RAGSOCTO MESSAGE RESET,FLD_ANF_RAGSOCFR|RESET,FLD_ANF_RAGSOCTO
MESSAGE DISABLE,FLD_ANG_RAGSOCFR|DISABLE,FLD_ANG_RAGSOCTO MESSAGE DISABLE,FLD_ANG_RAGSOCFR|DISABLE,FLD_ANG_RAGSOCTO
MESSAGE RESET,FLD_ANG_RAGSOCFR|RESET,FLD_ANG_RAGSOCTO MESSAGE RESET,FLD_ANG_RAGSOCFR|RESET,FLD_ANG_RAGSOCTO
MESSAGE DISABLE,FLD_DITTE_RAGSOCFR|DISABLE,FLD_DITTE_RAGSOCTO MESSAGE DISABLE,FLD_DITTE_RAGSOCFR|DISABLE,FLD_DITTE_RAGSOCTO
MESSAGE RESET,FLD_DITTE_RAGSOCFR|RESET,FLD_DITTE_RAGSOCTO MESSAGE RESET,FLD_DITTE_RAGSOCFR|RESET,FLD_DITTE_RAGSOCTO
MESSAGE ENABLE,FLD_ANF_CODFR|ENABLE,FLD_ANF_CODTO MESSAGE ENABLE,FLD_ANF_CODFR|ENABLE,FLD_ANF_CODTO
MESSAGE ENABLE,FLD_ANG_CODFR|ENABLE,FLD_ANG_CODTO MESSAGE ENABLE,FLD_ANG_CODFR|ENABLE,FLD_ANG_CODTO
MESSAGE ENABLE,FLD_DITTE_CODFR|ENABLE,FLD_DITTE_CODTO MESSAGE ENABLE,FLD_DITTE_CODFR|ENABLE,FLD_DITTE_CODTO
ITEM "2|per Ragione Sociale" ITEM "2|per Ragione Sociale"
MESSAGE DISABLE,FLD_ANF_CODFR|DISABLE,FLD_ANF_CODTO MESSAGE DISABLE,FLD_ANF_CODFR|DISABLE,FLD_ANF_CODTO
MESSAGE RESET,FLD_ANF_CODFR|RESET,FLD_ANF_CODTO MESSAGE RESET,FLD_ANF_CODFR|RESET,FLD_ANF_CODTO
MESSAGE DISABLE,FLD_ANG_CODFR|DISABLE,FLD_ANG_CODTO MESSAGE DISABLE,FLD_ANG_CODFR|DISABLE,FLD_ANG_CODTO
MESSAGE RESET,FLD_ANG_CODFR|RESET,FLD_ANG_CODTO MESSAGE RESET,FLD_ANG_CODFR|RESET,FLD_ANG_CODTO
MESSAGE DISABLE,FLD_DITTE_CODFR|DISABLE,FLD_DITTE_CODTO MESSAGE DISABLE,FLD_DITTE_CODFR|DISABLE,FLD_DITTE_CODTO
MESSAGE RESET,FLD_DITTE_CODFR|RESET,FLD_DITTE_CODTO MESSAGE RESET,FLD_DITTE_CODFR|RESET,FLD_DITTE_CODTO
MESSAGE ENABLE,FLD_ANF_RAGSOCFR|ENABLE,FLD_ANF_RAGSOCTO MESSAGE ENABLE,FLD_ANF_RAGSOCFR|ENABLE,FLD_ANF_RAGSOCTO
MESSAGE ENABLE,FLD_ANG_RAGSOCFR|ENABLE,FLD_ANG_RAGSOCTO MESSAGE ENABLE,FLD_ANG_RAGSOCFR|ENABLE,FLD_ANG_RAGSOCTO
MESSAGE ENABLE,FLD_DITTE_RAGSOCFR|ENABLE,FLD_DITTE_RAGSOCTO MESSAGE ENABLE,FLD_DITTE_RAGSOCFR|ENABLE,FLD_DITTE_RAGSOCTO
END END
GROUPBOX DLG_NULL 47 3 GROUPBOX DLG_NULL 47 3
BEGIN BEGIN
PROMPT 2 13 "Stampa" PROMPT 2 13 "Stampa"
END END
GROUPBOX DLG_NULL 34 10 GROUPBOX DLG_NULL 34 10
BEGIN BEGIN
PROMPT 32 1 "Selezione " PROMPT 32 1 "Selezione "
END END
TEXT DLG_NULL TEXT DLG_NULL
BEGIN BEGIN
PROMPT 34 5 "da Ragione Sociale" PROMPT 34 5 "da Ragione Sociale"
END END
TEXT DLG_NULL TEXT DLG_NULL
BEGIN BEGIN
PROMPT 34 7 "a Ragione Sociale" PROMPT 34 7 "a Ragione Sociale"
END END
TEXT DLG_NULL TEXT DLG_NULL
BEGIN BEGIN
PROMPT 34 2 "da Codice" PROMPT 34 2 "da Codice"
END END
TEXT DLG_NULL TEXT DLG_NULL
BEGIN BEGIN
PROMPT 48 2 "a Codice" PROMPT 48 2 "a Codice"
END END
STRING FLD_ANF_CODFR 5 STRING FLD_ANF_CODFR 5
BEGIN BEGIN
PROMPT 34 3 "" PROMPT 34 3 ""
USE LF_ANAG KEY 1 USE LF_ANAG KEY 1
INPUT TIPOA "F" INPUT TIPOA "F"
INPUT CODANAGR FLD_ANF_CODFR INPUT CODANAGR FLD_ANF_CODFR
DISPLAY "Codice" CODANAGR DISPLAY "Codice" CODANAGR
DISPLAY "Codice Fiscale " COFI DISPLAY "Codice Fiscale " COFI
DISPLAY "Ragione sociale " RAGSOC DISPLAY "Ragione sociale " RAGSOC
OUTPUT FLD_ANF_CODFR CODANAGR OUTPUT FLD_ANF_CODFR CODANAGR
OUTPUT FLD_ANF_RAGSOCFR RAGSOC OUTPUT FLD_ANF_RAGSOCFR RAGSOC
HELP "Introdurre codice di inizio stampa: vuoto = inizio archivio" HELP "Introdurre codice di inizio stampa: vuoto = inizio archivio"
END END
STRING FLD_ANF_CODTO 5 STRING FLD_ANF_CODTO 5
BEGIN BEGIN
PROMPT 48 3 "" PROMPT 48 3 ""
COPYUSE FLD_ANF_CODFR COPYUSE FLD_ANF_CODFR
INPUT TIPOA "F" INPUT TIPOA "F"
INPUT CODANAGR FLD_ANF_CODTO INPUT CODANAGR FLD_ANF_CODTO
DISPLAY "Codice" CODANAGR DISPLAY "Codice" CODANAGR
DISPLAY "Codice Fiscale " COFI DISPLAY "Codice Fiscale " COFI
DISPLAY "Ragione sociale " RAGSOC DISPLAY "Ragione sociale " RAGSOC
OUTPUT FLD_ANF_CODTO CODANAGR OUTPUT FLD_ANF_CODTO CODANAGR
OUTPUT FLD_ANF_RAGSOCTO RAGSOC OUTPUT FLD_ANF_RAGSOCTO RAGSOC
HELP "Introdurre codice di fine stampa: vuoto = fine archivio" HELP "Introdurre codice di fine stampa: vuoto = fine archivio"
END END
STRING FLD_ANF_RAGSOCFR 29 STRING FLD_ANF_RAGSOCFR 29
BEGIN BEGIN
PROMPT 34 6 "" PROMPT 34 6 ""
USE LF_ANAG KEY 2 SELECT 'TIPOA=="F"' USE LF_ANAG KEY 2 SELECT 'TIPOA=="F"'
INPUT RAGSOC FLD_ANF_RAGSOCFR INPUT RAGSOC FLD_ANF_RAGSOCFR
DISPLAY "Codice" CODANAGR DISPLAY "Codice" CODANAGR
DISPLAY "Codice Fiscale " COFI DISPLAY "Codice Fiscale " COFI
DISPLAY "Ragione sociale " RAGSOC DISPLAY "Ragione sociale " RAGSOC
OUTPUT FLD_ANF_RAGSOCFR RAGSOC OUTPUT FLD_ANF_RAGSOCFR RAGSOC
OUTPUT FLD_ANF_CODFR CODANAGR OUTPUT FLD_ANF_CODFR CODANAGR
HELP "Introdurre ragione soc. di inizio stampa: vuoto = inizio archivio" HELP "Introdurre ragione soc. di inizio stampa: vuoto = inizio archivio"
END END
STRING FLD_ANF_RAGSOCTO 29 STRING FLD_ANF_RAGSOCTO 29
BEGIN BEGIN
PROMPT 34 8 "" PROMPT 34 8 ""
COPYUSE FLD_ANF_RAGSOCFR COPYUSE FLD_ANF_RAGSOCFR
INPUT RAGSOC FLD_ANF_RAGSOCTO INPUT RAGSOC FLD_ANF_RAGSOCTO
DISPLAY "Codice" CODANAGR DISPLAY "Codice" CODANAGR
DISPLAY "Codice Fiscale " COFI DISPLAY "Codice Fiscale " COFI
DISPLAY "Ragione sociale " RAGSOC DISPLAY "Ragione sociale " RAGSOC
OUTPUT FLD_ANF_RAGSOCTO RAGSOC OUTPUT FLD_ANF_RAGSOCTO RAGSOC
OUTPUT FLD_ANF_CODTO CODANAGR OUTPUT FLD_ANF_CODTO CODANAGR
HELP "Introdurre ragione soc. di fine stampa: vuoto = fine archivio" HELP "Introdurre ragione soc. di fine stampa: vuoto = fine archivio"
END END
STRING FLD_ANG_CODFR 5 STRING FLD_ANG_CODFR 5
BEGIN BEGIN
PROMPT 34 3 "" PROMPT 34 3 ""
FLAGS "H" FLAGS "H"
COPYUSE FLD_ANF_CODFR COPYUSE FLD_ANF_CODFR
INPUT TIPOA "G" INPUT TIPOA "G"
INPUT CODANAGR FLD_ANG_CODPR INPUT CODANAGR FLD_ANG_CODPR
DISPLAY "Codice" CODANAGR DISPLAY "Codice" CODANAGR
DISPLAY "Codice Fiscale " COFI DISPLAY "Codice Fiscale " COFI
DISPLAY "Ragione sociale " RAGSOC DISPLAY "Ragione sociale " RAGSOC
OUTPUT FLD_ANG_CODFR CODANAGR OUTPUT FLD_ANG_CODFR CODANAGR
OUTPUT FLD_ANG_RAGSOCFR RAGSOC OUTPUT FLD_ANG_RAGSOCFR RAGSOC
HELP "Introdurre codice di inizio stampa: vuoto = inizio archivio" HELP "Introdurre codice di inizio stampa: vuoto = inizio archivio"
END END
STRING FLD_ANG_CODTO 5 STRING FLD_ANG_CODTO 5
BEGIN BEGIN
PROMPT 48 3 "" PROMPT 48 3 ""
FLAGS "H" FLAGS "H"
COPYUSE FLD_ANF_CODFR COPYUSE FLD_ANF_CODFR
INPUT TIPOA "G" INPUT TIPOA "G"
INPUT CODANAGR FLD_ANG_CODTO INPUT CODANAGR FLD_ANG_CODTO
DISPLAY "Codice" CODANAGR DISPLAY "Codice" CODANAGR
DISPLAY "Codice Fiscale " COFI DISPLAY "Codice Fiscale " COFI
DISPLAY "Ragione sociale " RAGSOC DISPLAY "Ragione sociale " RAGSOC
OUTPUT FLD_ANG_CODTO CODANAGR OUTPUT FLD_ANG_CODTO CODANAGR
OUTPUT FLD_ANG_RAGSOCTO RAGSOC OUTPUT FLD_ANG_RAGSOCTO RAGSOC
HELP "Introdurre codice di fine stampa: vuoto = fine archivio" HELP "Introdurre codice di fine stampa: vuoto = fine archivio"
END END
STRING FLD_ANG_RAGSOCFR 29 STRING FLD_ANG_RAGSOCFR 29
BEGIN BEGIN
PROMPT 34 6 "" PROMPT 34 6 ""
FLAGS "H" FLAGS "H"
USE LF_ANAG KEY 2 SELECT 'TIPOA=="G"' USE LF_ANAG KEY 2 SELECT 'TIPOA=="G"'
INPUT RAGSOC FLD_ANG_RAGSOCFR INPUT RAGSOC FLD_ANG_RAGSOCFR
DISPLAY "Codice" CODANAGR DISPLAY "Codice" CODANAGR
DISPLAY "Codice Fiscale " COFI DISPLAY "Codice Fiscale " COFI
DISPLAY "Ragione sociale " RAGSOC DISPLAY "Ragione sociale " RAGSOC
OUTPUT FLD_ANG_RAGSOCFR RAGSOC OUTPUT FLD_ANG_RAGSOCFR RAGSOC
OUTPUT FLD_ANG_CODFR CODANAGR OUTPUT FLD_ANG_CODFR CODANAGR
HELP "Introdurre ragione soc. di inizio stampa: vuoto = inizio archivio" HELP "Introdurre ragione soc. di inizio stampa: vuoto = inizio archivio"
END END
STRING FLD_ANG_RAGSOCTO 29 STRING FLD_ANG_RAGSOCTO 29
BEGIN BEGIN
PROMPT 34 8 "" PROMPT 34 8 ""
FLAGS "H" FLAGS "H"
COPYUSE FLD_ANG_RAGSOCFR COPYUSE FLD_ANG_RAGSOCFR
INPUT RAGSOC FLD_ANG_RAGSOCTO INPUT RAGSOC FLD_ANG_RAGSOCTO
DISPLAY "Codice" CODANAGR DISPLAY "Codice" CODANAGR
DISPLAY "Codice Fiscale " COFI DISPLAY "Codice Fiscale " COFI
DISPLAY "Ragione sociale " RAGSOC DISPLAY "Ragione sociale " RAGSOC
OUTPUT FLD_ANG_RAGSOCTO RAGSOC OUTPUT FLD_ANG_RAGSOCTO RAGSOC
OUTPUT FLD_ANG_CODTO CODANAGR OUTPUT FLD_ANG_CODTO CODANAGR
HELP "Introdurre ragione soc. di fine stampa: vuoto = fine archivio" HELP "Introdurre ragione soc. di fine stampa: vuoto = fine archivio"
END END
STRING FLD_DITTE_CODFR 5 STRING FLD_DITTE_CODFR 5
BEGIN BEGIN
PROMPT 34 3 "" PROMPT 34 3 ""
FLAGS "H" FLAGS "H"
USE LF_NDITTE KEY 1 USE LF_NDITTE KEY 1
INPUT CODDITTA FLD_DITTE_CODFR INPUT CODDITTA FLD_DITTE_CODFR
DISPLAY "Codice" CODDITTA DISPLAY "Codice" CODDITTA
DISPLAY "Persona Rif. " PERRIF DISPLAY "Persona Rif. " PERRIF
DISPLAY "Ragione sociale " RAGSOC DISPLAY "Ragione sociale " RAGSOC
OUTPUT FLD_DITTE_CODFR CODDITTA OUTPUT FLD_DITTE_CODFR CODDITTA
OUTPUT FLD_DITTE_RAGSOCFR RAGSOC OUTPUT FLD_DITTE_RAGSOCFR RAGSOC
HELP "Introdurre codice di inizio stampa: vuoto = inizio archivio" HELP "Introdurre codice di inizio stampa: vuoto = inizio archivio"
END END
STRING FLD_DITTE_CODTO 5 STRING FLD_DITTE_CODTO 5
BEGIN BEGIN
PROMPT 48 3 "" PROMPT 48 3 ""
FLAGS "H" FLAGS "H"
COPYUSE FLD_DITTE_CODFR COPYUSE FLD_DITTE_CODFR
INPUT CODDITTA FLD_DITTE_CODFR INPUT CODDITTA FLD_DITTE_CODFR
INPUT RAGSOC FLD_ANF_RAGSOCFR INPUT RAGSOC FLD_ANF_RAGSOCFR
DISPLAY "Codice" CODDITTA DISPLAY "Codice" CODDITTA
DISPLAY "Persona Rif. " PERRIF DISPLAY "Persona Rif. " PERRIF
DISPLAY "Ragione sociale " RAGSOC DISPLAY "Ragione sociale " RAGSOC
OUTPUT FLD_DITTE_RAGSOCTO RAGSOC OUTPUT FLD_DITTE_RAGSOCTO RAGSOC
OUTPUT FLD_DITTE_CODTO CODDITTA OUTPUT FLD_DITTE_CODTO CODDITTA
HELP "Introdurre codice di fine stampa: vuoto = fine archivio" HELP "Introdurre codice di fine stampa: vuoto = fine archivio"
END END
STRING FLD_DITTE_RAGSOCFR 29 STRING FLD_DITTE_RAGSOCFR 29
BEGIN BEGIN
PROMPT 34 6 "" PROMPT 34 6 ""
FLAGS "H" FLAGS "H"
USE LF_NDITTE KEY 2 USE LF_NDITTE KEY 2
INPUT RAGSOC FLD_DITTE_RAGSOCFR INPUT RAGSOC FLD_DITTE_RAGSOCFR
DISPLAY "Codice" CODDITTA DISPLAY "Codice" CODDITTA
DISPLAY "Persona Rif. " PERRIF DISPLAY "Persona Rif. " PERRIF
DISPLAY "Ragione sociale " RAGSOC DISPLAY "Ragione sociale " RAGSOC
OUTPUT FLD_DITTE_RAGSOCFR RAGSOC OUTPUT FLD_DITTE_RAGSOCFR RAGSOC
OUTPUT FLD_DITTE_CODFR CODDITTA OUTPUT FLD_DITTE_CODFR CODDITTA
HELP "Introdurre ragione soc. di inizio stampa: vuoto = inizio archivio" HELP "Introdurre ragione soc. di inizio stampa: vuoto = inizio archivio"
END END
STRING FLD_DITTE_RAGSOCTO 29 STRING FLD_DITTE_RAGSOCTO 29
BEGIN BEGIN
PROMPT 34 8 "" PROMPT 34 8 ""
FLAGS "H" FLAGS "H"
COPYUSE FLD_DITTE_RAGSOCFR COPYUSE FLD_DITTE_RAGSOCFR
INPUT CODDITTA FLD_DITTE_RAGSOCTO INPUT CODDITTA FLD_DITTE_RAGSOCTO
DISPLAY "Codice" CODDITTA DISPLAY "Codice" CODDITTA
DISPLAY "Persona Rif. " PERRIF DISPLAY "Persona Rif. " PERRIF
DISPLAY "Ragione sociale " RAGSOC DISPLAY "Ragione sociale " RAGSOC
OUTPUT FLD_DITTE_RAGSOCTO RAGSOC OUTPUT FLD_DITTE_RAGSOCTO RAGSOC
OUTPUT FLD_DITTE_CODTO CODDITTA OUTPUT FLD_DITTE_CODTO CODDITTA
HELP "Introdurre ragione soc. di fine stampa: vuoto = fine archivio" HELP "Introdurre ragione soc. di fine stampa: vuoto = fine archivio"
END END
BOOLEAN CHK_BA6_INCLDI BOOLEAN CHK_BA6_INCLDI
BEGIN BEGIN
PROMPT 4 10 "Includi ditte" PROMPT 4 10 "Includi ditte"
HELP "Selezionare per includere informazioni relative alle ditte" HELP "Selezionare per includere informazioni relative alle ditte"
END END
BOOLEAN CHK_BA6_PRINTONE BOOLEAN CHK_BA6_PRINTONE
BEGIN BEGIN
PROMPT 4 11 "Stampa un solo record" PROMPT 4 11 "Stampa un solo record"
HELP "Selezionare per stampare soltanto il record nel campo DA" HELP "Selezionare per stampare soltanto il record nel campo DA"
END END
BUTTON BUT_BA6_ELENCO 6 BUTTON BUT_BA6_ELENCO 6
BEGIN BEGIN
PROMPT 4 14 "Elenco" PROMPT 4 14 "Elenco"
END END
BUTTON BUT_BA6_SCHEDE 6 BUTTON BUT_BA6_SCHEDE 6
BEGIN BEGIN
PROMPT 15 14 "Schede" PROMPT 15 14 "Schede"
END END
BUTTON BUT_BA6_RUBRICHE 8 BUTTON BUT_BA6_RUBRICHE 8
BEGIN BEGIN
PROMPT 26 14 "Rubriche" PROMPT 26 14 "Rubriche"
END END
BUTTON BUT_BA6_ETICHETTE 9 BUTTON BUT_BA6_ETICHETTE 9
BEGIN BEGIN
PROMPT 37 14 "Etichette" PROMPT 37 14 "Etichette"
END END
BUTTON DLG_CANCEL BUTTON DLG_CANCEL
BEGIN BEGIN
PROMPT 53 14 "" PROMPT 53 14 ""
END END
ENDPAGE ENDPAGE
ENDMASK ENDMASK

2
ba/ba6000b.uml
View File

@ -1,4 +1,4 @@
#include "ba6000b.h" #include "ba6100b.h"
PAGE "Impostazione Etichette" -1 -1 57 15 PAGE "Impostazione Etichette" -1 -1 57 15
TEXT DLG_NULL TEXT DLG_NULL