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

ba110?.cpp Massimizzata finestra browse

Browse Source 
ba883.cpp    Aggiunto nome della maschera in apertura
batbdel.uml  Corretta ricerca ditta per ragione sociale


git-svn-id: svn://10.65.10.50/trunk@1797 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1995-09-08 10:56:05 +00:00
parent 2b7231bb6c
commit ddad33ee19
4 changed files with 19 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ba/ba1101.cpp
View File

@ -202,7 +202,7 @@ void TRec_sheet::save()
{ {
if ((*_rec == *_rec_old && !_descr) || if ((*_rec == *_rec_old && !_descr) ||
!yesnocancel_box("Devo salvare le modifiche")) return; !yesnocancel_box("Salvare le modifiche")) return;
TSystemisamfile f(_rec->num()); TSystemisamfile f(_rec->num());
if (_descr) if (_descr)

1
ba/ba1102.cpp
View File

@ -101,6 +101,7 @@ bool TEdit_file::browse(int logicnum, const char* name)
KEY ch; KEY ch;
TCursor_sheet sheet(&cursor, trac, name, head, superprassi ? 6 : 0); TCursor_sheet sheet(&cursor, trac, name, head, superprassi ? 6 : 0);
sheet.maximize();
while ((ch = sheet.run()) != K_ESC) while ((ch = sheet.run()) != K_ESC)
{ {

22
ba/ba883.cpp
View File

@ -100,19 +100,19 @@ int main(int argc, char** argv)
{ {
TApplication::check_parameters(argc, argv); TApplication::check_parameters(argc, argv);
TFilename mask;
if (argc > 1) if (argc > 1)
mask = argv[1];
if (argc < 3)
{ {
TTest_application a(mask); if (argc < 3)
a.run(argc, argv, "Test Mask"); {
} TTest_application a(argv[1]);
else TString80 title("Test Mask "); title << argv[1];
{ a.run(argc, argv, title);
TTestrel_application a(mask, argv[2]); }
a.run(argc, argv, "Test Relation Application"); else
{
TTestrel_application a(argv[1], argv[2]);
a.run(argc, argv, "Test Relation Application");
}
} }
return 0; return 0;
} }

5
ba/batbdel.uml
View File

@ -31,12 +31,13 @@ BEGIN
HELP "Ragione sociale ditta a cui si riferisce la delega" HELP "Ragione sociale ditta a cui si riferisce la delega"
KEY 1 KEY 1
USE LF_NDITTE KEY 2 USE LF_NDITTE KEY 2
INPUT CODDITTA F_CODDITTA INPUT RAGSOC F_RAGSOC
DISPLAY "Ditta" CODDITTA
DISPLAY "Ragione sociale@50" RAGSOC DISPLAY "Ragione sociale@50" RAGSOC
DISPLAY "Ditta" CODDITTA
OUTPUT F_CODDITTA CODDITTA OUTPUT F_CODDITTA CODDITTA
OUTPUT F_RAGSOC RAGSOC OUTPUT F_RAGSOC RAGSOC
WARNING "Ditta assente" WARNING "Ditta assente"
CHECKTYPE NORMAL
END END
LIST F_TIPO 20 LIST F_TIPO 20