From 740a06d95738cecce627692d7c84940fe7d5b150 Mon Sep 17 00:00:00 2001 From: alex Date: Wed, 27 May 1998 13:41:48 +0000 Subject: [PATCH] Patch level : Files correlati : Ricompilazione Demo : [ ] Commento : Riportata la versione 98.01.03pl040 sul main trunk git-svn-id: svn://10.65.10.50/trunk@6699 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- ba/ba1600.cpp | 2 + ba/bainst.ini | 237 +- ba/bainst05.cpp | 58 + ba/bainst05.h | 4 + ba/bainst05.uml | 30 + cg/cg1200.cpp | 14 +- cg/cginst.ini | 201 +- cg/f17.dir | 2 +- cg/f17.trr | 8 +- ef/ef0500.cpp | 347 +-- ef/ef0500.h | 3 +- ef/ef0500a.uml | 10 +- ef/efinst.ini | 19 +- ef/riba.ini | 78 +- include/cfven.h | 3 - include/date.cpp | 4 +- include/filetext.cpp | 114 +- include/filetext.h | 4 + include/form.cpp | 21 +- include/form.h | 5 +- include/real.cpp | 37 +- include/relapp.cpp | 32 +- include/relapp.h | 1 + m770/77inst.ini | 23 +- mg/mg3100.cpp | 1 - mg/mg3100a.frm | 586 +++-- mg/mg3100b.frm | 3300 ++++++++++++++-------------- mg/mg3200a.frm | 2981 +++++++++++++------------ mg/mg3200b.frm | 3196 ++++++++++++++------------- mg/mg3300a.frm | 4 +- mg/mg4100.cpp | 10 +- mg/mg4100.frm | 87 +- mg/mg4200.uml | 19 +- mg/mg4200a.frm | 4918 +++++++++++++++++++++--------------------- mg/mg4frm.h | 22 +- mg/mginst.ini | 41 +- mg/mglib03.cpp | 37 +- pr/pr1200a.uml | 1 + pr/prinst.ini | 43 +- sv/svinst.ini | 45 +- ve/bollac.src | 2 + ve/bollaf.src | 2 + ve/ordbon.src | 2 + ve/ve0100.cpp | 13 +- ve/ve0300a.src | 35 +- ve/vearea.men | 10 + ve/veinst.ini | 43 +- ve/velib03.cpp | 15 +- ve/veuml.h | 1 + ve/veuml1.h | 1 + 50 files changed, 8330 insertions(+), 8342 deletions(-) create mode 100755 ba/bainst05.cpp create mode 100755 ba/bainst05.h create mode 100755 ba/bainst05.uml diff --git a/ba/ba1600.cpp b/ba/ba1600.cpp index 49c9745df..34301a3a4 100755 --- a/ba/ba1600.cpp +++ b/ba/ba1600.cpp @@ -969,6 +969,8 @@ bool TFascicolator_mask::import_export_handler(TMask_field& f, KEY k) if (ok) { + path = fs.dir.path; + path.add(fs.name); if (is_export) { TInstall_ini inst; diff --git a/ba/bainst.ini b/ba/bainst.ini index 6bace35a4..72d31cba9 100755 --- a/ba/bainst.ini +++ b/ba/bainst.ini @@ -1,13 +1,18 @@ [ba] -Data = 10-04-1998 +Data = 08-05-1998 Descrizione = Base Dischi = 1 Moduli = -Patch = 304 +Patch = 22 PostProcess = PreProcess = -Prezzo(1) = 500,180 -Versione = 19980102 +Prezzo(1) = 500,175 +Prezzo(2) = 150,60 +Prezzo(3) = 100,40 +Prezzo(5) = 80,30 +Prezzo(9) = 50,20 +Prezzo(30) = 30,10 +Versione = 19980103 [ba0] File(0) = ba00.bmp @@ -18,8 +23,8 @@ File(4) = ba04.bmp File(5) = ba05.bmp File(6) = ba06.bmp File(7) = baprassi.men -Patch = 304 -Versione = 19980102 +Patch = 22 +Versione = 19980103 [ba1] File(8) = ba0.exe @@ -92,115 +97,117 @@ File(74) = bagn002.msk File(75) = bagn004.msk File(76) = bagn005.msk File(77) = bagn006.msk -File(78) = bainst.exe -File(79) = bainst01.msk -File(80) = bainst02.msk -File(81) = bastais.msk -File(82) = bastban.msk -File(83) = bastclr.msk -File(84) = bastcpg.msk -File(85) = bastcrs.msk -File(86) = bastitl.msk -File(87) = bastiva.msk -File(88) = bastlng.msk -File(89) = bastois.msk -File(90) = baststa.msk -File(91) = baststt.msk -File(92) = bastucc.msk -File(93) = bastucs.msk -File(94) = bastues.msk -File(95) = bastuid.msk -File(96) = bastuiv.msk -File(97) = basture.msk -File(98) = bastuue.msk -File(99) = bastval.msk -File(100) = batbais.msk -File(101) = batbais.rpt -File(102) = batbban.msk -File(103) = batbban.rpt -File(104) = batbclr.msk -File(105) = batbclr.rpt -File(106) = batbcpg.msk -File(107) = batbcpg.rpt -File(108) = batbcrs.msk -File(109) = batbcrs.rpt -File(110) = batbitl.msk -File(111) = batbitl.rpt -File(112) = batbiva.msk -File(113) = batbiva.rpt -File(114) = batblng.msk -File(115) = batblng.rpt -File(116) = batbois.msk -File(117) = batbois.rpt -File(118) = batbrgi.msk -File(119) = batbsta.msk -File(120) = batbsta.rpt -File(121) = batbstt.msk -File(122) = batbstt.rpt -File(123) = batbucc.msk -File(124) = batbucc.rpt -File(125) = batbucs.msk -File(126) = batbucs.rpt -File(127) = batbues.msk -File(128) = batbues.rpt -File(129) = batbuid.msk -File(130) = batbuid.rpt -File(131) = batbuiv.msk -File(132) = batbuiv.rpt -File(133) = batbure.msk -File(134) = batbure.rpt -File(135) = batbuue.msk -File(136) = batbuue.rpt -File(137) = batbval.msk -File(138) = batbval.rpt -File(139) = fconv.ini -File(140) = prassi.aut -File(141) = prassi.hlp -File(142) = prassice.men -File(143) = prassid.ini -File(144) = prassis.ini -File(145) = unzip.pif -File(146) = unzip32.exe -File(147) = zip.pif -File(148) = zip386.bat -File(149) = zip386.exe -File(182) = skeylink.dll|X -Patch = 304 -Versione = 19980102 +File(78) = bainst.exe|X +File(79) = bainst01.msk|X +File(80) = bainst02.msk|X +File(81) = bainst03.msk|X +File(82) = bainst04.msk|X +File(83) = bainst05.msk|X +File(84) = bastais.msk +File(85) = bastban.msk +File(86) = bastclr.msk +File(87) = bastcpg.msk +File(88) = bastcrs.msk +File(89) = bastitl.msk +File(90) = bastiva.msk +File(91) = bastlng.msk +File(92) = bastois.msk +File(93) = baststa.msk +File(94) = baststt.msk +File(95) = bastucc.msk +File(96) = bastucs.msk +File(97) = bastues.msk +File(98) = bastuid.msk +File(99) = bastuiv.msk +File(100) = basture.msk +File(101) = bastuue.msk +File(102) = bastval.msk +File(103) = batbais.msk +File(104) = batbais.rpt +File(105) = batbban.msk +File(106) = batbban.rpt +File(107) = batbclr.msk +File(108) = batbclr.rpt +File(109) = batbcpg.msk +File(110) = batbcpg.rpt +File(111) = batbcrs.msk +File(112) = batbcrs.rpt +File(113) = batbitl.msk +File(114) = batbitl.rpt +File(115) = batbiva.msk +File(116) = batbiva.rpt +File(117) = batblng.msk +File(118) = batblng.rpt +File(119) = batbois.msk +File(120) = batbois.rpt +File(121) = batbrgi.msk +File(122) = batbsta.msk +File(123) = batbsta.rpt +File(124) = batbstt.msk +File(125) = batbstt.rpt +File(126) = batbucc.msk +File(127) = batbucc.rpt +File(128) = batbucs.msk +File(129) = batbucs.rpt +File(130) = batbues.msk +File(131) = batbues.rpt +File(132) = batbuid.msk +File(133) = batbuid.rpt +File(134) = batbuiv.msk +File(135) = batbuiv.rpt +File(136) = batbure.msk +File(137) = batbure.rpt +File(138) = batbuue.msk +File(139) = batbuue.rpt +File(140) = batbval.msk +File(141) = batbval.rpt +File(142) = fconv.ini +File(143) = prassi.aut +File(144) = prassi.hlp +File(145) = prassice.men +File(146) = prassid.ini +File(147) = prassis.ini +File(148) = unzip.pif +File(149) = unzip32.exe +File(150) = zip.pif +File(151) = zip386.bat +File(152) = zip386.exe +Patch = 22 +Versione = 19980103 [ba2] -File(150) = recdesc\f10.dir -File(151) = recdesc\f10.trr -File(152) = recdesc\f105.dir -File(153) = recdesc\f105.trr -File(154) = recdesc\f11.dir -File(155) = recdesc\f11.trr -File(156) = recdesc\f12.dir -File(157) = recdesc\f12.trr -File(158) = recdesc\f13.dir -File(159) = recdesc\f13.trr -File(160) = recdesc\f15.dir -File(161) = recdesc\f15.trr -File(162) = recdesc\f2.dir -File(163) = recdesc\f2.trr -File(164) = recdesc\f3.dir -File(165) = recdesc\f3.trr -File(166) = recdesc\f4.dir -File(167) = recdesc\f4.trr -File(168) = recdesc\f5.dir -File(169) = recdesc\f5.trr -File(170) = recdesc\f50.dir -File(171) = recdesc\f50.trr -File(172) = recdesc\f54.dir -File(173) = recdesc\f54.trr -File(174) = recdesc\f6.dir -File(175) = recdesc\f6.trr -File(176) = recdesc\f7.dir -File(177) = recdesc\f7.trr -File(178) = recdesc\f8.dir -File(179) = recdesc\f8.trr -File(180) = recdesc\f9.dir -File(181) = recdesc\f9.trr -Patch = 304 -Versione = 19980102 +File(153) = recdesc\f10.dir +File(154) = recdesc\f10.trr +File(155) = recdesc\f105.dir +File(156) = recdesc\f105.trr +File(157) = recdesc\f11.dir +File(158) = recdesc\f11.trr +File(159) = recdesc\f12.dir +File(160) = recdesc\f12.trr +File(161) = recdesc\f13.dir +File(162) = recdesc\f13.trr +File(163) = recdesc\f15.dir +File(164) = recdesc\f15.trr +File(165) = recdesc\f2.dir +File(166) = recdesc\f2.trr +File(167) = recdesc\f3.dir +File(168) = recdesc\f3.trr +File(169) = recdesc\f4.dir +File(170) = recdesc\f4.trr +File(171) = recdesc\f5.dir +File(172) = recdesc\f5.trr +File(173) = recdesc\f50.dir +File(174) = recdesc\f50.trr +File(175) = recdesc\f54.dir +File(176) = recdesc\f54.trr +File(177) = recdesc\f6.dir +File(178) = recdesc\f6.trr +File(179) = recdesc\f7.dir +File(180) = recdesc\f7.trr +File(181) = recdesc\f8.dir +File(182) = recdesc\f8.trr +File(183) = recdesc\f9.dir +File(184) = recdesc\f9.trr +Patch = 22 +Versione = 19980103 diff --git a/ba/bainst05.cpp b/ba/bainst05.cpp new file mode 100755 index 000000000..3b51316c4 --- /dev/null +++ b/ba/bainst05.cpp @@ -0,0 +1,58 @@ +#include +#include +#include +#include +#include +#include "bainst05.h" + +class TInstall_VE : public TSkeleton_application +{ + TMask * _m; +protected: + virtual void main_loop() ; + virtual bool install_firm() ; // setta i dati ditta + virtual bool install_com() ; // setta i dati comuni + +public: + virtual ~TInstall_VE () {} +}; + +// setta i dati ditta +bool TInstall_VE ::install_firm() +{ + // ciclo su ogni ditta + return TRUE; +} + +bool TInstall_VE ::install_com() +{ + bool ok=TRUE; + if (_m->get_bool(F_LOADTAB)) + { + TExternal_app rice("bacnv 1 4 vetab.txt"); + ok &= (rice.run()==0); + } + return ok; +} + +void TInstall_VE::main_loop() +{ + TConfig ini("install.ini","ve"); + const bool primainst=ini.get("Versione").blank(); + + _m = new TMask ("bainst05.msk"); + if (primainst) + _m->set(F_LOADTAB,"X"); + if (_m->run()!=K_QUIT) + { + install_firm(); + install_com(); + } +} + +int bainst05(int argc, char** argv) +{ + TInstall_VE app; + app.run(argc, argv, "Installazione Vendite"); + return 0; +} \ No newline at end of file diff --git a/ba/bainst05.h b/ba/bainst05.h new file mode 100755 index 000000000..47782dc65 --- /dev/null +++ b/ba/bainst05.h @@ -0,0 +1,4 @@ +#define F_LOADTAB 101 +#define G_PREINST 1 +#define G_POSTINST 2 +#define G_DITTA 3 diff --git a/ba/bainst05.uml b/ba/bainst05.uml new file mode 100755 index 000000000..ac73c6315 --- /dev/null +++ b/ba/bainst05.uml @@ -0,0 +1,30 @@ +#include "bainst05.h" + +TOOLBAR "" 0 20 0 2 +BUTTON DLG_OK 10 2 +BEGIN + PROMPT -11 -1 "~Conferma" + MESSAGE EXIT,K_ENTER + PICTURE BMP_OK +END +ENDPAGE + +PAGE "Installazione VE" -1 -1 78 8 +// GROUP 1 = PRE-INSTALLATION +// GROUP 2 = POST-INSTALLATION + +BOOL F_LOADTAB +BEGIN + PROMPT 2 4 "Carica le tabelle con i tipi documento" +END + +/*GROUPBOX DLG_NULL 60 4 +BEGIN + FLAG "H" + PROMPT 2 4 " Installazione dati ditta" + GROUP G_POSTINST +END +*/ + +ENDPAGE +ENDMASK diff --git a/cg/cg1200.cpp b/cg/cg1200.cpp index c74cc4230..e44506a9c 100755 --- a/cg/cg1200.cpp +++ b/cg/cg1200.cpp @@ -733,9 +733,9 @@ void TPrintclifo_app::set_vendite(int f, int c) set_header(3, (const char *)(TString(132).fill('-'))); set_header(4," Codice Ragione sociale"); set_header(5,"@9gNote Cli/For @25gLegale per contenz. @46gCat.Finanziaria @63gCat.Vendita @76gAss.Fiscale @93gZona @101gAgente @112gProvvigione"); - set_header(6,"@9gCod.Listino @25gCod. Magazzino @46gSpese da Addeb. @63gBolli @76gSpese incasso @93gBolli sup. 50.000"); + set_header(6,"@9gCod.Listino @25gCod. Magazzino @46gSpese da Addeb. @63gBolli @76gSpese incasso" ); set_header(7,"@9gCli/For ass. @25gCod. Meccanografico @46gGest. Contratto @63gRid. Iva @76gUltimo sollecito @93gUltimo estr. conto @112gTitolo onorifico"); - set_header(8,"@9gSconto cliente @25gSconto di riga @46gSconto incond. @63gFatt. Sosp. @76gVs. Lettera Esenzione @112gNs. Lettera Esenz."); + set_header(8,"@9gSconto @46gSconto Cliente@63gFatt. Sosp. @76gVs. Lettera Esenzione @112gNs. Lettera Esenz."); set_header(9,"@9gCod. ABI p.e. @25gCod. CAB p.e. @46gInd. Effetti @63gEmiss. Eff. @76gImporto Minimo @93gEffetti non acc. @112gScadenza effetti"); set_header(10,"@9gInd.Documento @25gInd. Spedizione @46gNote Documento @63gCod.Mezzo @76gPorto @93gVettori"); set_header(11,"@9gRaggr. ordini @25gImporto Minimo @46gImporto Massimo @63gPriorita ev. @76gTipo Evasione"); @@ -750,12 +750,12 @@ void TPrintclifo_app::set_vendite(int f, int c) FLD(LF_CFVEN,CFV_ASSFIS),FLD(LF_CFVEN,CFV_CODZONA), FLD(LF_CFVEN,CFV_CODAG),FLD(LF_CFVEN,CFV_PERCPROVV)); - set_row(3,"@9g@5s @25g@3s @46g@3s @3s @3s @3s @63g@f @76g@n @93g@f", + set_row(3,"@9g@5s @25g@3s @46g@3s @3s @3s @3s @63g@f @76g@n ", FLD(LF_CFVEN,CFV_CODLIST),FLD(LF_CFVEN,CFV_CODMAG), FLD(LF_CFVEN,CFV_CODSP1),FLD(LF_CFVEN,CFV_CODSP2), FLD(LF_CFVEN,CFV_CODSP3),FLD(LF_CFVEN,CFV_CODSP4), FLD(LF_CFVEN,CFV_ADDBOLLI), - FLD(LF_CFVEN,CFV_PERCSPINC),FLD(LF_CFVEN,CFV_ADDBNS1500)); + FLD(LF_CFVEN,CFV_PERCSPINC)); set_row(4,"@9g@pn @25g@s @46g@f @63g@f @76g@d @93g@d @112g@2s", FLD(LF_CFVEN,CFV_CODCFASS,"@@@@@@"), @@ -763,9 +763,9 @@ void TPrintclifo_app::set_vendite(int f, int c) FLD(LF_CFVEN,CFV_IVARID),FLD(LF_CFVEN,CFV_DATAESC), FLD(LF_CFVEN,CFV_DATASOLL),FLD(LF_CFVEN,CFV_TITOLO)); - set_row(5,"@9g@n @25g@15s @46g@2s @63g@f @76g@s del @d @112g@s del @d", - FLD(LF_CFVEN,CFV_SCONTOCL),FLD(LF_CFVEN,CFV_SCONTOR), - FLD(LF_CFVEN,CFV_CODSCINC),FLD(LF_CFVEN,CFV_FATTSOSP), + set_row(5,"@9g@25s @46g@4s @63g@f @76g@s del @d @112g@s del @d", + FLD(LF_CFVEN,CFV_SCONTO), + FLD(LF_CFVEN,CFV_CODSCC),FLD(LF_CFVEN,CFV_FATTSOSP), FLD(LF_CFVEN,CFV_VSNRPROT),FLD(LF_CFVEN,CFV_VSDATAREG), FLD(LF_CFVEN,CFV_NSNPROT),FLD(LF_CFVEN,CFV_NSDATAREG)); diff --git a/cg/cginst.ini b/cg/cginst.ini index 91e57d4b6..6d0fa34e5 100755 --- a/cg/cginst.ini +++ b/cg/cginst.ini @@ -1,23 +1,28 @@ [cg] -Data = 01-04-1998 +Data = 08-05-1998 Descrizione = Contabilita' Generale Dischi = 1 Moduli = ba -Patch = 304 +Patch = 25 PostProcess = bainst -0 CG PreProcess = Prezzo(1) = 1000,350 -Versione = 19980102 +Prezzo(2) = 300,110 +Prezzo(3) = 200,70 +Prezzo(5) = 150,60 +Prezzo(9) = 100,40 +Prezzo(30) = 50,20 +Versione = 19980103 [cg0] File(0) = cg00.bmp File(1) = cgarea.men -Patch = 304 -Versione = 19980102 +Patch = 25 +Versione = 19980103 [cg1] -File(2) = ab0.exe|X -File(3) = ab0200a.msk|X +File(2) = ab0.exe +File(3) = ab0200a.msk File(4) = bastcfi.msk File(5) = bastdpn.msk File(6) = bastivd.msk @@ -34,14 +39,14 @@ File(16) = batbivd.msk File(17) = batbivd.rpt File(18) = batblbu.msk File(19) = batblia.msk -File(20) = batbpdb.msk|X +File(20) = batbpdb.msk File(21) = batbtra.msk File(22) = batbver.msk File(23) = batbver.rpt File(24) = cb0000.exe File(25) = cg01.bmp File(26) = cg0500a.msk -File(27) = cg2.exe +File(27) = cg2.exe|X File(28) = cg2100a.msk File(29) = cg2100b.msk File(30) = cg2100c.msk @@ -131,8 +136,8 @@ File(113) = dummy.mdb File(114) = pec.frm File(115) = trrice.exe File(116) = vcopia.exe -Patch = 304 -Versione = 19980102 +Patch = 25 +Versione = 19980103 [cg2] File(117) = recdesc\f103.dir @@ -159,93 +164,93 @@ File(137) = recdesc\f29.dir File(138) = recdesc\f29.trr File(139) = recdesc\f30.dir File(140) = recdesc\f30.trr -File(141) = recdesc\f78.dir|X -File(142) = recdesc\f78.trr|X -Patch = 304 -Versione = 19980102 +Patch = 25 +Versione = 19980103 [cg9] -File(143) = bastcam.msk -File(144) = bastcco.msk -File(145) = bastcve.msk -File(146) = bastesc.msk -File(147) = bastleg.msk -File(148) = bastmag.msk -File(149) = bastmsp.msk -File(150) = bastndo.msk -File(151) = bastnot.msk -File(152) = bastpor.msk -File(153) = bastreg.msk -File(154) = bastscc.msk -File(155) = bastspp.msk -File(156) = basttit.msk -File(157) = basttri.msk -File(158) = bastums.msk -File(159) = bastvet.msk -File(160) = bastzon.msk -File(161) = batbcam.msk -File(162) = batbcam.rpt -File(163) = batbcco.msk -File(164) = batbcco.rpt -File(165) = batbcve.msk -File(166) = batbcve.rpt -File(167) = batbesc.msk -File(168) = batbesc.rpt -File(169) = batbleg.msk -File(170) = batbleg.rpt -File(171) = batbmsp.msk -File(172) = batbmsp.rpt -File(173) = batbndo.msk -File(174) = batbndo.rpt -File(175) = batbnot.msk -File(176) = batbnot.rpt -File(177) = batbpor.msk -File(178) = batbpor.rpt -File(179) = batbreg.msk -File(180) = batbreg.rpt -File(181) = batbscc.msk -File(182) = batbscc.rpt -File(183) = batbspp.msk -File(184) = batbspp.rpt -File(185) = batbtit.msk -File(186) = batbtit.rpt -File(187) = batbtri.msk -File(188) = batbtri.rpt -File(189) = batbums.msk -File(190) = batbums.rpt -File(191) = batbvet.msk -File(192) = batbvet.rpt -File(193) = batbzon.msk -File(194) = batbzon.rpt -File(195) = cg0.exe -File(196) = cg0100a.msk -File(197) = cg0200a.msk|X -File(198) = cg0200b.msk -File(199) = cg0300a.msk -File(200) = cg0400a.msk -File(201) = cg0400b.msk -File(202) = cg1.exe -File(203) = cg1100a.msk -File(204) = cg1200a.msk -File(205) = cg1200b.msk -File(206) = cg1300a.msk -File(207) = cg1300b.msk -File(208) = cg1300c.msk -File(209) = cg1300d.msk -File(210) = cg1400a.msk -File(211) = cg1500a.msk -File(212) = cg1600a.msk -File(213) = cg1700a.msk -File(214) = recdesc\f16.dir -File(215) = recdesc\f16.trr -File(216) = recdesc\f17.dir -File(217) = recdesc\f17.trr -File(218) = recdesc\f18.dir -File(219) = recdesc\f18.trr -File(220) = recdesc\f19.dir -File(221) = recdesc\f19.trr -File(222) = recdesc\f20.dir|X -File(223) = recdesc\f20.trr|X -Patch = 304 -Versione = 19980102 +File(141) = bastcam.msk +File(142) = bastcco.msk +File(143) = bastcve.msk +File(144) = bastesc.msk +File(145) = bastleg.msk +File(146) = bastmag.msk +File(147) = bastmsp.msk +File(148) = bastndo.msk +File(149) = bastnot.msk +File(150) = bastpor.msk +File(151) = bastreg.msk +File(152) = bastscc.msk +File(153) = bastspp.msk +File(154) = basttit.msk +File(155) = basttri.msk +File(156) = bastums.msk +File(157) = bastvet.msk +File(158) = bastzon.msk +File(159) = batbcam.msk +File(160) = batbcam.rpt +File(161) = batbcco.msk +File(162) = batbcco.rpt +File(163) = batbcve.msk +File(164) = batbcve.rpt +File(165) = batbesc.msk +File(166) = batbesc.rpt +File(167) = batbleg.msk +File(168) = batbleg.rpt +File(169) = batbmsp.msk +File(170) = batbmsp.rpt +File(171) = batbndo.msk +File(172) = batbndo.rpt +File(173) = batbnot.msk +File(174) = batbnot.rpt +File(175) = batbpor.msk +File(176) = batbpor.rpt +File(177) = batbreg.msk +File(178) = batbreg.rpt +File(179) = batbscc.msk +File(180) = batbscc.rpt +File(181) = batbspp.msk +File(182) = batbspp.rpt +File(183) = batbtit.msk +File(184) = batbtit.rpt +File(185) = batbtri.msk +File(186) = batbtri.rpt +File(187) = batbums.msk +File(188) = batbums.rpt +File(189) = batbvet.msk +File(190) = batbvet.rpt +File(191) = batbzon.msk +File(192) = batbzon.rpt +File(193) = cg0.exe|X +File(194) = cg0100a.msk +File(195) = cg0200a.msk +File(196) = cg0200b.msk +File(197) = cg0300a.msk +File(198) = cg0400a.msk +File(199) = cg0400b.msk +File(200) = cg1.exe +File(201) = cg1100a.msk +File(202) = cg1200a.msk +File(203) = cg1200b.msk +File(204) = cg1300a.msk +File(205) = cg1300b.msk +File(206) = cg1300c.msk +File(207) = cg1300d.msk +File(208) = cg1400a.msk +File(209) = cg1500a.msk +File(210) = cg1600a.msk +File(211) = cg1700a.msk +File(212) = recdesc\f16.dir +File(213) = recdesc\f16.trr +File(214) = recdesc\f17.dir +File(215) = recdesc\f17.trr +File(216) = recdesc\f18.dir +File(217) = recdesc\f18.trr +File(218) = recdesc\f19.dir +File(219) = recdesc\f19.trr +File(220) = recdesc\f20.dir +File(221) = recdesc\f20.trr +File(222) = recdesc\f78.dir +File(223) = recdesc\f78.trr +Patch = 25 +Versione = 19980103 diff --git a/cg/f17.dir b/cg/f17.dir index 6719d5c5c..d8b92e62f 100755 --- a/cg/f17.dir +++ b/cg/f17.dir @@ -1,3 +1,3 @@ 17 0 -$cfven|0|0|303|0|Clienti/Fornitori per vendite|NCF|| +$cfven|51|51|323|0|Clienti/Fornitori per vendite||| diff --git a/cg/f17.trr b/cg/f17.trr index 45db8c4aa..21bd44a4f 100755 --- a/cg/f17.trr +++ b/cg/f17.trr @@ -46,10 +46,10 @@ CODLIST|1|5|0|Listino CODSCC|1|2|0|Codice sconto CODMAG|1|3|0|Magazzino CODDEP|1|2|0|Deposito -CODSP1|1|3|0|Spese da addebitare 1 -CODSP2|1|3|0|Spese da addebitare 2 -CODSP3|1|3|0|Spese da addebitare 3 -CODSP4|1|3|0|Spese da addebitare 4 +CODSP1|1|8|0|Spese da addebitare 1 +CODSP2|1|8|0|Spese da addebitare 2 +CODSP3|1|8|0|Spese da addebitare 3 +CODSP4|1|8|0|Spese da addebitare 4 PROFSOLL|1|5|0|Profilo sollecito ??? MAXSOLL|2|2|0|Massimo sollecito ??? DATAESC|5|8|0|Data estratto conto ??? diff --git a/ef/ef0500.cpp b/ef/ef0500.cpp index 0a18d97b0..e6c252dcf 100755 --- a/ef/ef0500.cpp +++ b/ef/ef0500.cpp @@ -18,6 +18,8 @@ class TRiba_form; class TDistinta_form; class TRiba_file; enum fo{kb360 = 1, kb720 = 2, kb1200 = 3, kb1440 = 4}; + +#define RIBAFILENAME "ribael.dat" /////////////////////////////////////////////////////////////////////// // Classe per l'emissione di effetti e distinte su carta o su floppy // /////////////////////////////////////////////////////////////////////// @@ -127,7 +129,8 @@ bool TEmissione::create() _rel->add("%BAN", "CODTAB=CODABI+CODCAB", 1, 0, 402); _rel->add(LF_COMUNI, "STATO=STATOCF|COM=COMCF",1,LF_CLIFO); _cur = NULL; - _trasfile = new TRiba_file("ribael.dat", "riba.ini"); + _msk->set(F_NOMEFILE,RIBAFILENAME); + _trasfile = new TRiba_file(RIBAFILENAME, "riba.ini"); _trasfile->set_ditta(get_firm()); _msk->set_handler(DLG_CANCEL, annulla_handler); dispatch_e_menu(BAR_ITEM(1)); @@ -269,9 +272,9 @@ void TEmissione::inizializza_cur() //inizializza il file di testo su cui emettere gli effetti void TEmissione::inizializza_file() { - TString unita = _msk->get(F_UNITA); - unita << ":\\" << _trasfile->name(); - TFilename file(unita); + TString fileriba = _msk->get(F_UNITA); + fileriba << ":\\" << _msk->get(F_NOMEFILE); + TFilename file(fileriba); _trasfile->open(file,'w'); _trasfile->set_tot_importi(0.0); _foutput = (fo)_msk->get_int(F_FOR_OUT); @@ -526,9 +529,10 @@ bool TRiba_form::validate(TForm_item &cf, TToken_string &s) cf.set(valore); cf.put_paragraph(valore); cf.set(""); - } - if (code == "_BANCAP") - { + } + else + if (code == "_BANCAP") + { // gestione dei campi relativi alla banca di presentazione dell'effetto // sintassi: _BANCAP TCursor* cur = cursor(); @@ -542,8 +546,9 @@ bool TRiba_form::validate(TForm_item &cf, TToken_string &s) cf.set(valore); cf.put_paragraph(valore); cf.set(""); - } - if (code == "_FATT") + } + else + if (code == "_FATT") { // gestione dei campi relativi alle/a fatture/a a cui si riferisce un effetto // sintassi: _FATT, @@ -784,153 +789,157 @@ bool TDistinta_form::validate(TForm_item &cf, TToken_string &s) // gestione dei messaggi estesi nei campi void TRiba_file:: validate(TCursor& cur,TRecord_text &rec, TToken_string &s, TString& str) { - const TString code(s.get(0)); - TString valore; - if (code == "_FISSO") + const TString code(s.get(0)); + TString valore; + if (code == "_FISSO") { - // gestione dei campi fissi per i record delle riba - // sintassi: _FISSO,! - // dove: è la stringa fissa da emettere + // gestione dei campi fissi per i record delle riba + // sintassi: _FISSO,! + // dove: è la stringa fissa da emettere TString in(s.get()); - if (in[0]=='!') - { - in.ltrim(1); - in.trim(); - valore = in; - } - } - if (code == "_DATA") + CHECK(in[0]=='!',"Macro _FISSO senza carattere '!'"); + in.ltrim(1); + in.trim(); + valore = in; + } + else + if (code == "_DATA") { - // gestione della data di emissione delle riba - // sintassi: _DATA + // gestione della data di emissione delle riba + // sintassi: _DATA const TDate data_emis = app().msk().get_date(F_DATAEMIS); valore = data_emis.string(); } - if (code == "_NRIBA") + else + if (code == "_NRIBA") { - // gestione dei campi relativi al flusso di effetti (riba) - // sintassi: _NRIBA, - // dove: è uno delle macro seguenti: - // "!NUM" numero progressivo riba all'interno del flusso - // "!TOT" numero di effetti nel flusso - // "!NREC" numero di records nel flusso - int items = (int)cur.items(); + // gestione dei campi relativi al flusso di effetti (riba) + // sintassi: _NRIBA, + // dove: è uno delle macro seguenti: + // "!NUM" numero progressivo riba all'interno del flusso + // "!TOT" numero di effetti nel flusso + // "!NREC" numero di records nel flusso + int items = (int)cur.items(); TString in(s.get()); - if (in[0]=='!') + CHECK(in[0]=='!',"Macro _NRIBA senza carattere '!'"); + in.ltrim(1); + if (in=="NUM") { - in.ltrim(1); - if (in=="NUM") - { - valore.cut(0); - valore << cur.pos() + 1; - } - if (in=="TOT") - { - valore.cut(0); - valore << items; - } - if (in=="NREC") - { - valore.cut(0); - int rec = items * 7 + 2; - valore << rec; - } - } + valore.cut(0); + valore << cur.pos() + 1; + } + else if (in=="TOT") + { + valore.cut(0); + valore << items; + } + else if (in=="NREC") + { + valore.cut(0); + int rec = items * 7 + 2; + valore << rec; + } + else + CHECKS (TRUE,"Sotto-Macro _NRIBA non definita",(const char *)in); } - if (code == "_DITTA") - { + else + if (code == "_DITTA") + { // gestione di campi della ditta corrente - // sintassi: _DITTA,, - // dove: è uno delle macro seguenti: - // "!RAGSOC" ragione sociale - // dove: è uno delle opzioni seguenti: - // "0" la ragione sociale andrà ad occupare un unico campo - // "1" la ragione sociale andrà ad occupare più campi, primo segmento - // "2" la ragione sociale andrà ad occupare più campi, secondo segmento - // "3" la ragione sociale andrà ad occupare più campi, terzo segmento - // "4" la ragione sociale andrà ad occupare più campi, quarto segmento - TLocalisamfile ditte(LF_NDITTE); + // sintassi: _DITTA,, + // dove: è uno delle macro seguenti: + // "!RAGSOC" ragione sociale + // dove: è uno delle opzioni seguenti: + // "0" la ragione sociale andrà ad occupare un unico campo + // "1" la ragione sociale andrà ad occupare più campi, primo segmento + // "2" la ragione sociale andrà ad occupare più campi, secondo segmento + // "3" la ragione sociale andrà ad occupare più campi, terzo segmento + // "4" la ragione sociale andrà ad occupare più campi, quarto segmento + TLocalisamfile ditte(LF_NDITTE); ditte.put("CODDITTA",ditta()); ditte.read(); TString in(s.get()); - if (in[0]=='!') + CHECK(in[0]=='!',"Macro _DITTA senza carattere '!'"); + in.ltrim(1); + if (in=="RAGSOC") { - in.ltrim(1); - if (in=="RAGSOC") + const TString ragsoc = ditte.get("RAGSOC"); + in = s.get(); + if (in == "0") { - const TString ragsoc = ditte.get("RAGSOC"); - in = s.get(); - if (in == "0") - { - valore.cut(0); - valore = ragsoc.left(30); - valore.trim(); - TString str = ragsoc.right(20); - str.trim(); - valore << " " << str; - } - else - { - TParagraph_string string(ragsoc,24); - string.restart(); - int indice = atoi(in); - if (in == "1") valore = string.get(indice-1); - if (in == "2") valore = string.get(indice-1); - if (in == "3") valore = string.get(indice-1); - if (in == "4") valore = string.get(indice-1); - } - } + valore.cut(0); + valore = ragsoc.left(30); + valore.trim(); + TString str = ragsoc.right(20); + str.trim(); + valore << " " << str; + } + else + { + TParagraph_string string(ragsoc,24); + string.restart(); + int indice = atoi(in); + if (in == "1") valore = string.get(indice-1); + if (in == "2") valore = string.get(indice-1); + if (in == "3") valore = string.get(indice-1); + if (in == "4") valore = string.get(indice-1); + } } + else + CHECKS (TRUE,"Sotto-Macro _DITTA non definita",(const char *)in); } - if (code == "_DEBITORE") - { - // gestione di campi della ditta corrente - // sintassi: _DEBITORE,, - // dove: è uno delle macro seguenti: - // "!RAGSOC" ragione sociale - // "!INDIRIZZO" indirizzo - // "!PIAZZA" comune + sigla provincia - // dove: è uno delle opzioni seguenti: - // "1" la ragione sociale andrà ad occupare più campi, primo segmento - // "2" la ragione sociale andrà ad occupare più campi, secondo segmento + else if (code == "_DEBITORE") + { + // gestione di campi della ditta corrente + // sintassi: _DEBITORE,, + // dove: è uno delle macro seguenti: + // "!RAGSOC" ragione sociale + // "!INDIRIZZO" indirizzo + // "!PIAZZA" comune + sigla provincia + // dove: è uno delle opzioni seguenti: + // "1" la ragione sociale andrà ad occupare più campi, primo segmento + // "2" la ragione sociale andrà ad occupare più campi, secondo segmento TRectype& clifo = cur.curr(LF_CLIFO); TRectype& comuni = cur.curr(LF_COMUNI); TString in(s.get()); - if (in[0]=='!') + CHECK(in[0]=='!',"Macro _DEBITORE senza carattere '!'"); + in.ltrim(1); + if (in=="RAGSOC") { - in.ltrim(1); - if (in=="RAGSOC") - { - TString ragsoc = clifo.get("RAGSOC"); - in = s.get(); - TParagraph_string string(ragsoc,30); - string.restart(); - int indice = atoi(in); - if (in == "1") valore = string.get(indice-1); - if (in == "2") valore = string.get(indice-1); - } - if (in=="INDIRIZZO") - { - valore.cut(0); - valore << clifo.get("INDCF"); - valore.trim(); - valore << " " << clifo.get_int("CIVCF"); - valore.trim(); - valore << " " << clifo.get("LOCALITACF"); - valore.trim(); - } - if (in=="PIAZZA") - { - valore.cut(0); - valore << comuni.get("DENCOM"); - valore.trim(); - valore << " " << comuni.get("PROVCOM"); - valore.trim(); - } - } - } - if (code == "_BANCA") - { + TString ragsoc = clifo.get("RAGSOC"); + in = s.get(); + TParagraph_string string(ragsoc,30); + string.restart(); + int indice = atoi(in); + if (in == "1") valore = string.get(indice-1); + if (in == "2") valore = string.get(indice-1); + } + else if (in=="INDIRIZZO") + { + valore.cut(0); + valore << clifo.get("INDCF"); + valore.trim(); + valore << " " << clifo.get_int("CIVCF"); + valore.trim(); + valore << " " << clifo.get("LOCALITACF"); + valore.trim(); + } + else if (in=="COMUNE") + { + valore.cut(0); + valore << comuni.get("DENCOM"); + valore.trim(); + } + else if (in=="PROV") + { + valore = comuni.get("PROVCOM"); + valore.trim(); + } + else + CHECKS (TRUE,"Sotto-Macro _DEBITORE non definita",(const char *)in); + } + else if (code == "_BANCA") + { // gestione dei campi relativi alla banca d'appoggio dell'effetto // sintassi: _BANCA TRectype & ban = cur.curr(-401); @@ -940,15 +949,15 @@ void TRiba_file:: validate(TCursor& cur,TRecord_text &rec, TToken_string &s, TSt ban = cur.curr(-402); valore << " " << ban.get("S0"); valore.trim(); - } - if (code == "_FATT") - { - // gestione dei campi relativi alle/a fatture/a a cui si riferisce un effetto - // sintassi: _FATT, - // dove: è uno delle opzioni seguenti: - // "1" i dati della fattura andranno ad occupare più campi, primo segmento - // "2" i dati della fattura andranno ad occupare più campi, secondo segmento - TLocalisamfile &eff = cur.file(); + } + else if (code == "_FATT") + { + // gestione dei campi relativi alle/a fatture/a a cui si riferisce un effetto + // sintassi: _FATT, + // dove: è uno delle opzioni seguenti: + // "1" i dati della fattura andranno ad occupare più campi, primo segmento + // "2" i dati della fattura andranno ad occupare più campi, secondo segmento + TLocalisamfile &eff = cur.file(); TEffetto effetto = eff.curr(); long num = effetto.numero(); TToken_string* dati = effetto.dati_fatt(num); @@ -977,35 +986,37 @@ void TRiba_file:: validate(TCursor& cur,TRecord_text &rec, TToken_string &s, TSt } } } - if (code == "_IMPORTO") + else + if (code == "_IMPORTO") { - // gestione di campi degli importi degli effetti nel flusso - // sintassi: _IMPORTO, - // dove: è uno delle macro seguenti: - // "!ADD" aggiunge l'importo dell'effetto corrente al totale - // "!TOT" emette il totale + // gestione di campi degli importi degli effetti nel flusso + // sintassi: _IMPORTO, + // dove: è uno delle macro seguenti: + // "!ADD" aggiunge l'importo dell'effetto corrente al totale + // "!TOT" emette il totale TString in(s.get()); - if (in[0]=='!') + CHECK(in[0]=='!',"Macro _IMPORTO senza carattere '!'"); + in.ltrim(1); + if (in=="ADD") { - in.ltrim(1); - if (in=="ADD") - { - real importo(str); - add_tot_importi(importo); - valore.cut(0); - valore << importo.string(13,1); - } - if (in=="TOT") - { - valore.cut(0); - real importo = tot_importi(); - valore << importo.string("############@,@"); - set_tot_importi(0.0); - } + real importo(str); + add_tot_importi(importo); + valore.cut(0); + valore << importo.string(13,1); } - } - str = valore; -} + else if (in=="TOT") + { + valore.cut(0); + real importo = tot_importi(); + valore << importo.string("############@,@"); + set_tot_importi(0.0); + } + else + CHECKS (TRUE,"Sotto-Macro _IMPORTO non definita",(const char *)in); + } else + CHECKS (TRUE,"Macro non definita",(const char *)code); + str = valore; +} int ef0500(int argc, char* argv[]) { diff --git a/ef/ef0500.h b/ef/ef0500.h index bab13d645..d9fb79f9c 100755 --- a/ef/ef0500.h +++ b/ef/ef0500.h @@ -16,5 +16,6 @@ #define F_TIPOST 110 #define F_DATAEMIS 111 #define F_RIST 112 +#define F_NOMEFILE 113 -#endif //__EF0500_H \ No newline at end of file +#endif //__EF0500_H diff --git a/ef/ef0500a.uml b/ef/ef0500a.uml index 4b9888b3f..00969765b 100755 --- a/ef/ef0500a.uml +++ b/ef/ef0500a.uml @@ -8,10 +8,16 @@ BEGIN PROMPT 1 0 " " ITEM "1|Emissione RI.BA. su floppy" MESSAGE DISABLE,2@|DISABLE,4@|DISABLE,5@ - MESSAGE ENABLE,1@ + MESSAGE ENABLE,1@|SHOW,F_NOMEFILE ITEM "2|Emissione RI.BA. su moduli cartacei" MESSAGE DISABLE,1@ - MESSAGE ENABLE,2@ + MESSAGE ENABLE,2@|HIDE,F_NOMEFILE +END + +STRING F_NOMEFILE 12 +BEGIN + PROMPT 50 1 "Nome file:" + FLAGS "D" END GROUPBOX DLG_NULL 76 3 diff --git a/ef/efinst.ini b/ef/efinst.ini index b77ed5df9..965c58651 100755 --- a/ef/efinst.ini +++ b/ef/efinst.ini @@ -1,13 +1,18 @@ [ef] -Data = 01-04-1998 +Data = 08-05-1998 Descrizione = Effetti Dischi = 1 Moduli = ba,ve0,ve9,cg9 -Patch = 304 +Patch = 25 PostProcess = PreProcess = Prezzo(1) = 300,100 -Versione = 19980102 +Prezzo(2) = 90,40 +Prezzo(3) = 60,20 +Prezzo(5) = 50,20 +Prezzo(9) = 30,10 +Prezzo(30) = 20,10 +Versione = 19980103 [ef1] File(0) = dse.frm @@ -26,8 +31,8 @@ File(12) = efprassi.hlp File(13) = efprassi.men File(14) = rb.frm File(15) = riba.ini -Patch = 304 -Versione = 19980102 +Patch = 25 +Versione = 19980103 [ef2] File(16) = recdesc\f14.dir @@ -36,6 +41,6 @@ File(18) = recdesc\f31.dir File(19) = recdesc\f31.trr File(20) = recdesc\f32.dir File(21) = recdesc\f32.trr -Patch = 304 -Versione = 19980102 +Patch = 25 +Versione = 19980103 diff --git a/ef/riba.ini b/ef/riba.ini index 1074baef7..937a99718 100755 --- a/ef/riba.ini +++ b/ef/riba.ini @@ -6,33 +6,44 @@ RECORDSIZE = 120 FIELDSEP = [TYPE FISSO] -FILLER = ' ' +ALIGN = +DATA = DECIMAL = 0 +FILLER = ' ' LENGTH = 0 +PICTURE = [TYPE IMPORTO] -PICTURE = ##########@,@ -FILLER = 0 -DECIMAL = 1 ALIGN = R +DATA = N +DECIMAL = 1 +FILLER = 0 LENGTH = 13 +PICTURE = @@@@@@@@@@@@@ [TYPE DATA] -PICTURE = ggmmaa +ALIGN = +DATA = D DECIMAL = 0 +FILLER = LENGTH = 6 +PICTURE = 1442 [TYPE NUMERO] -FILLER = '0' -DECIMAL = 0 ALIGN = R +DATA = N +DECIMAL = 0 +FILLER = '0' LENGTH = 0 +PICTURE = [TYPE STRINGA] -FILLER = ' ' -DECIMAL = 0 ALIGN = L +DATA = S +DECIMAL = 0 +FILLER = ' ' LENGTH = 0 +PICTURE = [HEADER RB] NAME(0)=CAMPO BLANK @@ -56,7 +67,7 @@ POSITION(3)=8 LENGTH(3)=5 NAME(4)=DATA EMISSIONE -TYPE(4)=DATA +TYPE(4)=DATA FIELD(4)=31->DATAEMISS POSITION(4)=13 LENGTH(4)=6 @@ -74,7 +85,7 @@ POSITION(6)=45 LENGTH(6)=75 [RECORD 14] -NAME(0) = CAMPO BLANK +NAME(0) = CAMPO BLANK TYPE(0) = FISSO POSITION(0) = 0 LENGTH(0) = 1 @@ -93,7 +104,7 @@ MESSAGE(2) = _NRIBA,!NUM NAME(3) = CAMPO ALTERABILE TYPE(3) = FISSO POSITION(3) = 10 -LENGTH(3) = 6 + LENGTH(3) = 6 NAME(4) = CAMPO BLANK TYPE(4) = FISSO @@ -109,7 +120,7 @@ LENGTH(5) = 6 NAME(6) = CAUSALE POSITION(6) = 28 LENGTH(6) = 5 -MESSAGE(6) = _FISSO,!300000 +MESSAGE(6) = _FISSO,!30000 NAME(7) = IMPORTO TYPE(7) = IMPORTO @@ -179,7 +190,7 @@ TYPE(0)=FISSO POSITION(0)=0 LENGTH(0)=1 -NAME(1)=TIPO RECORD +NAME(1)=TIPO RECORD POSITION(1)=1 LENGTH(1)=2 MESSAGE(1)=_FISSO,!20 @@ -282,17 +293,23 @@ FIELD(4)=20->CAPCF POSITION(4)=40 LENGTH(4)=5 -NAME(5)=INDIRIZZO DEBITORE: COMUNE E SIGLA PROVINCIA +NAME(5)=INDIRIZZO DEBITORE: COMUNE TYPE(5)=STRINGA POSITION(5)=45 -LENGTH(5)=25 -MESSAGE(5) = _DEBITORE,!PIAZZA +LENGTH(5)=23 +MESSAGE(5) = _DEBITORE,!COMUNE -NAME(6)=BANCA DOMICILIATARIA IN CHIARO (DENOMINAZIONE BANCA E SPORTELLO) +NAME(6)=INDIRIZZO DEBITORE: SIGLA PROVINCIA TYPE(6)=STRINGA -POSITION(6)=70 -LENGTH(6)=50 -MESSAGE(6) = _BANCA +POSITION(6)=68 +LENGTH(6)=2 +MESSAGE(6) = _DEBITORE,!PROV + +NAME(7)=BANCA DOMICILIATARIA IN CHIARO (DENOMINAZIONE BANCA E SPORTELLO) +TYPE(7)=STRINGA +POSITION(7)=70 +LENGTH(7)=50 +MESSAGE(7) = _BANCA [RECORD 50] NAME(0)=CAMPO BLANK @@ -321,7 +338,7 @@ NAME(4)=RIFERIMENTI AL DEBITO SEGMENTO 2 TYPE(4)=STRINGA POSITION(4)=50 LENGTH(4)=40 -MESSAGE(4) = _FATT,!2 +MESSAGE(4) = _FISSO,! NAME(5)=CAMPO BLANK TYPE(5)=FISSO @@ -361,21 +378,22 @@ NAME(5)=PROVINCIA INTENDENZA DI FINANZA TYPE(5)=FISSO POSITION(5)=40 LENGTH(5)=15 +MESSAGE(5)=_FISSO,! NAME(6)=N. AUTORIZZAZIONE POSITION(6)=55 LENGTH(6)=10 -MESSAGE(6)=_FISSO,!0000000000 +MESSAGE(6)=_FISSO,! NAME(7)=DATA AUTORIZZAZIONE TYPE(7)=FISSO -POSITION(7)=66 +POSITION(7)=65 LENGTH(7)=6 -MESSAGE(7)=_FISSO,!000000 +MESSAGE(7)=_FISSO,! NAME(8)=CAMPO BLANK TYPE(8)=FISSO -POSITION(8)=72 +POSITION(8)=71 LENGTH(8)=48 [RECORD 70] @@ -422,12 +440,12 @@ POSITION(3)=8 LENGTH(3)=5 NAME(4)=DATA EMISSIONE -TYPE(4)=DATA +TYPE(4)=DATA FIELD(4)=31->DATAEMISS POSITION(4)=13 LENGTH(4)=6 -MESSAGE(4)=_DATA - +MESSAGE(4)=_DATA + NAME(5)=RAGIONE SOCIALE MITTENTE TYPE(5)=STRINGA POSITION(5)=19 @@ -456,7 +474,7 @@ NAME(9)=NUMERO RECORD TYPE(9)= NUMERO POSITION(9)=82 LENGTH(9)=7 -MESSAGE(9) = _NRIBA,!REC +MESSAGE(9) = _NRIBA,!NREC NAME(10)=CAMPO ALTERABILE TYPE(10)=FISSO diff --git a/include/cfven.h b/include/cfven.h index da2dc54c3..a76841fe8 100755 --- a/include/cfven.h +++ b/include/cfven.h @@ -45,8 +45,6 @@ #define CFV_CATVEN "CATVEN" #define CFV_GESTCONTR "GESTCONTR" #define CFV_CODLIST "CODLIST" -#define CFV_CODSCINC "CODSCINC" -#define CFV_SCONTOCL "SCONTOCL" #define CFV_CODMAG "CODMAG" #define CFV_CODDEP "CODDEP" #define CFV_CODSP1 "CODSP1" @@ -57,7 +55,6 @@ #define CFV_MAXSOLL "MAXSOLL" #define CFV_DATAESC "DATAESC" #define CFV_DATASOLL "DATASOLL" -#define CFV_SCONTOR "SCONTOR" #define CFV_TITOLO "TITOLO" #define CFV_RAGGOR "RAGGOR" #define CFV_MINORD "MINORD" diff --git a/include/date.cpp b/include/date.cpp index a3068a5ef..2aeca6385 100755 --- a/include/date.cpp +++ b/include/date.cpp @@ -583,10 +583,10 @@ void TFormatted_date::set_format( // 4° carattere - Formato ANNO. Puo' assumere i seguenti valori: // 2 = breve (es. 95) // 4 = lungo (es. 1995) - // 5° carattere - Carattere SEPARATORE. Puo' essere un carattere o lo spazio + // 5° carattere - Carattere SEPARATORE. Puo' essere un carattere o lo spazio o essere omesso (sep= char nullo) { - CHECKS(memchr(f, 0, 5) == NULL, "Bad date format ", f); + CHECKS(memchr(f, 0, 4) == NULL, "Bad date format (you must define all the first 4 chars) :", f); memcpy(_format, f, 5); } diff --git a/include/filetext.cpp b/include/filetext.cpp index 97d79c11c..a1ff86215 100755 --- a/include/filetext.cpp +++ b/include/filetext.cpp @@ -20,6 +20,7 @@ const TTracciato_campo& TTracciato_campo::operator =(const TTracciato_campo& tc) void TTracciato_campo::copy(const TTracciato_campo& tc) { set_name(tc._name); + set_datatype(tc._datatype); set_type(tc._type); set_field(tc._field); set_ftype(tc._ftype); @@ -196,6 +197,11 @@ void TFile_text::set_type_parm(TConfig& config, TString& section) tipo.set_length(config.get_int("LENGTH", section)); tipo.set_decimal(config.get_int("DECIMAL", section)); tipo.set_align(config.get_char("ALIGN", section)); + const char datatype=config.get_char("DATA", section); + if (datatype>' ') + tipo.set_datatype(datatype); + else + tipo.set_datatype('S'); TString s = config.get("FILLER", section); if (s.len() > 1) tipo.set_filler(s[1]); @@ -431,6 +437,9 @@ TFile_text::~TFile_text() delete _read_file; if (_write_file) delete _write_file; + _tipi.destroy(); + _tracciati_record.destroy(); + } //Legge da file il record text @@ -516,19 +525,26 @@ int TFile_text::write(TRecord_text& rec) rec.add(type,_typepos); if (_fixedlen) // campi a lunghezza fissa { - for (int i = 0; i < items; i++) - { - TTracciato_campo& tc = tr.get(i); - campo = rec.row(i); - campo = format_textfield(tc, campo); - buffer.insert(campo, tc.position()); - //buffer << campo; - campo.cut(0); - } - CHECK(_write_file, "Impossibile scrivere su un file chiuso."); + for (int i = 0; i < items; i++) + { + TTracciato_campo& tc = tr.get(i); + campo = rec.row(i); + campo = format_textfield(tc, campo); + buffer.insert(campo, tc.position()); + campo.cut(0); + } + CHECK(_write_file, "Impossibile scrivere su un file chiuso."); + if (_recordsize<=0) + { + // Record a lunghezza var *_write_file << buffer; - if (_recordsize<=0) // Record a lunghezza var - *_write_file << _recordsep; + *_write_file << _recordsep; + } else { + // Record a lunghezza fissa + buffer.rpad(_recordsize); + buffer.cut(_recordsize); + *_write_file << buffer; + } if (!ok_w()) return 1; buffer.cut(0); } @@ -590,8 +606,9 @@ bool TFile_text::autoload(TRecord_text& rec, TCursor& cur , const TString* tipo) { const TString& type = rec.type(); if (tipo == NULL) tipo = &type; - TTracciato_record& tr = *t_rec(*tipo); - return _autoload(rec,cur,tr); + TTracciato_record* tr = t_rec(*tipo); + CHECKS(tr!=NULL,"Tracciato record file di testo non trovato ",(const char *)*tipo); + return _autoload(rec,cur,*tr); } bool TFile_text::autoload(TCursor& cur, const TString* tipo) @@ -618,9 +635,9 @@ bool TFile_text::_autoload(TRecord_text& rec, TCursor& cur , TTracciato_record& TString message = tc.message(); if (!message.empty()) { - TToken_string msg (message, ','); - if (!msg.blank()) - validate(cur, rec, msg, campo); + TToken_string msg (message, ','); + if (!msg.blank()) + validate(cur, rec, msg, campo); } rec.add(campo, i); @@ -815,30 +832,49 @@ void TFile_text::format_date(const TDate& data, const TString& form, TString& da // sono quelli associati al campo nel filetext TString& TFile_text::format_textfield(const TTracciato_campo& tc, TString& campo) { - //int pos = tc.position(); - int length = tc.length(); - char fillch=tc.filler(); - if (!tc.picture().blank()) - { TString tmp; - tmp.picture(tc.picture(), campo); - campo=tmp; - } - if (length > campo.len()) + //int pos = tc.position(); + int length = tc.length(); + char fillch=tc.filler(); + if (!tc.picture().blank()) + { + switch (tc.datatype()) { - if (fillch == '\0' && _fixedlen) - fillch=' '; + case 'N': // number + { + real tmp(campo); + campo=tmp.string(tc.picture()); + } + break; + case 'D': //data + { + TFormatted_date tmp(TDate (campo),tc.picture()); + campo=tmp.string(); + } + break; + default: + { + TString tmp; + tmp.picture(tc.picture(), campo); + campo=tmp; + } + } + } + if (length > campo.len()) + { + if (fillch == '\0' && _fixedlen) + fillch=' '; + if (tc.align() == 'R') + campo.right_just(length,fillch); + else + campo.left_just(length, fillch); + } + else + if (length > 0) if (tc.align() == 'R') - campo.right_just(length,fillch); + campo=campo.right(length); else - campo.left_just(length, fillch); - } - else - if (length > 0) - if (tc.align() == 'R') - campo=campo.right(length); - else - campo.cut(length); - return campo; + campo.cut(length); + return campo; } // Formatta la stringa passata in base al field del file isam @@ -931,8 +967,6 @@ int TFile_text::close() { _name = ""; _current = NULL; - _tipi.destroy(); - _tracciati_record.destroy(); if (_read_file) _read_file->close(); if (_write_file) _write_file->close(); return 0; diff --git a/include/filetext.h b/include/filetext.h index d1f909849..74709d811 100755 --- a/include/filetext.h +++ b/include/filetext.h @@ -21,6 +21,8 @@ class TTracciato_campo : public TObject { // @cmember descrizione del contenuto TString _name; + //@cmember tipo del campo del file di testo (umero, tringa, ata + char _datatype; //@cmember tipo predefinito del campo del file di testo TString _type; //@cmember nome su file/relazione @@ -52,6 +54,7 @@ public: virtual TObject* dup() const; const TTracciato_campo& operator =(const TTracciato_campo& tc); const TString& name() const {return _name;} + const char datatype() const {return _datatype;} const TString& type() const {return _type;} const TFieldref& field() const {return _field;} const TString& ftype() const {return _ftype;} @@ -63,6 +66,7 @@ public: const TString& picture() const {return _picture;} const TString& message() const {return _message;} void set_name(const TString& name) {_name = name;} + void set_datatype(const char type) {_datatype = type;} void set_type(const TString& type) {_type = type;} void set_field(const TFieldref& field) {_field = field;} void set_ftype(const TString& type) {_ftype = type;} diff --git a/include/form.cpp b/include/form.cpp index 31095e21a..fc366af7c 100755 --- a/include/form.cpp +++ b/include/form.cpp @@ -694,14 +694,14 @@ void TForm_item::send_message( if (val.not_empty()) val << ' '; val << get(); des.set(val); + } else if (cmd == "RESET") { + des.set(""); } else if (cmd == "DISABLE") { des.disable(); } else if (cmd == "ENABLE") { des.enable(); } else if (cmd == "HIDE") { des.hide(); - } else if (cmd == "RESET") { - des.set(""); } else if (cmd == "SHOW") { des.show(); } else if (cmd == "SUB") { @@ -732,7 +732,7 @@ TForm_item& TForm_item::find_field(const TString& id) const char se; int id_num; int pos_id; - if (freccia) + if (freccia >= 0) { pos_id=freccia+2; id_num=atoi(id.mid(pos_id)); @@ -775,7 +775,7 @@ bool TForm_item::do_message(int num) // Send the message to all fields in local and upper sections with the given group send_message_to_group(cmd,group,section(),§ion()); } - else + else { TForm_item& des = find_field(id); send_message(cmd, des); @@ -1229,6 +1229,7 @@ bool TForm_subsection::update() bool TForm_subsection::print_body(sec_print_mode showfields) { + const bool at_newpage=(atnewpage() || printer().rows_left() < (word)height()); bool ok = FALSE; TCursor* cur = form().cursor(); TRelation* rel = (TRelation* )form().relation(); @@ -1245,11 +1246,11 @@ bool TForm_subsection::print_body(sec_print_mode showfields) showfields = printmode_noprint; if (cur == NULL || (_file_id == -1 && _condexpr==NULL)) // ...unused - ok = _ssec.update_and_print(showfields,atnewpage()); + ok = _ssec.update_and_print(showfields,at_newpage); else if (_file_id == -1 && _condexpr!=NULL) // subsection condizionale { if ((bool)(_section->eval_expr(*_condexpr,_file_id))) - ok = _ssec.update_and_print(showfields,atnewpage()); + ok = _ssec.update_and_print(showfields,at_newpage); } else { @@ -1263,7 +1264,7 @@ bool TForm_subsection::print_body(sec_print_mode showfields) form().match_result(_file_id); if (!_bigskip || i==0) { - ok |= _ssec.update_and_print(showfields,atnewpage()); + ok |= _ssec.update_and_print(showfields,at_newpage); _ssec.set_repeat_count(++i); } if (form().next_match_done(_file_id)) @@ -1282,7 +1283,7 @@ bool TForm_subsection::print_body(sec_print_mode showfields) bool again; do { form().match_result(_file_id); - ok |= _ssec.update_and_print(showfields,atnewpage()); + ok |= _ssec.update_and_print(showfields,at_newpage); _ssec.set_repeat_count(++i); if (form().next_match_done(_file_id)) again=form().last_match_result(_file_id); @@ -4084,7 +4085,7 @@ bool TPrint_section::update_and_print(const sec_print_mode show_fields, bool new return ok; } -word TPrint_section::print_rows(const sec_print_mode show_fields, word from, word to) +word TPrint_section::print_rows(const sec_print_mode show_fields, word from, word to) { TPrinter& pr = printer(); if (show_fields!=printmode_noprint && to>from) @@ -5344,7 +5345,7 @@ void TForm::read( if (forms.status() == NOERR) { _desc = forms.get("DESC"); - if (_desc != desc && desc && *desc) // Controlla se la descrizione e' diversa, in questo caso l'aggiorna + if (desc && *desc && _desc != desc ) // Controlla se la descrizione e' diversa, in questo caso l'aggiorna { forms.reread(_lock); forms.put("DESC",desc); diff --git a/include/form.h b/include/form.h index 77523b503..3b6db350b 100755 --- a/include/form.h +++ b/include/form.h @@ -1096,9 +1096,6 @@ protected: virtual TToken_string& memo_info() { return _memo; } - virtual const char* get() const; - bool set(const char*); - TFieldref& field(int i) const { return (TFieldref&)_field[i]; } public: @@ -1110,6 +1107,8 @@ public: virtual void put_paragraph(const char* s); virtual bool edit(TMask& m); + virtual const char* get() const; + virtual bool set(const char*); TForm_string(TPrint_section* section); virtual ~TForm_string() {} }; diff --git a/include/real.cpp b/include/real.cpp index ff1c48aed..6ebe66b49 100755 --- a/include/real.cpp +++ b/include/real.cpp @@ -1439,6 +1439,7 @@ char* real::string(const char *picture) const v.cut (virgola + voluti + (voluti > 0)); int j = v.len () - 1; + bool sign(FALSE); for (int i = f.len () - 1; i >= 0 && j >= 0; i--) { char &z = f[i]; @@ -1454,17 +1455,40 @@ char* real::string(const char *picture) const if (c == '@') c = (z == '@') ? '0' : ' '; else - if (c == '-' && f[i+1] == migsep) // Altrimenti -100 diventa -.100 + if (c == '-') { - f[i+1] = '-'; - c = ' '; + if (z == '@') // Altrimenti -10 con picture @@@@@ diventa "00-10" + { + if (f[i+1] == migsep) + f[i+1] = '0'; + sign=TRUE; // posticipa l'append del segno + i++; + c=z; + } else { + if (f[i+1] == migsep ) // Altrimenti -100 diventa -.100 + { + f[i+1] = '-'; + c = ' '; //OK + } + } } } z = c; - } + } } - for (; i >= 0; i--) + for (int i2=0; i2 <= i; i2++) + if (f[i2] == '@') + { + if (sign) + { + f[i2] = '-'; // add sign in first pos + sign=FALSE; + } + else + f[i2] = '0'; + } + for (; i >=0 ; i--) switch (f[i]) { case '#': @@ -1473,9 +1497,6 @@ char* real::string(const char *picture) const case ',': f[i] = ' '; break; - case '@': - f[i] = '0'; - break; default: break; } diff --git a/include/relapp.cpp b/include/relapp.cpp index 3311da9e4..09d3888e2 100755 --- a/include/relapp.cpp +++ b/include/relapp.cpp @@ -166,7 +166,7 @@ void TRelation_application::set_toolbar(bool all) pos = _mask->id2pos(DLG_SAVEREC); if (pos >= 0) _mask->fld(pos).enable(mode != MODE_QUERY); - + pos = _mask->id2pos(DLG_DELREC); if (pos >= 0) { @@ -183,12 +183,12 @@ void TRelation_application::set_toolbar(bool all) } pos = _mask->id2pos(DLG_FINDREC); - if (pos >= 0) + if (pos >= 0) _mask->fld(pos).enable(_lnflag == 0); - + pos = _mask->id2pos(DLG_NEWREC); - if (pos >= 0) - _mask->fld(pos).enable(mode == MODE_QUERY || _lnflag == 0); + if (pos >= 0) + _mask->fld(pos).enable(mode == MODE_QUERY || _lnflag == 0 ); } enable_query(); @@ -398,7 +398,6 @@ bool TRelation_application::modify_mode() if (_curr_transaction == TRANSACTION_MODIFY) ini2insert_mask(); - return TRUE; } @@ -865,23 +864,18 @@ void TRelation_application::main_loop() if (_lnflag) { if (load_transaction()) - { + { + _autodelete = _curr_transaction == TRANSACTION_DELETE; if (_curr_transaction == TRANSACTION_INSERT ) - { _mask->send_key(K_CTRL+'N', 0); - } - else - { - _autodelete = _curr_transaction == TRANSACTION_DELETE; - _mask->send_key(K_AUTO_ENTER, 0); - } - } + } + if (_curr_transaction !=TRANSACTION_RUN) + _mask->send_key(K_AUTO_ENTER, 0); } - + query_mode(); _mask->open_modal(); - - + do { const bool change = firm_change_enabled(); @@ -1265,6 +1259,8 @@ bool TRelation_application::parse_command_line() return _lnflag != 0; } +// il valore di ritorno indica se attivare l'"automagia" (spedizione dei tasti e +// precaricamento della maschera) bool TRelation_application::load_transaction() { bool retv = FALSE; diff --git a/include/relapp.h b/include/relapp.h index 7854cc33d..9d6adac73 100755 --- a/include/relapp.h +++ b/include/relapp.h @@ -17,6 +17,7 @@ #include #endif +#define TRANSACTION_RUN "RUN" #define TRANSACTION_INSERT "INSERT" #define TRANSACTION_MODIFY "MODIFY" #define TRANSACTION_DELETE "DELETE" diff --git a/m770/77inst.ini b/m770/77inst.ini index f1355c856..b91d11e08 100755 --- a/m770/77inst.ini +++ b/m770/77inst.ini @@ -1,19 +1,24 @@ [77] -Data = 12-03-1998 +Data = 21-04-1998 Descrizione = Modello 770 Dischi = 1 Moduli = ba -Patch = 18 +Patch = 10 PostProcess = PreProcess = Prezzo(1) = 700,250 -Versione = 19980102 +Prezzo(2) = 210,80 +Prezzo(3) = 140,50 +Prezzo(5) = 110,40 +Prezzo(9) = 70,30 +Prezzo(30) = 40,20 +Versione = 19980103 [770] File(0) = 7700.bmp File(1) = 77area.men -Patch = 18 -Versione = 19980102 +Patch = 10 +Versione = 19980103 [771] File(2) = 770.exe @@ -152,8 +157,8 @@ File(134) = batbca7.msk File(135) = batbcaf.msk File(136) = batbent.msk File(137) = menu_st.msk -Patch = 18 -Versione = 19980102 +Patch = 10 +Versione = 19980103 [772] File(138) = recdesc\f36.dir @@ -222,6 +227,6 @@ File(200) = recdesc\f76.dir File(201) = recdesc\f76.trr File(202) = recdesc\f77.dir File(203) = recdesc\f77.trr -Patch = 18 -Versione = 19980102 +Patch = 10 +Versione = 19980103 diff --git a/mg/mg3100.cpp b/mg/mg3100.cpp index 0e13ed823..e04688ebd 100755 --- a/mg/mg3100.cpp +++ b/mg/mg3100.cpp @@ -79,7 +79,6 @@ TStampadatist_mask::TStampadatist_mask(): set_handler(F_TOLIVELLOGIAC, handle_liv); set_handler(F_ORDINE, handle_ragg); set_handler(F_DETTAGLIODEP, handle_ragg); - set_handler(F_DETTAGLIOMAG, handle_ragg); set_handler(F_ORDINEART,handle_subord); if (!artlev().enabled()) { TMask_field &f1=field(F_RAGGCODICE); diff --git a/mg/mg3100a.frm b/mg/mg3100a.frm index 922ec07f0..d46ce6ee5 100755 --- a/mg/mg3100a.frm +++ b/mg/mg3100a.frm @@ -1,4 +1,3 @@ - #include "mg3frm.h" USE LF_ANAMAG KEY 1 SORT LF_MAG BY ANNOES CODART LIVELLO CODMAG @@ -254,12 +253,6 @@ SECTION BODY ODD 0 COLUMNWISE MESSAGE ENABLE,BO->48 END - NUMBER FF_FLAGTOTQTA 1 - BEGIN - FLAG "H" - PROMPT 1 1 "" - END - LIST FF_FLAGVALMEDI 1 BEGIN PROMPT 1 1 "" @@ -291,7 +284,7 @@ SECTION BODY ODD 0 COLUMNWISE FLAGS "H" KEY "CATMER" PROMPT 2 1 "" - MESSAGE RESET,15@ + MESSAGE RESET,15@|_USER,RESET_UM,1553 END SECTION GRUPPI_CATMER 1 0 0 FILE LF_ANAMAG GROUP GRMERC @@ -301,7 +294,7 @@ SECTION BODY ODD 0 COLUMNWISE FLAGS "H" KEY "CATMER" PROMPT 2 1 "" - MESSAGE RESET,14@ + MESSAGE RESET,14@|_USER,RESET_UM,1453 END SECTION H_GCODART1 1 1 1 HEADER STRINGA 16 12 2 @@ -324,7 +317,7 @@ SECTION BODY ODD 0 COLUMNWISE FLAGS "H" KEY "" PROMPT 2 1 "" - MESSAGE RESET,13@ + MESSAGE RESET,13@|_USER,RESET_UM,1353 END SECTION H_GCODART2 1 1 1 HEADER STRINGA 16 12 2 @@ -347,7 +340,7 @@ SECTION BODY ODD 0 COLUMNWISE FLAGS "H" KEY "CATMER" PROMPT 2 1 "" - MESSAGE RESET,12@ + MESSAGE RESET,12@|_USER,RESET_UM,1253 END SECTION H_GCODART3 1 1 1 HEADER @@ -371,7 +364,7 @@ SECTION BODY ODD 0 COLUMNWISE FLAGS "H" KEY "CATMER" PROMPT 1 1 "" - MESSAGE RESET,11@ + MESSAGE RESET,11@|_USER,RESET_UM,1153 END SECTION H_GCODART4 1 1 1 HEADER STRINGA 16 12 2 @@ -394,7 +387,7 @@ SECTION BODY ODD 0 COLUMNWISE FLAGS "H" KEY "CATMER" PROMPT 2 1 "" - MESSAGE RESET,10@ + MESSAGE RESET,10@|_USER,RESET_UM,1053 END SECTION H_GCODART5 1 1 1 HEADER STRINGA 16 12 2 @@ -417,7 +410,7 @@ SECTION BODY ODD 0 COLUMNWISE FLAGS "H" KEY "CATMER" PROMPT 2 1 "" - MESSAGE RESET,9@ + MESSAGE RESET,9@|_USER,RESET_UM,953 END SECTION H_GCODART6 1 1 1 HEADER STRINGA 16 12 2 @@ -440,7 +433,7 @@ SECTION BODY ODD 0 COLUMNWISE FLAGS "H" KEY "CATMER" PROMPT 2 1 "" - MESSAGE RESET,8@ + MESSAGE RESET,8@|_USER,RESET_UM,853 END SECTION H_GCODART7 1 1 1 HEADER STRINGA 16 12 2 @@ -463,7 +456,7 @@ SECTION BODY ODD 0 COLUMNWISE FLAGS "H" KEY "CATMER" PROMPT 2 1 "" - MESSAGE RESET,7@ + MESSAGE RESET,7@|_USER,RESET_UM,753 END SECTION H_GCODART8 1 1 1 HEADER @@ -487,7 +480,7 @@ SECTION BODY ODD 0 COLUMNWISE FLAGS "H" KEY "CATMER" PROMPT 2 1 "" - MESSAGE RESET,6@ + MESSAGE RESET,6@|_USER,RESET_UM,653 END SECTION H_ARTICOLO 1 1 1 HEADER STRINGA 2020 12 2 @@ -837,30 +830,26 @@ SECTION BODY ODD 0 COLUMNWISE END // tot magazz END // GGIAC4 - SECTION TOT_GLIVGIAC4 1 2 2 GROUP + SECTION TOT_GLIVGIAC4 1 1 1 GROUP STRINGA 251 7 2 BEGIN KEY "Livello giac4" - PROMPT 2 2 " Totale" + PROMPT 2 1 " Totale" END STRINGA 250 35 2 BEGIN - PROMPT 3 2 "" + PROMPT 3 1 "" END STRINGA 253 3 BEGIN KEY "UM" - PROMPT 5 2 "" + PROMPT 5 1 "" MESSAGE COPY,353 END - STRINGA 77 - BEGIN - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END NUMERO 241 12 BEGIN KEY "ACQ" - PROMPT 6 2 "" + PROMPT 6 1 "" PICTURE "########,@#" MESSAGE ADD,341 GROUP 2 @@ -868,7 +857,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 242 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "###.###.##@" MESSAGE ADD,342 GROUP 2 FG_VALORI @@ -876,7 +865,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 282 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#242/#241 GROUP FG_VALMEDI @@ -885,7 +874,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 243 12 BEGIN KEY "ven" - PROMPT 8 2 "" + PROMPT 8 1 "" PICTURE "########,@#" MESSAGE ADD,343 GROUP 2 @@ -893,7 +882,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 244 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "###.###.##@" MESSAGE ADD,344 GROUP 2 FG_VALORI @@ -901,7 +890,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 284 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#244/#243 GROUP FG_VALMEDI @@ -910,7 +899,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 245 12 BEGIN KEY "rim" - PROMPT 10 2 "" + PROMPT 10 1 "" PICTURE "########,@#" MESSAGE ADD,345 GROUP 2 @@ -918,7 +907,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 246 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "###.###.##@" MESSAGE ADD,346 GROUP 2 FG_VALORI @@ -926,7 +915,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 286 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#246/#245 GROUP FG_VALMEDI @@ -935,7 +924,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 247 12 BEGIN KEY "giac" - PROMPT 12 2 "" + PROMPT 12 1 "" PICTURE "########,@#" MESSAGE ADD,347 GROUP 2 @@ -943,32 +932,27 @@ SECTION BODY ODD 0 COLUMNWISE END // tot ggiac4 END // GGIAC3 - SECTION TOT_GLIVGIAC3 1 2 2 GROUP + SECTION TOT_GLIVGIAC3 1 1 1 GROUP STRINGA 351 7 2 BEGIN KEY "" - PROMPT 2 2 " Totale" + PROMPT 2 1 " Totale" END STRINGA 350 35 2 BEGIN KEY "" - PROMPT 3 2 "" + PROMPT 3 1 "" END STRINGA 353 3 BEGIN KEY "UM" - PROMPT 5 2 "" + PROMPT 5 1 "" MESSAGE COPY,453 END - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END NUMERO 341 12 BEGIN KEY "ACQ" - PROMPT 6 2 "" + PROMPT 6 1 "" PICTURE "########,@#" MESSAGE ADD,441 GROUP 3 @@ -976,7 +960,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 342 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "###.###.##@" MESSAGE ADD,442 GROUP 3 FG_VALORI @@ -984,7 +968,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 382 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#342/#341 GROUP FG_VALMEDI @@ -993,7 +977,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 343 12 BEGIN KEY "ven" - PROMPT 8 2 "" + PROMPT 8 1 "" PICTURE "########,@#" MESSAGE ADD,443 GROUP 3 @@ -1001,7 +985,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 344 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "###.###.##@" MESSAGE ADD,444 GROUP 3 FG_VALORI @@ -1009,7 +993,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 384 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#344/#343 GROUP FG_VALMEDI @@ -1018,7 +1002,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 345 12 BEGIN KEY "rim" - PROMPT 10 2 "" + PROMPT 10 1 "" PICTURE "########,@#" MESSAGE ADD,445 GROUP 3 @@ -1026,7 +1010,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 346 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "###.###.##@" MESSAGE ADD,446 GROUP 3 FG_VALORI @@ -1034,7 +1018,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 386 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#346/#345 GROUP FG_VALMEDI @@ -1043,7 +1027,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 347 12 BEGIN KEY "giac" - PROMPT 12 2 "" + PROMPT 12 1 "" PICTURE "########,@#" MESSAGE ADD,447 GROUP 3 @@ -1051,32 +1035,27 @@ SECTION BODY ODD 0 COLUMNWISE END // tot ggiac3 END // GGIAC2 - SECTION TOT_GLIVGIAC2 1 2 2 GROUP + SECTION TOT_GLIVGIAC2 1 1 1 GROUP STRINGA 451 7 2 BEGIN KEY "" - PROMPT 2 2 " Totale" + PROMPT 2 1 " Totale" END STRINGA 450 35 2 BEGIN KEY "" - PROMPT 3 2 "" + PROMPT 3 1 "" END STRINGA 453 3 BEGIN KEY "UM" - PROMPT 5 2 "" + PROMPT 5 1 "" MESSAGE COPY,553 END - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END NUMERO 441 12 BEGIN KEY "ACQ" - PROMPT 6 2 "" + PROMPT 6 1 "" PICTURE "########,@#" MESSAGE ADD,541 GROUP 4 @@ -1084,7 +1063,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 442 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "###.###.##@" MESSAGE ADD,542 GROUP 4 FG_VALORI @@ -1092,7 +1071,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 482 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#442/#441 GROUP FG_VALMEDI @@ -1101,7 +1080,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 443 12 BEGIN KEY "ven" - PROMPT 8 2 "" + PROMPT 8 1 "" PICTURE "########,@#" MESSAGE ADD,543 GROUP 4 @@ -1109,7 +1088,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 444 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "###.###.##@" MESSAGE ADD,544 GROUP 4 FG_VALORI @@ -1117,7 +1096,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 484 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#444/#443 GROUP FG_VALMEDI @@ -1126,7 +1105,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 445 12 BEGIN KEY "rim" - PROMPT 10 2 "" + PROMPT 10 1 "" PICTURE "########,@#" MESSAGE ADD,545 GROUP 4 @@ -1134,7 +1113,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 446 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "###.###.##@" MESSAGE ADD,546 GROUP 4 FG_VALORI @@ -1142,7 +1121,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 486 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#446/#445 GROUP FG_VALMEDI @@ -1150,39 +1129,34 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 447 12 BEGIN KEY "giac" - PROMPT 12 2 "" + PROMPT 12 1 "" PICTURE "########,@#" MESSAGE ADD,547 GROUP 4 END END // tot ggiac2 END // GGIAC1 - SECTION TOT_GLIVGIAC1 1 2 2 GROUP + SECTION TOT_GLIVGIAC1 1 1 1 GROUP STRINGA 551 7 2 BEGIN KEY "" - PROMPT 2 2 " Totale" + PROMPT 2 1 " Totale" END STRINGA 550 35 2 BEGIN KEY "" - PROMPT 3 2 "" + PROMPT 3 1 "" END STRINGA 553 3 BEGIN KEY "UM" - PROMPT 5 2 "" + PROMPT 5 1 "" MESSAGE COPY,653 END - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END NUMERO 541 12 BEGIN KEY "ACQ" - PROMPT 6 2 "" + PROMPT 6 1 "" PICTURE "########,@#" MESSAGE ADD,641 GROUP 5 @@ -1190,7 +1164,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 542 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "###.###.##@" MESSAGE ADD,642 GROUP 5 FG_VALORI @@ -1198,7 +1172,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 582 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#542/#541 GROUP FG_VALMEDI @@ -1207,7 +1181,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 543 12 BEGIN KEY "ven" - PROMPT 8 2 "" + PROMPT 8 1 "" PICTURE "########,@#" MESSAGE ADD,643 GROUP 5 @@ -1215,7 +1189,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 544 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "###.###.##@" MESSAGE ADD,644 GROUP 5 FG_VALORI @@ -1223,7 +1197,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 584 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#544/#543 GROUP FG_VALMEDI @@ -1232,7 +1206,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 545 12 BEGIN KEY "rim" - PROMPT 10 2 "" + PROMPT 10 1 "" PICTURE "########,@#" MESSAGE ADD,645 GROUP 5 @@ -1240,7 +1214,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 546 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "###.###.##@" MESSAGE ADD,646 GROUP 5 FG_VALORI @@ -1248,7 +1222,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 586 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#546/#545 GROUP FG_VALMEDI @@ -1257,7 +1231,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 547 12 BEGIN KEY "giac" - PROMPT 12 2 "" + PROMPT 12 1 "" PICTURE "########,@#" MESSAGE ADD,647 GROUP 5 @@ -1265,32 +1239,35 @@ SECTION BODY ODD 0 COLUMNWISE END // tot ggiac1 END // FILE GIACENZE - SECTION TOT_ARTICOLO 1 2 2 FOOTER + //SECTION TOT_ARTICOLO 1 1 1 GROUP + // FLAGS "R" + // STRINGA 883 32 1 + // BEGIN + // KEY "" + // PROMPT 1 1 "CAZZOTTO " + // END + //END + SECTION TOT_ARTICOLO 1 1 1 FOOTER STRINGA 651 12 2 BEGIN KEY "" - PROMPT 2 2 "Totale art." + PROMPT 2 1 "Articolo " END STRINGA 650 30 2 BEGIN KEY "" - PROMPT 3 2 "" + PROMPT 3 1 "" END STRINGA 653 3 BEGIN KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,753|_USER,SAVE_UM - END - STRINGA 77 - BEGIN - KEY "sep" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,753 END NUMERO 641 12 BEGIN KEY "ACQ" - PROMPT 6 2 "" + PROMPT 6 1 "" PICTURE "########,@#" MESSAGE ADD,741 GROUP 6 @@ -1298,7 +1275,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 642 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "###.###.##@" MESSAGE ADD,742 GROUP 6 FG_VALORI FG_RIGAVALORI @@ -1306,7 +1283,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 682 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#642/#641 GROUP FG_VALMEDI FG_RIGAVALORI @@ -1314,7 +1291,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 643 12 BEGIN KEY "ven" - PROMPT 8 2 "" + PROMPT 8 1 "" PICTURE "########,@#" MESSAGE ADD,743 GROUP 6 FG_RIGAVALORI @@ -1322,7 +1299,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 644 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "###.###.##@" MESSAGE ADD,744 GROUP 6 FG_VALORI FG_RIGAVALORI @@ -1330,7 +1307,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 684 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#644/#643 GROUP FG_VALMEDI FG_RIGAVALORI @@ -1338,7 +1315,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 645 12 BEGIN KEY "rim" - PROMPT 10 2 "" + PROMPT 10 1 "" PICTURE "########,@#" MESSAGE ADD,745 GROUP 6 FG_RIGAVALORI @@ -1346,7 +1323,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 646 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "###.###.##@" MESSAGE ADD,746 GROUP 6 FG_VALORI FG_RIGAVALORI @@ -1354,7 +1331,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 686 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#646/#645 GROUP FG_VALMEDI FG_RIGAVALORI @@ -1362,7 +1339,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 647 12 BEGIN KEY "giac" - PROMPT 12 2 "" + PROMPT 12 1 "" PICTURE "########,@#" MESSAGE ADD,747 GROUP 6 @@ -1371,53 +1348,49 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 648 12 BEGIN KEY "ULC" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "###.###.###" GROUP FG_RIGAPREZZI END NUMERO 649 12 BEGIN KEY "PREZZO" - PROMPT 8 2 "" + PROMPT 8 1 "" PICTURE "###.###.###" GROUP FG_RIGAPREZZI END END // TOT ART END // GART8 - SECTION TOT_GART8 1 2 2 FOOTER - STRINGA 77 - BEGIN - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END + SECTION TOT_GART8 1 1 1 FOOTER STRINGA 751 8 2 BEGIN KEY "" - PROMPT 2 2 " Totale" + PROMPT 2 1 " Totale" END STRINGA 750 34 2 BEGIN KEY "" - PROMPT 3 2 "" + PROMPT 3 1 "" END STRINGA 753 3 BEGIN KEY "UM" - PROMPT 5 2 "" - MESSAGE _USER,VALIDATE_UM|COPY,853 + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,853 END NUMERO 741 12 BEGIN KEY "ACQ" - PROMPT 6 2 "" + PROMPT 6 1 "" PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#741|ADD,841 + MESSAGE _USER,VALIDATE_UM,753|ADD,841 GROUP 7 END NUMERO 742 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "###.###.##@" MESSAGE ADD,842 GROUP 7 FG_VALORI @@ -1425,7 +1398,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 782 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#742/#741 GROUP FG_VALMEDI @@ -1434,15 +1407,15 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 743 12 BEGIN KEY "ven" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#743|ADD,843 + PROMPT 8 1 "" + PICTURE "1#######,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,843 GROUP 7 END NUMERO 744 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "###.###.##@" MESSAGE ADD,844 GROUP 7 FG_VALORI @@ -1450,7 +1423,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 784 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#744/#743 GROUP FG_VALMEDI @@ -1459,15 +1432,15 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 745 12 BEGIN KEY "rim" - PROMPT 10 2 "" + PROMPT 10 1 "" PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#745|ADD,845 + MESSAGE _USER,VALIDATE_UM,753|ADD,845 GROUP 7 END NUMERO 746 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "###.###.##@" MESSAGE ADD,846 GROUP 7 FG_VALORI @@ -1475,7 +1448,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 786 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#746/#745 GROUP FG_VALMEDI @@ -1484,47 +1457,43 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 747 12 BEGIN KEY "giac" - PROMPT 12 2 "" + PROMPT 12 1 "" PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#747|ADD,847 + MESSAGE _USER,VALIDATE_UM,753|ADD,847 GROUP 7 END END // tot gart8 END // GART7 - SECTION TOT_GART7 1 2 2 FOOTER + SECTION TOT_GART7 1 1 1 FOOTER STRINGA 851 8 2 BEGIN KEY "" - PROMPT 2 2 " Totale" + PROMPT 2 1 " Totale" END STRINGA 850 34 2 BEGIN KEY "" - PROMPT 3 2 "" + PROMPT 3 1 "" END STRINGA 853 3 BEGIN KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,953 - END - STRINGA 77 - BEGIN - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,953 END NUMERO 841 12 BEGIN KEY "ACQ" - PROMPT 6 2 "" + PROMPT 6 1 "" PICTURE "########,@#" - MESSAGE ADD,941 + MESSAGE _USER,VALIDATE_UM,853|ADD,941 GROUP 8 END NUMERO 842 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "###.###.##@" MESSAGE ADD,942 GROUP 8 FG_VALORI @@ -1532,7 +1501,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 882 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#842/#841 GROUP FG_VALMEDI @@ -1541,15 +1510,15 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 843 12 BEGIN KEY "ven" - PROMPT 8 2 "" + PROMPT 8 1 "" PICTURE "########,@#" - MESSAGE ADD,943 + MESSAGE _USER,VALIDATE_UM,853|ADD,943 GROUP 8 END NUMERO 844 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "###.###.##@" MESSAGE ADD,944 GROUP 8 FG_VALORI @@ -1557,7 +1526,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 884 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#844/#843 GROUP FG_VALMEDI @@ -1566,15 +1535,15 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 845 12 BEGIN KEY "rim" - PROMPT 10 2 "" + PROMPT 10 1 "" PICTURE "########,@#" - MESSAGE ADD,945 + MESSAGE _USER,VALIDATE_UM,853|ADD,945 GROUP 8 END NUMERO 846 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "###.###.##@" MESSAGE ADD,946 GROUP 8 FG_VALORI @@ -1582,7 +1551,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 886 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#846/#845 GROUP FG_VALMEDI @@ -1591,48 +1560,43 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 847 12 BEGIN KEY "giac" - PROMPT 12 2 "" + PROMPT 12 1 "" PICTURE "########,@#" - MESSAGE ADD,947 + MESSAGE _USER,VALIDATE_UM,853|ADD,947 GROUP 8 END END // tot gart7 END // GART6 - SECTION TOT_GART6 1 2 2 FOOTER + SECTION TOT_GART6 1 1 1 FOOTER STRINGA 951 8 2 BEGIN KEY "" - PROMPT 2 2 " Totale" + PROMPT 2 1 " Totale" END STRINGA 950 34 2 BEGIN KEY "" - PROMPT 3 2 "" + PROMPT 3 1 "" END STRINGA 953 3 BEGIN KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1053 - END - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1053 END NUMERO 941 12 BEGIN KEY "ACQ" - PROMPT 6 2 "" + PROMPT 6 1 "" PICTURE "########,@#" - MESSAGE ADD,1041 + MESSAGE _USER,VALIDATE_UM,953|ADD,1041 GROUP 9 END NUMERO 942 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "###.###.##@" MESSAGE ADD,1042 GROUP 9 FG_VALORI @@ -1640,7 +1604,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 982 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#942/#941 GROUP FG_VALMEDI @@ -1649,15 +1613,15 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 943 12 BEGIN KEY "ven" - PROMPT 8 2 "" + PROMPT 8 1 "" PICTURE "########,@#" - MESSAGE ADD,1043 + MESSAGE _USER,VALIDATE_UM,953|ADD,1043 GROUP 9 END NUMERO 944 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "###.###.##@" MESSAGE ADD,1044 GROUP 9 FG_VALORI @@ -1665,7 +1629,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 984 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#944/#943 GROUP FG_VALMEDI @@ -1674,15 +1638,15 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 945 12 BEGIN KEY "rim" - PROMPT 10 2 "" + PROMPT 10 1 "" PICTURE "########,@#" - MESSAGE ADD,1045 + MESSAGE _USER,VALIDATE_UM,953|ADD,1045 GROUP 9 END NUMERO 946 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "###.###.##@" MESSAGE ADD,1046 GROUP 9 FG_VALORI @@ -1690,7 +1654,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 986 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#946/#945 GROUP FG_VALMEDI @@ -1699,48 +1663,43 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 947 12 BEGIN KEY "giac" - PROMPT 12 2 "" + PROMPT 12 1 "" PICTURE "########,@#" - MESSAGE ADD,1047 + MESSAGE _USER,VALIDATE_UM,953|ADD,1047 GROUP 9 END END // tot gart6 END // GART5 - SECTION TOT_GART5 1 2 2 FOOTER + SECTION TOT_GART5 1 1 1 FOOTER STRINGA 1051 8 2 BEGIN KEY "" - PROMPT 2 2 " Totale" + PROMPT 2 1 " Totale" END STRINGA 1050 34 2 BEGIN KEY "" - PROMPT 3 2 "" + PROMPT 3 1 "" END STRINGA 1053 3 BEGIN KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1153 - END - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1153 END NUMERO 1041 12 BEGIN KEY "ACQ" - PROMPT 6 2 "" + PROMPT 6 1 "" PICTURE "########,@#" - MESSAGE ADD,1141 + MESSAGE _USER,VALIDATE_UM,1053|ADD,1141 GROUP 10 END NUMERO 1042 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "###.###.##@" MESSAGE ADD,1142 GROUP 10 FG_VALORI @@ -1748,7 +1707,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1082 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1042/#1041 GROUP FG_VALMEDI @@ -1756,15 +1715,15 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1043 12 BEGIN KEY "ven" - PROMPT 8 2 "" + PROMPT 8 1 "" PICTURE "########,@#" - MESSAGE ADD,1143 + MESSAGE _USER,VALIDATE_UM,1053|ADD,1143 GROUP 10 END NUMERO 1044 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "###.###.##@" MESSAGE ADD,1144 GROUP 10 FG_VALORI @@ -1772,7 +1731,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1084 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1044/#1043 GROUP FG_VALMEDI @@ -1780,15 +1739,15 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1045 12 BEGIN KEY "rim" - PROMPT 10 2 "" + PROMPT 10 1 "" PICTURE "########,@#" - MESSAGE ADD,1145 + MESSAGE _USER,VALIDATE_UM,1053|ADD,1145 GROUP 10 END NUMERO 1046 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "###.###.##@" MESSAGE ADD,1146 GROUP 10 FG_VALORI @@ -1796,7 +1755,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1086 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1046/#1045 GROUP FG_VALMEDI @@ -1804,48 +1763,43 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1047 12 BEGIN KEY "giac" - PROMPT 12 2 "" + PROMPT 12 1 "" PICTURE "########,@#" - MESSAGE ADD,1147 + MESSAGE _USER,VALIDATE_UM,1053|ADD,1147 GROUP 10 END END // tot gart5 END // GART4 - SECTION TOT_GART4 1 2 2 FOOTER + SECTION TOT_GART4 1 1 1 FOOTER STRINGA 1151 8 2 BEGIN KEY "" - PROMPT 2 2 " Totale" + PROMPT 2 1 " Totale" END STRINGA 1150 34 2 BEGIN KEY "" - PROMPT 3 2 "" + PROMPT 3 1 "" END STRINGA 1153 3 BEGIN KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1253 - END - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1253 END NUMERO 1141 12 BEGIN KEY "ACQ" - PROMPT 6 2 "" + PROMPT 6 1 "" PICTURE "########,@#" - MESSAGE ADD,1241 + MESSAGE _USER,VALIDATE_UM,1153|ADD,1241 GROUP 11 END NUMERO 1142 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "###.###.##@" MESSAGE ADD,1242 GROUP 11 FG_VALORI @@ -1853,7 +1807,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1182 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1142/#1141 GROUP FG_VALMEDI @@ -1861,15 +1815,15 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1143 12 BEGIN KEY "ven" - PROMPT 8 2 "" + PROMPT 8 1 "" PICTURE "########,@#" - MESSAGE ADD,1243 + MESSAGE _USER,VALIDATE_UM,1153|ADD,1243 GROUP 11 END NUMERO 1144 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "###.###.##@" MESSAGE ADD,1244 GROUP 11 FG_VALORI @@ -1877,7 +1831,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1184 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1144/#1143 GROUP FG_VALMEDI @@ -1885,15 +1839,15 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1145 12 BEGIN KEY "rim" - PROMPT 10 2 "" + PROMPT 10 1 "" PICTURE "########,@#" - MESSAGE ADD,1245 + MESSAGE _USER,VALIDATE_UM,1153|ADD,1245 GROUP 11 END NUMERO 1146 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "###.###.##@" MESSAGE ADD,1246 GROUP 11 FG_VALORI @@ -1901,7 +1855,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1186 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1146/#1145 GROUP FG_VALMEDI @@ -1909,48 +1863,43 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1147 12 BEGIN KEY "giac" - PROMPT 12 2 "" + PROMPT 12 1 "" PICTURE "########,@#" - MESSAGE ADD,1247 + MESSAGE _USER,VALIDATE_UM,1153|ADD,1247 GROUP 11 END END // tot gart4 END // GART3 - SECTION TOT_GART3 1 2 2 FOOTER + SECTION TOT_GART3 1 1 1 FOOTER STRINGA 1251 8 2 BEGIN KEY "" - PROMPT 2 2 " Totale" + PROMPT 2 1 " Totale" END STRINGA 1250 34 2 BEGIN KEY "" - PROMPT 3 2 "" + PROMPT 3 1 "" END STRINGA 1253 3 BEGIN KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1353 - END - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1353 END NUMERO 1241 12 BEGIN KEY "ACQ" - PROMPT 6 2 "" + PROMPT 6 1 "" PICTURE "########,@#" - MESSAGE ADD,1341 + MESSAGE _USER,VALIDATE_UM,1253|ADD,1341 GROUP 12 END NUMERO 1242 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "###.###.##@" MESSAGE ADD,1342 GROUP 12 FG_VALORI @@ -1958,7 +1907,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1282 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1242/#1241 GROUP FG_VALMEDI @@ -1966,15 +1915,15 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1243 12 BEGIN KEY "ven" - PROMPT 8 2 "" + PROMPT 8 1 "" PICTURE "########,@#" - MESSAGE ADD,1343 + MESSAGE _USER,VALIDATE_UM,1253|ADD,1343 GROUP 12 END NUMERO 1244 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "###.###.##@" MESSAGE ADD,1344 GROUP 12 FG_VALORI @@ -1982,7 +1931,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1284 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1244/#1243 GROUP FG_VALMEDI @@ -1990,15 +1939,15 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1245 12 BEGIN KEY "rim" - PROMPT 10 2 "" + PROMPT 10 1 "" PICTURE "########,@#" - MESSAGE ADD,1345 + MESSAGE _USER,VALIDATE_UM,1253|ADD,1345 GROUP 12 END NUMERO 1246 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "###.###.##@" MESSAGE ADD,1346 GROUP 12 FG_VALORI @@ -2006,7 +1955,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1286 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1246/#1245 GROUP FG_VALMEDI @@ -2014,48 +1963,43 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1247 12 BEGIN KEY "giac" - PROMPT 12 2 "" + PROMPT 12 1 "" PICTURE "########,@#" - MESSAGE ADD,1347 + MESSAGE _USER,VALIDATE_UM,1253|ADD,1347 GROUP 12 END END // tot gart3 END // GART2 - SECTION TOT_GART2 1 2 2 FOOTER + SECTION TOT_GART2 1 1 1 FOOTER STRINGA 1351 8 2 BEGIN KEY "" - PROMPT 2 2 " Totale" + PROMPT 2 1 " Totale" END STRINGA 1350 34 2 BEGIN KEY "" - PROMPT 3 2 "" + PROMPT 3 1 "" END STRINGA 1353 3 BEGIN KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1453 - END - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1453 END NUMERO 1341 12 BEGIN KEY "ACQ" - PROMPT 6 2 "" + PROMPT 6 1 "" PICTURE "########,@#" - MESSAGE ADD,1441 + MESSAGE _USER,VALIDATE_UM,1353|ADD,1441 GROUP 13 END NUMERO 1342 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "###.###.##@" MESSAGE ADD,1442 GROUP 13 FG_VALORI @@ -2063,7 +2007,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1382 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1342/#1341 GROUP FG_VALMEDI @@ -2071,15 +2015,15 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1343 12 BEGIN KEY "ven" - PROMPT 8 2 "" + PROMPT 8 1 "" PICTURE "########,@#" - MESSAGE ADD,1443 + MESSAGE _USER,VALIDATE_UM,1353|ADD,1443 GROUP 13 END NUMERO 1344 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "###.###.##@" MESSAGE ADD,1444 GROUP 13 FG_VALORI @@ -2087,7 +2031,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1384 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1344/#1343 GROUP FG_VALMEDI @@ -2095,15 +2039,15 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1345 12 BEGIN KEY "rim" - PROMPT 10 2 "" + PROMPT 10 1 "" PICTURE "########,@#" - MESSAGE ADD,1445 + MESSAGE _USER,VALIDATE_UM,1353|ADD,1445 GROUP 13 END NUMERO 1346 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "###.###.##@" MESSAGE ADD,1446 GROUP 13 FG_VALORI @@ -2111,7 +2055,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1386 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1346/#1345 GROUP FG_VALMEDI @@ -2119,48 +2063,43 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1347 12 BEGIN KEY "giac" - PROMPT 12 2 "" + PROMPT 12 1 "" PICTURE "########,@#" - MESSAGE ADD,1447 + MESSAGE _USER,VALIDATE_UM,1353|ADD,1447 GROUP 13 END END // tot gart2 END // GART1 - SECTION TOT_GART1 1 2 2 FOOTER + SECTION TOT_GART1 1 1 1 FOOTER STRINGA 1451 8 2 BEGIN KEY "" - PROMPT 2 2 " Totale" + PROMPT 2 1 " Totale" END STRINGA 1450 34 2 BEGIN KEY "" - PROMPT 3 2 "" + PROMPT 3 1 "" END STRINGA 1453 3 BEGIN KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1553 - END - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1553 END NUMERO 1441 12 BEGIN KEY "ACQ" - PROMPT 6 2 "" + PROMPT 6 1 "" PICTURE "########,@#" - MESSAGE ADD,1541 + MESSAGE _USER,VALIDATE_UM,1453|ADD,1541 GROUP 14 END NUMERO 1442 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "###.###.##@" MESSAGE ADD,1542 GROUP 14 FG_VALORI @@ -2168,7 +2107,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1482 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1442/#1441 GROUP FG_VALMEDI @@ -2176,15 +2115,15 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1443 12 BEGIN KEY "ven" - PROMPT 8 2 "" + PROMPT 8 1 "" PICTURE "########,@#" - MESSAGE ADD,1543 + MESSAGE _USER,VALIDATE_UM,1453|ADD,1543 GROUP 14 END NUMERO 1444 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "###.###.##@" MESSAGE ADD,1544 GROUP 14 FG_VALORI @@ -2192,7 +2131,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1484 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1444/#1443 GROUP FG_VALMEDI @@ -2200,15 +2139,15 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1445 12 BEGIN KEY "rim" - PROMPT 10 2 "" + PROMPT 10 1 "" PICTURE "########,@#" - MESSAGE ADD,1545 + MESSAGE _USER,VALIDATE_UM,1453|ADD,1545 GROUP 14 END NUMERO 1446 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "###.###.##@" MESSAGE ADD,1546 GROUP 14 FG_VALORI @@ -2216,7 +2155,7 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1486 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1446/#1445 GROUP FG_VALMEDI @@ -2224,54 +2163,50 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1447 12 BEGIN KEY "giac" - PROMPT 12 2 "" + PROMPT 12 1 "" PICTURE "########,@#" - MESSAGE ADD,1547 + MESSAGE _USER,VALIDATE_UM,1453|ADD,1547 GROUP 14 END END // tot gart1 END // GRUPPI_CATMER - SECTION TOT_CATMER 1 2 2 FOOTER + SECTION TOT_CATMER 1 1 1 FOOTER STRINGA 1551 8 2 BEGIN KEY "" - PROMPT 2 2 " Totale" + PROMPT 2 1 " Totale" END STRINGA 1550 34 2 BEGIN KEY "" - PROMPT 3 2 "" + PROMPT 3 1 "" END STRINGA 1553 3 BEGIN KEY "UM" - PROMPT 5 2 "" - END - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" + PROMPT 5 1 "" END NUMERO 1541 12 BEGIN KEY "ACQ" - PROMPT 6 2 "" + PROMPT 6 1 "" PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1553 GROUP 15 END NUMERO 1542 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "###.###.##@" GROUP 15 FG_VALORI END NUMERO 1582 12 BEGIN KEY "VALACQ" - PROMPT 7 2 "" + PROMPT 7 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1542/#1541 GROUP FG_VALMEDI @@ -2279,21 +2214,22 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1543 12 BEGIN KEY "ven" - PROMPT 8 2 "" + PROMPT 8 1 "" PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1553 GROUP 15 END NUMERO 1544 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "###.###.##@" GROUP 15 FG_VALORI END NUMERO 1584 12 BEGIN KEY "VALven" - PROMPT 9 2 "" + PROMPT 9 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1544/#1543 GROUP FG_VALMEDI @@ -2301,21 +2237,22 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1545 12 BEGIN KEY "rim" - PROMPT 10 2 "" + PROMPT 10 1 "" PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1553 GROUP 15 END NUMERO 1546 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "###.###.##@" GROUP 15 FG_VALORI END NUMERO 1586 12 BEGIN KEY "VALrim" - PROMPT 11 2 "" + PROMPT 11 1 "" PICTURE "#######,@##" MESSAGE _NUMEXPR,#1546/#1545 GROUP FG_VALMEDI @@ -2323,8 +2260,9 @@ SECTION BODY ODD 0 COLUMNWISE NUMERO 1547 12 BEGIN KEY "giac" - PROMPT 12 2 "" + PROMPT 12 1 "" PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1553 GROUP 15 END END // tot catmerc diff --git a/mg/mg3100b.frm b/mg/mg3100b.frm index 2c3226133..7c7b398e7 100755 --- a/mg/mg3100b.frm +++ b/mg/mg3100b.frm @@ -243,253 +243,247 @@ SECTION BODY ODD 0 COLUMNWISE MESSAGE ENABLE,BO->248 END - NUMBER FF_FLAGTOTQTA 1 - BEGIN - FLAG "H" - PROMPT 1 1 "" - END - - LIST FF_FLAGVALMEDI 1 - BEGIN - PROMPT 1 1 "" - FLAG "H" - KEY "FLAG VALORI MEDI" - ITEM "0|N" + LIST FF_FLAGVALMEDI 1 + BEGIN + PROMPT 1 1 "" + FLAG "H" + KEY "FLAG VALORI MEDI" + ITEM "0|N" MESSAGE SHOW,FG_VALORI@|DISABLE,FG_VALMEDI@ ITEM "1|Y" MESSAGE HIDE,FG_VALORI@|ENABLE,FG_VALMEDI@ END - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "MAGAZZ" - PROMPT 2 1 "" - MESSAGE RESET,1@ - END + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "MAGAZZ" + PROMPT 2 1 "" + MESSAGE RESET,1@|_USER,RESET_UM,153 + END SECTION H_MAGAZZINO 1 1 1 GROUP - STRINGA 60 40 1 - BEGIN - KEY "codice magazzino" - PROMPT 2 1 "Magazzino " - FIELD 500@->s0 - MESSAGE COPY,150 - END - END - - SECTION GRUPPI_MAGAZZINO 1 0 0 FILE 109 GROUP CODMAG[1,3] - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "dep" - PROMPT 2 1 "" - MESSAGE RESET,15@ - END + STRINGA 60 40 1 + BEGIN + KEY "codice magazzino" + PROMPT 2 1 "Magazzino " + FIELD 500@->s0 + MESSAGE COPY,150 + END + END + + SECTION GRUPPI_MAGAZZINO 1 0 0 FILE 109 GROUP CODMAG[1,3] + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "dep" + PROMPT 2 1 "" + MESSAGE RESET,15@|_USER,RESET_UM,53 + END SECTION H_DEPOSITO 1 1 1 GROUP - STRINGA 60 40 1 - BEGIN - KEY "codice magazzino" - PROMPT 2 1 "Deposito " - FIELD 501@->s0 - MESSAGE COPY,50 - END - END + STRINGA 60 40 1 + BEGIN + KEY "codice magazzino" + PROMPT 2 1 "Deposito " + FIELD 501@->s0 + MESSAGE COPY,50 + END + END - SECTION GRUPPI_DEPOSITO 1 0 0 FILE 109 GROUP CODMAG[1,5] - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "gcodart1" - PROMPT 2 1 "" - MESSAGE RESET,14@ - END + SECTION GRUPPI_DEPOSITO 1 0 0 FILE 109 GROUP CODMAG[1,5] + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "gcodart1" + PROMPT 2 1 "" + MESSAGE RESET,14@|_USER,RESET_UM,1453 + END SECTION H_GCODART1 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO1" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,1 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO1" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,1|COPY,1450 - END - END - - SECTION GRUPPI_CODART1 1 0 0 FILE 109 GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "" - PROMPT 2 1 "" - MESSAGE RESET,13@ - END + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO1" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,1 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO1" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,1|COPY,1450 + END + END + + SECTION GRUPPI_CODART1 1 0 0 FILE 109 GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "" + PROMPT 2 1 "" + MESSAGE RESET,13@|_USER,RESET_UM,1353 + END SECTION H_GCODART2 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,2 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,2|COPY,1350 - END - END - - SECTION GRUPPI_CODART2 1 0 0 FILE 109 GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,12@ - END + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,2 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,2|COPY,1350 + END + END + + SECTION GRUPPI_CODART2 1 0 0 FILE 109 GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,12@|_USER,RESET_UM,1253 + END SECTION H_GCODART3 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,3 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,3|COPY,1250 - END - END - - SECTION GRUPPI_CODART3 1 0 0 FILE 109 GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,11@ - END + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,3 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,3|COPY,1250 + END + END + + SECTION GRUPPI_CODART3 1 0 0 FILE 109 GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,11@|_USER,RESET_UM,1153 + END SECTION H_GCODART4 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,4 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,4|COPY,1150 - END - END - - SECTION GRUPPI_CODART4 1 0 0 FILE 109 GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,10@ - END + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,4 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,4|COPY,1150 + END + END + + SECTION GRUPPI_CODART4 1 0 0 FILE 109 GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,10@|_USER,RESET_UM,1053 + END SECTION H_GCODART5 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,5 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,5|COPY,1050 - END - END - - SECTION GRUPPI_CODART5 1 0 0 FILE 109 GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,9@ - END + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,5 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,5|COPY,1050 + END + END + + SECTION GRUPPI_CODART5 1 0 0 FILE 109 GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,9@|_USER,RESET_UM,953 + END SECTION H_GCODART6 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,6 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,6|COPY,950 - END - END - - SECTION GRUPPI_CODART6 1 0 0 FILE 109 GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,8@ - END + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,6 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,6|COPY,950 + END + END + + SECTION GRUPPI_CODART6 1 0 0 FILE 109 GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,8@|_USER,RESET_UM,853 + END SECTION H_GCODART7 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,7 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,7|COPY,850 - END - END - - SECTION GRUPPI_CODART7 1 0 0 FILE 109 GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,7@ - END - + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,7 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,7|COPY,850 + END + END + + SECTION GRUPPI_CODART7 1 0 0 FILE 109 GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,7@|_USER,RESET_UM,753 + END + SECTION H_GCODART8 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,8 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,8|COPY,750 - END - END - - SECTION GRUPPI_CODART8 1 0 0 FILE 109 GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,8 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,8|COPY,750 + END + END + + SECTION GRUPPI_CODART8 1 0 0 FILE 109 GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" MESSAGE RESET,6@ - END + END SECTION H_ARTICOLO 1 1 1 GROUP STRINGA 20 12 2 BEGIN @@ -710,1299 +704,1239 @@ SECTION BODY ODD 0 COLUMNWISE MESSAGE ADD,341 GROUP 2 FG_RIGAPREZZI END*/ - END // tot ggiac4 - - END // GGIAC3 - SECTION TOT_GLIVGIAC3 1 2 2 GROUP - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END - STRINGA 350 35 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 351 7 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 353 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,453 - END - NUMERO 341 12 - BEGIN - KEY "ACQ" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,441 - GROUP 3 - END - NUMERO 342 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,442 - GROUP 3 FG_VALORI - END - NUMERO 382 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#342/#341 - GROUP FG_VALMEDI - END - - NUMERO 343 12 - BEGIN - KEY "ven" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,443 - GROUP 3 - END - NUMERO 344 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,444 - GROUP 3 FG_VALORI - END - NUMERO 384 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#344/#343 - GROUP FG_VALMEDI - END - - NUMERO 345 12 - BEGIN - KEY "rim" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,445 - GROUP 3 - END - NUMERO 346 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,446 - GROUP 3 FG_VALORI - END - NUMERO 386 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#346/#345 - GROUP FG_VALMEDI - END - - NUMERO 347 12 - BEGIN - KEY "giac" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,447 - GROUP 3 - END - END // tot ggiac3 - - END // GGIAC2 - SECTION TOT_GLIVGIAC2 1 2 2 GROUP - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END - STRINGA 450 35 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 451 7 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 453 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,553 - END - NUMERO 441 12 - BEGIN - KEY "ACQ" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,541 - GROUP 4 - END - NUMERO 442 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,542 - GROUP 4 FG_VALORI - END - NUMERO 482 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#442/#441 - GROUP FG_VALMEDI - END - - NUMERO 443 12 - BEGIN - KEY "ven" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,543 - GROUP 4 - END - NUMERO 444 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,544 - GROUP 4 FG_VALORI - END - NUMERO 484 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#444/#443 - GROUP FG_VALMEDI - END - - NUMERO 445 12 - BEGIN - KEY "rim" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,545 - GROUP 4 - END - NUMERO 446 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,546 - GROUP 4 FG_VALORI - END - NUMERO 486 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#446/#445 - GROUP FG_VALMEDI - END - - NUMERO 447 12 - BEGIN - KEY "giac" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,547 - GROUP 4 - END - END // tot ggiac2 - END // GGIAC1 - SECTION TOT_GLIVGIAC1 1 2 2 GROUP - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END - STRINGA 550 35 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 551 7 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 553 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,653 - END - NUMERO 541 12 - BEGIN - KEY "ACQ" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,641 - GROUP 5 - END - NUMERO 542 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,642 - GROUP 5 FG_VALORI - END - NUMERO 582 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#542/#541 - GROUP FG_VALMEDI - END - - NUMERO 543 12 - BEGIN - KEY "ven" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,643 - GROUP 5 - END - NUMERO 544 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,644 - GROUP 5 FG_VALORI - END - NUMERO 584 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#544/#543 - GROUP FG_VALMEDI - END - - NUMERO 545 12 - BEGIN - KEY "rim" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,645 - GROUP 5 - END - NUMERO 546 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,646 - GROUP 5 FG_VALORI - END - NUMERO 586 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#546/#545 - GROUP FG_VALMEDI - END - - NUMERO 547 12 - BEGIN - KEY "giac" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,647 - GROUP 5 - END - END // tot ggiac1 - - END // FILE GIACENZE - SECTION TOT_ARTICOLO 1 2 2 GROUP - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END - STRINGA 650 30 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 651 12 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale art." - END - STRINGA 653 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,753 - END - NUMERO 641 12 - BEGIN - KEY "ACQ" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,741 - GROUP 6 - END - NUMERO 642 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,742 - GROUP 6 FG_VALORI FG_RIGAVALORI - END - NUMERO 682 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#642/#641 - GROUP FG_VALMEDI FG_RIGAVALORI - END - NUMERO 643 12 - BEGIN - KEY "ven" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,743 - GROUP 6 FG_RIGAVALORI - END - NUMERO 644 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,744 - GROUP 6 FG_VALORI FG_RIGAVALORI - END - NUMERO 684 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#644/#643 - GROUP FG_VALMEDI FG_RIGAVALORI - END - NUMERO 645 12 - BEGIN - KEY "rim" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,745 - GROUP 6 FG_RIGAVALORI - END - NUMERO 646 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,746 - GROUP 6 FG_VALORI FG_RIGAVALORI - END - NUMERO 686 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#646/#645 - GROUP FG_VALMEDI FG_RIGAVALORI - END - - NUMERO 647 12 - BEGIN - KEY "giac" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,747 - GROUP 6 FG_RIGAVALORI - END - NUMERO 648 12 - BEGIN - KEY "ULC" - PROMPT 7 2 "" - PICTURE "###.###.###" - GROUP 6 FG_RIGAPREZZI - END - NUMERO 649 12 - BEGIN - KEY "PREZZO" - PROMPT 8 2 "" - PICTURE "###.###.###" - GROUP 6 FG_RIGAPREZZI - END - END // TOT ART - - END // GART8 - SECTION TOT_GART8 1 2 2 GROUP - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END - STRINGA 750 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 751 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 753 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,853 - END - NUMERO 741 12 - BEGIN - KEY "ACQ" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#741|ADD,841 - GROUP 7 - END - NUMERO 742 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,842 - GROUP 7 FG_VALORI - END - NUMERO 782 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#742/#741 - GROUP FG_VALMEDI - END - - NUMERO 743 12 - BEGIN - KEY "ven" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#743|ADD,843 - GROUP 7 FG_RIGAVALORI - END - NUMERO 744 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,844 - GROUP 7 FG_VALORI - END - NUMERO 784 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#744/#743 - GROUP FG_VALMEDI - END - - NUMERO 745 12 - BEGIN - KEY "rim" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#745|ADD,845 - GROUP 7 - END - NUMERO 746 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,846 - GROUP 7 FG_VALORI - END - NUMERO 786 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#746/#745 - GROUP FG_VALMEDI - END - NUMERO 747 12 - BEGIN - KEY "giac" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#747|ADD,847 - GROUP 7 - END + END // tot ggiac4 + + END // GGIAC3 + SECTION TOT_GLIVGIAC3 1 1 1 GROUP + STRINGA 350 35 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 351 7 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 353 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE COPY,453 + END + NUMERO 341 12 + BEGIN + KEY "ACQ" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE ADD,441 + GROUP 3 + END + NUMERO 342 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,442 + GROUP 3 FG_VALORI + END + NUMERO 382 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#342/#341 + GROUP FG_VALMEDI + END + + NUMERO 343 12 + BEGIN + KEY "ven" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE ADD,443 + GROUP 3 + END + NUMERO 344 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,444 + GROUP 3 FG_VALORI + END + NUMERO 384 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#344/#343 + GROUP FG_VALMEDI + END + + NUMERO 345 12 + BEGIN + KEY "rim" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE ADD,445 + GROUP 3 + END + NUMERO 346 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,446 + GROUP 3 FG_VALORI + END + NUMERO 386 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#346/#345 + GROUP FG_VALMEDI + END + + NUMERO 347 12 + BEGIN + KEY "giac" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE ADD,447 + GROUP 3 + END + END // tot ggiac3 + + END // GGIAC2 + SECTION TOT_GLIVGIAC2 1 1 1 GROUP + STRINGA 450 35 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 451 7 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 453 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE COPY,553 + END + NUMERO 441 12 + BEGIN + KEY "ACQ" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE ADD,541 + GROUP 4 + END + NUMERO 442 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,542 + GROUP 4 FG_VALORI + END + NUMERO 482 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#442/#441 + GROUP FG_VALMEDI + END + + NUMERO 443 12 + BEGIN + KEY "ven" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE ADD,543 + GROUP 4 + END + NUMERO 444 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,544 + GROUP 4 FG_VALORI + END + NUMERO 484 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#444/#443 + GROUP FG_VALMEDI + END + + NUMERO 445 12 + BEGIN + KEY "rim" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE ADD,545 + GROUP 4 + END + NUMERO 446 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,546 + GROUP 4 FG_VALORI + END + NUMERO 486 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#446/#445 + GROUP FG_VALMEDI + END + + NUMERO 447 12 + BEGIN + KEY "giac" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE ADD,547 + GROUP 4 + END + END // tot ggiac2 + END // GGIAC1 + SECTION TOT_GLIVGIAC1 1 1 1 GROUP + STRINGA 550 35 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 551 7 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 553 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE COPY,653 + END + NUMERO 541 12 + BEGIN + KEY "ACQ" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE ADD,641 + GROUP 5 + END + NUMERO 542 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,642 + GROUP 5 FG_VALORI + END + NUMERO 582 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#542/#541 + GROUP FG_VALMEDI + END + + NUMERO 543 12 + BEGIN + KEY "ven" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE ADD,643 + GROUP 5 + END + NUMERO 544 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,644 + GROUP 5 FG_VALORI + END + NUMERO 584 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#544/#543 + GROUP FG_VALMEDI + END + + NUMERO 545 12 + BEGIN + KEY "rim" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE ADD,645 + GROUP 5 + END + NUMERO 546 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,646 + GROUP 5 FG_VALORI + END + NUMERO 586 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#546/#545 + GROUP FG_VALMEDI + END + + NUMERO 547 12 + BEGIN + KEY "giac" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE ADD,647 + GROUP 5 + END + END // tot ggiac1 + + END // FILE GIACENZE + SECTION TOT_ARTICOLO 1 1 1 GROUP + STRINGA 650 30 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 651 12 2 + BEGIN + KEY "" + PROMPT 2 1 "Articolo " + END + STRINGA 653 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,753 + END + NUMERO 641 12 + BEGIN + KEY "ACQ" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE ADD,741 + GROUP 6 + END + NUMERO 642 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,742 + GROUP 6 FG_VALORI FG_RIGAVALORI + END + NUMERO 682 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#642/#641 + GROUP FG_VALMEDI FG_RIGAVALORI + END + NUMERO 643 12 + BEGIN + KEY "ven" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE ADD,743 + GROUP 6 FG_RIGAVALORI + END + NUMERO 644 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,744 + GROUP 6 FG_VALORI FG_RIGAVALORI + END + NUMERO 684 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#644/#643 + GROUP FG_VALMEDI FG_RIGAVALORI + END + NUMERO 645 12 + BEGIN + KEY "rim" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE ADD,745 + GROUP 6 FG_RIGAVALORI + END + NUMERO 646 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,746 + GROUP 6 FG_VALORI FG_RIGAVALORI + END + NUMERO 686 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#646/#645 + GROUP FG_VALMEDI FG_RIGAVALORI + END + + NUMERO 647 12 + BEGIN + KEY "giac" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE ADD,747 + GROUP 6 FG_RIGAVALORI + END + NUMERO 648 12 + BEGIN + KEY "ULC" + PROMPT 7 1 "" + PICTURE "###.###.###" + GROUP 6 FG_RIGAPREZZI + END + NUMERO 649 12 + BEGIN + KEY "PREZZO" + PROMPT 8 1 "" + PICTURE "###.###.###" + GROUP 6 FG_RIGAPREZZI + END + END // TOT ART + + END // GART8 + SECTION TOT_GART8 1 1 1 GROUP + STRINGA 750 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 751 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 753 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,853 + END + NUMERO 741 12 + BEGIN + KEY "ACQ" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,841 + GROUP 7 + END + NUMERO 742 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,842 + GROUP 7 FG_VALORI + END + NUMERO 782 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#742/#741 + GROUP FG_VALMEDI + END + + NUMERO 743 12 + BEGIN + KEY "ven" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,843 + GROUP 7 FG_RIGAVALORI + END + NUMERO 744 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,844 + GROUP 7 FG_VALORI + END + NUMERO 784 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#744/#743 + GROUP FG_VALMEDI + END + + NUMERO 745 12 + BEGIN + KEY "rim" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,845 + GROUP 7 + END + NUMERO 746 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,846 + GROUP 7 FG_VALORI + END + NUMERO 786 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#746/#745 + GROUP FG_VALMEDI + END + NUMERO 747 12 + BEGIN + KEY "giac" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,847 + GROUP 7 + END - END // tot gart8 - - END // GART7 - SECTION TOT_GART7 1 2 2 GROUP - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END - STRINGA 850 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 851 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 853 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,953 - END - NUMERO 841 12 - BEGIN - KEY "ACQ" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,941 - GROUP 8 - END - NUMERO 842 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,942 - GROUP 8 FG_VALORI - END - NUMERO 882 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#842/#841 - GROUP FG_VALMEDI - END - - NUMERO 843 12 - BEGIN - KEY "ven" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,943 - GROUP 8 - END - NUMERO 844 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,944 - GROUP 8 FG_VALORI - END - NUMERO 884 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#844/#843 - GROUP FG_VALMEDI - END - - NUMERO 845 12 - BEGIN - KEY "rim" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,945 - GROUP 8 - END - NUMERO 846 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,946 - GROUP 8 FG_VALORI - END - NUMERO 886 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#846/#845 - GROUP FG_VALMEDI - END - - NUMERO 847 12 - BEGIN - KEY "giac" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,947 - GROUP 8 - END - END // tot gart7 - - END // GART6 - SECTION TOT_GART6 1 2 2 GROUP - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END - STRINGA 950 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 951 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 953 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1053 - END - NUMERO 941 12 - BEGIN - KEY "ACQ" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,1041 - GROUP 9 - END - NUMERO 942 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1042 - GROUP 9 FG_VALORI - END - NUMERO 982 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#942/#941 - GROUP FG_VALMEDI - END - - NUMERO 943 12 - BEGIN - KEY "ven" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,1043 - GROUP 9 - END - NUMERO 944 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1044 - GROUP 9 FG_VALORI - END - NUMERO 984 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#944/#943 - GROUP FG_VALMEDI - END - - NUMERO 945 12 - BEGIN - KEY "rim" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,1045 - GROUP 9 - END - NUMERO 946 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1046 - GROUP 9 FG_VALORI - END - NUMERO 986 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#946/#945 - GROUP FG_VALMEDI - END - - NUMERO 947 12 - BEGIN - KEY "giac" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,1047 - GROUP 9 - END - END // tot gart6 - - END // GART5 - SECTION TOT_GART5 1 2 2 GROUP - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END - STRINGA 1050 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1051 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1053 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1153 - END - NUMERO 1041 12 - BEGIN - KEY "ACQ" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,1141 - GROUP 10 - END - NUMERO 1042 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1142 - GROUP 10 FG_VALORI - END - NUMERO 1082 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#1042/#1041 - GROUP FG_VALMEDI - END - NUMERO 1043 12 - BEGIN - KEY "ven" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,1143 - GROUP 10 - END - NUMERO 1044 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1144 - GROUP 10 FG_VALORI - END - NUMERO 1084 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#1044/#1043 - GROUP FG_VALMEDI - END - NUMERO 1045 12 - BEGIN - KEY "rim" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,1145 - GROUP 10 - END - NUMERO 1046 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1146 - GROUP 10 FG_VALORI - END - NUMERO 1086 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#1046/#1045 - GROUP FG_VALMEDI - END - NUMERO 1047 12 - BEGIN - KEY "giac" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,1147 - GROUP 10 - END - END // tot gart5 - - END // GART4 - SECTION TOT_GART4 1 2 2 GROUP - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END - STRINGA 1150 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1151 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1153 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1253 - END - NUMERO 1141 12 - BEGIN - KEY "ACQ" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,1241 - GROUP 11 - END - NUMERO 1142 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1242 - GROUP 11 FG_VALORI - END - NUMERO 1182 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#1142/#1141 - GROUP FG_VALMEDI - END - NUMERO 1143 12 - BEGIN - KEY "ven" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,1243 - GROUP 11 - END - NUMERO 1144 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1244 - GROUP 11 FG_VALORI - END - NUMERO 1184 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#1144/#1143 - GROUP FG_VALMEDI - END - NUMERO 1145 12 - BEGIN - KEY "rim" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,1245 - GROUP 11 - END - NUMERO 1146 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1246 - GROUP 11 FG_VALORI - END - NUMERO 1186 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#1146/#1145 - GROUP FG_VALMEDI - END - NUMERO 1147 12 - BEGIN - KEY "giac" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,1247 - GROUP 11 - END - END // tot gart4 - - END // GART3 - SECTION TOT_GART3 1 2 2 GROUP - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END - STRINGA 1250 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1251 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1253 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1353 - END - NUMERO 1241 12 - BEGIN - KEY "ACQ" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,1341 - GROUP 12 - END - NUMERO 1242 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1342 - GROUP 12 FG_VALORI - END - NUMERO 1282 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#1242/#1241 - GROUP FG_VALMEDI - END - NUMERO 1243 12 - BEGIN - KEY "ven" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,1343 - GROUP 12 - END - NUMERO 1244 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1344 - GROUP 12 FG_VALORI - END - NUMERO 1284 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#1244/#1243 - GROUP FG_VALMEDI - END - NUMERO 1245 12 - BEGIN - KEY "rim" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,1345 - GROUP 12 - END - NUMERO 1246 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1346 - GROUP 12 FG_VALORI - END - NUMERO 1286 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#1246/#1245 - GROUP FG_VALMEDI - END - NUMERO 1247 12 - BEGIN - KEY "giac" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,1347 - GROUP 12 - END - END // tot gart3 - - END // GART2 - SECTION TOT_GART2 1 2 2 GROUP - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END - STRINGA 1350 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1351 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1353 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1453 - END - NUMERO 1341 12 - BEGIN - KEY "ACQ" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,1441 - GROUP 13 - END - NUMERO 1342 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1442 - GROUP 13 FG_VALORI - END - NUMERO 1382 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#1342/#1341 - GROUP FG_VALMEDI - END - NUMERO 1343 12 - BEGIN - KEY "ven" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,1443 - GROUP 13 - END - NUMERO 1344 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1444 - GROUP 13 FG_VALORI - END - NUMERO 1384 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#1344/#1343 - GROUP FG_VALMEDI - END - NUMERO 1345 12 - BEGIN - KEY "rim" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,1445 - GROUP 13 - END - NUMERO 1346 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1446 - GROUP 13 FG_VALORI - END - NUMERO 1386 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#1346/#1345 - GROUP FG_VALMEDI - END - NUMERO 1347 12 - BEGIN - KEY "giac" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,1447 - GROUP 13 - END - END // tot gart2 - - END // GART1 - SECTION TOT_GART1 1 2 2 GROUP - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END - STRINGA 1450 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1451 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1453 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,53 - END - NUMERO 1441 12 - BEGIN - KEY "ACQ" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,41 - GROUP 14 - END - NUMERO 1442 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,42 - GROUP 14 FG_VALORI - END - NUMERO 1482 12 - BEGIN - KEY "VALACQ" - PROMPT 7 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#1442/#1441 - GROUP FG_VALMEDI - END - NUMERO 1443 12 - BEGIN - KEY "ven" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,43 - GROUP 14 - END - NUMERO 1444 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,44 - GROUP 14 FG_VALORI - END - NUMERO 1484 12 - BEGIN - KEY "VALven" - PROMPT 9 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#1444/#1443 - GROUP FG_VALMEDI - END - NUMERO 1445 12 - BEGIN - KEY "rim" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,45 - GROUP 14 - END - NUMERO 1446 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,46 - GROUP 14 FG_VALORI - END - NUMERO 1486 12 - BEGIN - KEY "VALrim" - PROMPT 11 2 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#1446/#1445 - GROUP FG_VALMEDI - END - NUMERO 1447 12 - BEGIN - KEY "giac" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,47 - GROUP 14 - END - END // tot gart1 + END // tot gart8 + + END // GART7 + SECTION TOT_GART7 1 1 1 GROUP + STRINGA 850 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 851 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 853 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,953 + END + NUMERO 841 12 + BEGIN + KEY "ACQ" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,941 + GROUP 8 + END + NUMERO 842 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,942 + GROUP 8 FG_VALORI + END + NUMERO 882 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#842/#841 + GROUP FG_VALMEDI + END + + NUMERO 843 12 + BEGIN + KEY "ven" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,943 + GROUP 8 + END + NUMERO 844 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,944 + GROUP 8 FG_VALORI + END + NUMERO 884 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#844/#843 + GROUP FG_VALMEDI + END + + NUMERO 845 12 + BEGIN + KEY "rim" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,945 + GROUP 8 + END + NUMERO 846 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,946 + GROUP 8 FG_VALORI + END + NUMERO 886 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#846/#845 + GROUP FG_VALMEDI + END + + NUMERO 847 12 + BEGIN + KEY "giac" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,947 + GROUP 8 + END + END // tot gart7 + + END // GART6 + SECTION TOT_GART6 1 1 1 GROUP + STRINGA 950 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 951 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 953 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1053 + END + NUMERO 941 12 + BEGIN + KEY "ACQ" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1041 + GROUP 9 + END + NUMERO 942 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1042 + GROUP 9 FG_VALORI + END + NUMERO 982 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#942/#941 + GROUP FG_VALMEDI + END + + NUMERO 943 12 + BEGIN + KEY "ven" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1043 + GROUP 9 + END + NUMERO 944 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1044 + GROUP 9 FG_VALORI + END + NUMERO 984 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#944/#943 + GROUP FG_VALMEDI + END + + NUMERO 945 12 + BEGIN + KEY "rim" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1045 + GROUP 9 + END + NUMERO 946 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1046 + GROUP 9 FG_VALORI + END + NUMERO 986 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#946/#945 + GROUP FG_VALMEDI + END + + NUMERO 947 12 + BEGIN + KEY "giac" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1047 + GROUP 9 + END + END // tot gart6 + + END // GART5 + SECTION TOT_GART5 1 1 1 GROUP + STRINGA 1050 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1051 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1053 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1153 + END + NUMERO 1041 12 + BEGIN + KEY "ACQ" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1141 + GROUP 10 + END + NUMERO 1042 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1142 + GROUP 10 FG_VALORI + END + NUMERO 1082 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#1042/#1041 + GROUP FG_VALMEDI + END + NUMERO 1043 12 + BEGIN + KEY "ven" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1143 + GROUP 10 + END + NUMERO 1044 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1144 + GROUP 10 FG_VALORI + END + NUMERO 1084 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#1044/#1043 + GROUP FG_VALMEDI + END + NUMERO 1045 12 + BEGIN + KEY "rim" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1145 + GROUP 10 + END + NUMERO 1046 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1146 + GROUP 10 FG_VALORI + END + NUMERO 1086 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#1046/#1045 + GROUP FG_VALMEDI + END + NUMERO 1047 12 + BEGIN + KEY "giac" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1147 + GROUP 10 + END + END // tot gart5 + + END // GART4 + SECTION TOT_GART4 1 1 1 GROUP + STRINGA 1150 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1151 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1153 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1253 + END + NUMERO 1141 12 + BEGIN + KEY "ACQ" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1241 + GROUP 11 + END + NUMERO 1142 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1242 + GROUP 11 FG_VALORI + END + NUMERO 1182 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#1142/#1141 + GROUP FG_VALMEDI + END + NUMERO 1143 12 + BEGIN + KEY "ven" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1243 + GROUP 11 + END + NUMERO 1144 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1244 + GROUP 11 FG_VALORI + END + NUMERO 1184 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#1144/#1143 + GROUP FG_VALMEDI + END + NUMERO 1145 12 + BEGIN + KEY "rim" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1245 + GROUP 11 + END + NUMERO 1146 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1246 + GROUP 11 FG_VALORI + END + NUMERO 1186 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#1146/#1145 + GROUP FG_VALMEDI + END + NUMERO 1147 12 + BEGIN + KEY "giac" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1247 + GROUP 11 + END + END // tot gart4 + + END // GART3 + SECTION TOT_GART3 1 1 1 GROUP + STRINGA 1250 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1251 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1253 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1353 + END + NUMERO 1241 12 + BEGIN + KEY "ACQ" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1341 + GROUP 12 + END + NUMERO 1242 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1342 + GROUP 12 FG_VALORI + END + NUMERO 1282 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#1242/#1241 + GROUP FG_VALMEDI + END + NUMERO 1243 12 + BEGIN + KEY "ven" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1343 + GROUP 12 + END + NUMERO 1244 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1344 + GROUP 12 FG_VALORI + END + NUMERO 1284 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#1244/#1243 + GROUP FG_VALMEDI + END + NUMERO 1245 12 + BEGIN + KEY "rim" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1345 + GROUP 12 + END + NUMERO 1246 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1346 + GROUP 12 FG_VALORI + END + NUMERO 1286 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#1246/#1245 + GROUP FG_VALMEDI + END + NUMERO 1247 12 + BEGIN + KEY "giac" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1347 + GROUP 12 + END + END // tot gart3 + + END // GART2 + SECTION TOT_GART2 1 1 1 GROUP + STRINGA 1350 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1351 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1353 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1453 + END + NUMERO 1341 12 + BEGIN + KEY "ACQ" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1441 + GROUP 13 + END + NUMERO 1342 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1442 + GROUP 13 FG_VALORI + END + NUMERO 1382 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#1342/#1341 + GROUP FG_VALMEDI + END + NUMERO 1343 12 + BEGIN + KEY "ven" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1443 + GROUP 13 + END + NUMERO 1344 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1444 + GROUP 13 FG_VALORI + END + NUMERO 1384 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#1344/#1343 + GROUP FG_VALMEDI + END + NUMERO 1345 12 + BEGIN + KEY "rim" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1445 + GROUP 13 + END + NUMERO 1346 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1446 + GROUP 13 FG_VALORI + END + NUMERO 1386 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#1346/#1345 + GROUP FG_VALMEDI + END + NUMERO 1347 12 + BEGIN + KEY "giac" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1447 + GROUP 13 + END + END // tot gart2 + + END // GART1 + SECTION TOT_GART1 1 1 1 GROUP + STRINGA 1450 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1451 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1453 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,53 + END + NUMERO 1441 12 + BEGIN + KEY "ACQ" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,41 + GROUP 14 + END + NUMERO 1442 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,42 + GROUP 14 FG_VALORI + END + NUMERO 1482 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#1442/#1441 + GROUP FG_VALMEDI + END + NUMERO 1443 12 + BEGIN + KEY "ven" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,43 + GROUP 14 + END + NUMERO 1444 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,44 + GROUP 14 FG_VALORI + END + NUMERO 1484 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#1444/#1443 + GROUP FG_VALMEDI + END + NUMERO 1445 12 + BEGIN + KEY "rim" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,45 + GROUP 14 + END + NUMERO 1446 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,46 + GROUP 14 FG_VALORI + END + NUMERO 1486 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#1446/#1445 + GROUP FG_VALMEDI + END + NUMERO 1447 12 + BEGIN + KEY "giac" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,47 + GROUP 14 + END + END // tot gart1 END // GRUPPI DEPOSITO @@ -2012,107 +1946,107 @@ SECTION BODY ODD 0 COLUMNWISE BEGIN KEY "giac" PROMPT 6 1 "-------------------------------------------------------------------------------------------------" - END - END - STRINGA 51 12 - BEGIN - KEY "CODICE" - PROMPT 2 1 " Totale dep." - END - STRINGA 50 30 - BEGIN - KEY "descr" - PROMPT 3 1 "" - END - STRINGA 53 3 - BEGIN - KEY "UM" - PROMPT 5 1 "" - MESSAGE COPY,153 - END - NUMERO 41 12 - BEGIN - KEY "ACQ" - PROMPT 6 1 "" - PICTURE "########,@#" - MESSAGE ADD,141 - GROUP 15 - END - NUMERO 42 12 - BEGIN - KEY "VALACQ" - PROMPT 7 1 "" - PICTURE "###.###.##@" - MESSAGE ADD,142 - GROUP 15 FG_VALORI - END - NUMERO 82 12 - BEGIN - KEY "VALACQ" - PROMPT 7 1 "" - PICTURE "#######,@##" + END + END + STRINGA 51 12 + BEGIN + KEY "CODICE" + PROMPT 2 1 "Totale dep. " + END + STRINGA 50 30 + BEGIN + KEY "descr" + PROMPT 3 1 "" + END + STRINGA 53 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,153 + END + NUMERO 41 12 + BEGIN + KEY "ACQ" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,53|ADD,141 + GROUP 15 + END + NUMERO 42 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,142 + GROUP 15 FG_VALORI + END + NUMERO 82 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "#######,@##" MESSAGE _NUMEXPR,#42/#41 GROUP 15 FG_VALMEDI - END - NUMERO 43 12 - BEGIN - KEY "VEN" - PROMPT 8 1 "" - PICTURE "########,@#" - MESSAGE ADD,143 - GROUP 15 - END - NUMERO 44 12 - BEGIN - KEY "VALV" - PROMPT 9 1 "" - PICTURE "###.###.##@" - MESSAGE ADD,144 - GROUP 15 FG_VALORI - END - NUMERO 84 12 - BEGIN - KEY "VALV" - PROMPT 9 1 "" - PICTURE "#######,@##" + END + NUMERO 43 12 + BEGIN + KEY "VEN" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,53|ADD,143 + GROUP 15 + END + NUMERO 44 12 + BEGIN + KEY "VALV" + PROMPT 9 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,144 + GROUP 15 FG_VALORI + END + NUMERO 84 12 + BEGIN + KEY "VALV" + PROMPT 9 1 "" + PICTURE "#######,@##" MESSAGE _NUMEXPR,#44/#43 GROUP 15 FG_VALMEDI - END - NUMERO 45 12 - BEGIN - KEY "RIM" - PROMPT 10 1 "" - PICTURE "########,@#" - MESSAGE ADD,145 - GROUP 15 - END - NUMERO 46 12 - BEGIN - KEY "VALrim" - PROMPT 11 1 "" - PICTURE "###.###.##@" - MESSAGE ADD,146 - GROUP 15 FG_VALORI - END - NUMERO 86 12 - BEGIN - KEY "VALrim" - PROMPT 11 1 "" - PICTURE "#######,@##" + END + NUMERO 45 12 + BEGIN + KEY "RIM" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,53|ADD,145 + GROUP 15 + END + NUMERO 46 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,146 + GROUP 15 FG_VALORI + END + NUMERO 86 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "#######,@##" MESSAGE _NUMEXPR,#46/#45 GROUP 15 FG_VALMEDI - END - NUMERO 47 12 - BEGIN - KEY "giac" - PROMPT 12 1 "" - PICTURE "#######@,@#" - MESSAGE ADD,147 - GROUP 15 - END - END // tot depositi - END // MAGAZZ - + END + NUMERO 47 12 + BEGIN + KEY "giac" + PROMPT 12 1 "" + PICTURE "#######@,@#" + MESSAGE _USER,VALIDATE_UM,53|ADD,147 + GROUP 15 + END + END // tot depositi + END // MAGAZZ + SECTION TOT_MAGAZZINO 1 1 1 GROUP SECTION SEP_MAGAZZINO 1 1 1 GROUP STRINGA 77 @@ -2141,75 +2075,79 @@ SECTION BODY ODD 0 COLUMNWISE KEY "ACQ" PROMPT 6 1 "" PICTURE "########,@#" - GROUP 1 - END - NUMERO 142 12 - BEGIN - KEY "VALACQ" - PROMPT 7 1 "" - PICTURE "###.###.##@" - GROUP 1 FG_VALORI - END - NUMERO 182 12 - BEGIN - KEY "VALACQ" - PROMPT 7 1 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#142/#141 - GROUP FG_VALMEDI - END - NUMERO 143 12 - BEGIN - KEY "ven" - PROMPT 8 1 "" + MESSAGE _USER,VALIDATE_UM,153 + GROUP 1 + END + NUMERO 142 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "###.###.##@" + GROUP 1 FG_VALORI + END + NUMERO 182 12 + BEGIN + KEY "VALACQ" + PROMPT 7 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#142/#141 + GROUP FG_VALMEDI + END + NUMERO 143 12 + BEGIN + KEY "ven" + PROMPT 8 1 "" PICTURE "########,@#" - GROUP 1 - END - NUMERO 144 12 - BEGIN - KEY "VALven" - PROMPT 9 1 "" - PICTURE "###.###.##@" - GROUP 1 FG_VALORI - END - NUMERO 184 12 - BEGIN - KEY "VALven" - PROMPT 9 1 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#144/#143 - GROUP FG_VALMEDI - END - NUMERO 145 12 - BEGIN - KEY "rim" - PROMPT 10 1 "" + MESSAGE _USER,VALIDATE_UM,153 + GROUP 1 + END + NUMERO 144 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "###.###.##@" + GROUP 1 FG_VALORI + END + NUMERO 184 12 + BEGIN + KEY "VALven" + PROMPT 9 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#144/#143 + GROUP FG_VALMEDI + END + NUMERO 145 12 + BEGIN + KEY "rim" + PROMPT 10 1 "" PICTURE "########,@#" - GROUP 1 - END - NUMERO 146 12 - BEGIN - KEY "VALrim" - PROMPT 11 1 "" - PICTURE "###.###.##@" - GROUP 1 FG_VALORI - END - NUMERO 186 12 - BEGIN - KEY "VALrim" - PROMPT 11 1 "" - PICTURE "#######,@##" - MESSAGE _NUMEXPR,#146/#145 - GROUP FG_VALMEDI - END - NUMERO 147 12 - BEGIN - KEY "giac" - PROMPT 12 1 "" + MESSAGE _USER,VALIDATE_UM,153 + GROUP 1 + END + NUMERO 146 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "###.###.##@" + GROUP 1 FG_VALORI + END + NUMERO 186 12 + BEGIN + KEY "VALrim" + PROMPT 11 1 "" + PICTURE "#######,@##" + MESSAGE _NUMEXPR,#146/#145 + GROUP FG_VALMEDI + END + NUMERO 147 12 + BEGIN + KEY "giac" + PROMPT 12 1 "" PICTURE "########,@#" - GROUP 1 - END - END // tot magazz + MESSAGE _USER,VALIDATE_UM,153 + GROUP 1 + END + END // tot magazz END // section body, loop anamag diff --git a/mg/mg3200a.frm b/mg/mg3200a.frm index 1e418b359..0e4f89151 100755 --- a/mg/mg3200a.frm +++ b/mg/mg3200a.frm @@ -136,246 +136,246 @@ SECTION BODY ODD 0 COLUMNWISE END SECTION H_CATMER 1 1 2 HEADER - STRINGA 11 12 2 - BEGIN - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE _USER,CODCATMER - END - STRINGA 12 30 2 - BEGIN - KEY "CODICE CATMER" - PROMPT 3 1 "" - MESSAGE _USER,CATMER|COPY,1550 - END - END + STRINGA 11 12 2 + BEGIN + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE _USER,CODCATMER + END + STRINGA 12 30 2 + BEGIN + KEY "CODICE CATMER" + PROMPT 3 1 "" + MESSAGE _USER,CATMER|COPY,1550 + END + END - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,15@ - END + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,15@|_USER,RESET_UM,1553 + END SECTION GRUPPI_CATMER 1 0 0 FILE 47 GROUP GRMERC - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,14@ - END + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,14@|_USER,RESET_UM,1453 + END SECTION H_GCODART1 1 1 1 HEADER - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,1 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,1|COPY,1450 - END - END + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,1 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,1|COPY,1450 + END + END - SECTION GRUPPI_CODART1 1 0 0 FILE LF_ANAMAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,13@ - END + SECTION GRUPPI_CODART1 1 0 0 FILE LF_ANAMAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,13@|_USER,RESET_UM,1353 + END SECTION H_GCODART2 1 1 1 HEADER - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,2 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,2|COPY,1350 - END - END + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,2 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,2|COPY,1350 + END + END - SECTION GRUPPI_CODART2 1 0 0 FILE LF_ANAMAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,12@ - END + SECTION GRUPPI_CODART2 1 0 0 FILE LF_ANAMAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,12@|_USER,RESET_UM,1253 + END SECTION H_GCODART3 1 1 1 HEADER - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,3 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,3|COPY,1250 - END - END + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,3 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,3|COPY,1250 + END + END - SECTION GRUPPI_CODART3 1 0 0 FILE LF_ANAMAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,11@ - END + SECTION GRUPPI_CODART3 1 0 0 FILE LF_ANAMAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,11@|_USER,RESET_UM,1153 + END SECTION H_GCODART4 1 1 1 HEADER - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,4 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,4|COPY,1150 - END - END + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,4 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,4|COPY,1150 + END + END - SECTION GRUPPI_CODART4 1 0 0 FILE LF_ANAMAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,10@ - END + SECTION GRUPPI_CODART4 1 0 0 FILE LF_ANAMAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,10@|_USER,RESET_UM,1053 + END SECTION H_GCODART5 1 1 1 HEADER - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,5 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,5|COPY,1050 - END - END + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,5 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,5|COPY,1050 + END + END - SECTION GRUPPI_CODART5 1 0 0 FILE LF_ANAMAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,9@ - END + SECTION GRUPPI_CODART5 1 0 0 FILE LF_ANAMAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,9@|_USER,RESET_UM,953 + END SECTION H_GCODART6 1 1 2 HEADER - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,6 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,6|COPY,950 - END - END + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,6 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,6|COPY,950 + END + END - SECTION GRUPPI_CODART6 1 0 0 FILE LF_ANAMAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,8@ - END + SECTION GRUPPI_CODART6 1 0 0 FILE LF_ANAMAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,8@|_USER,RESET_UM,853 + END SECTION H_GCODART7 1 1 1 HEADER - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,7 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,7|COPY,850 - END - END + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,7 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,7|COPY,850 + END + END - SECTION GRUPPI_CODART7 1 0 0 FILE LF_ANAMAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,7@ - END + SECTION GRUPPI_CODART7 1 0 0 FILE LF_ANAMAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,7@|_USER,RESET_UM,753 + END SECTION H_GCODART8 1 1 1 HEADER - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,8 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,8|COPY,750 - END - END + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,8 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,8|COPY,750 + END + END - SECTION GRUPPI_CODART8 1 0 0 FILE LF_ANAMAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" + SECTION GRUPPI_CODART8 1 0 0 FILE LF_ANAMAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" MESSAGE RESET,6@ - END + END SECTION H_ARTICOLO 1 1 1 HEADER - STRINGA 2020 12 2 - BEGIN - KEY "CODICE articolo" - PROMPT 2 1 "" - FIELD CODART - END - STRINGA 21 30 2 - BEGIN - KEY "DESCR.articolo" - PROMPT 3 1 "" - FIELD LF_ANAMAG->DESCR - MESSAGE COPY,650 - END - END + STRINGA 2020 12 2 + BEGIN + KEY "CODICE articolo" + PROMPT 2 1 "" + FIELD CODART + END + STRINGA 21 30 2 + BEGIN + KEY "DESCR.articolo" + PROMPT 3 1 "" + FIELD LF_ANAMAG->DESCR + MESSAGE COPY,650 + END + END - SECTION FILE_GIACENZE 1 1 0 FILE LF_MAG - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" + SECTION FILE_GIACENZE 1 1 0 FILE LF_MAG + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" MESSAGE RESET,5@ - END + END SECTION H_GLIVGIAC1 1 1 1 HEADER STRINGA 31 50 1 BEGIN @@ -550,1323 +550,1262 @@ SECTION BODY ODD 0 COLUMNWISE END // MAGAZZ SECTION TOT_MAGAZZINO 1 1 1 GROUP - STRINGA 150 30 1 - BEGIN - KEY "Magazzino" - PROMPT 3 1 "" - END - STRINGA 151 12 1 - BEGIN - KEY "Magazzino" - PROMPT 2 1 " Totale mag." - END - STRINGA 153 3 - BEGIN - KEY "UM" - PROMPT 5 1 "" - FIELD LF_UMART->UM - END - NUMERO 141 11 - BEGIN - KEY "GIAC" - PROMPT 6 1 "" - PICTURE "########,@#" - MESSAGE ADD,241 - GROUP 1 - END - NUMERO 142 11 - BEGIN - KEY "ORDF" - PROMPT 7 1 "" - PICTURE "########,@#" - MESSAGE ADD,242 - GROUP 1 25 - END - NUMERO 143 11 - BEGIN - KEY "ORDC" - PROMPT 8 1 "" - PICTURE "########,@#" - MESSAGE ADD,243 - GROUP 1 - END - NUMERO 144 11 - BEGIN - KEY "ACL" - PROMPT 9 1 "" - PICTURE "########,@#" - MESSAGE ADD,244 - GROUP 1 25 - END - NUMERO 145 11 - BEGIN - KEY "INCL" - PROMPT 10 1 "" - PICTURE "########,@#" - MESSAGE ADD,245 - GROUP 1 - END - NUMERO 146 11 - BEGIN - KEY "PRODF" - PROMPT 11 1 "" - PICTURE "########,@#" - MESSAGE ADD,246 - GROUP 1 25 - END - NUMERO 147 11 - BEGIN - KEY "PRODC" - PROMPT 12 1 "" - PICTURE "########,@#" - MESSAGE ADD,247 - GROUP 1 - END - NUMERO 148 11 - BEGIN - KEY "DISP" - PROMPT 13 1 "" - PICTURE "########,@#" - MESSAGE ADD,248 - GROUP 1 - END - END // tot magazz - - END // GGIAC4 - SECTION TOT_GLIVGIAC4 1 2 2 GROUP - STRINGA 277 - BEGIN - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 250 35 2 - BEGIN - PROMPT 3 2 "" - END - STRINGA 251 7 2 - BEGIN - KEY "Livello giac4" - PROMPT 2 2 " Totale" - END - STRINGA 253 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - FIELD LF_UMART->UM - END - NUMERO 241 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,341 - GROUP 2 - END - NUMERO 242 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,342 - GROUP 2 25 - END - NUMERO 243 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,343 - GROUP 2 - END - NUMERO 244 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,344 - GROUP 2 25 - END - NUMERO 245 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,345 - GROUP 2 - END - NUMERO 246 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,346 - GROUP 2 25 - END - NUMERO 247 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,347 - GROUP 2 - END - NUMERO 248 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,348 - GROUP 2 - END - END // tot ggiac4 - - END // GGIAC3 - SECTION TOT_GLIVGIAC3 1 2 2 GROUP - STRINGA 377 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 350 35 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 351 7 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 353 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - FIELD LF_UMART->UM - END - NUMERO 341 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,441 - GROUP 3 - END - NUMERO 342 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,442 - GROUP 3 25 - END - NUMERO 343 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,443 - GROUP 3 - END - NUMERO 344 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,444 - GROUP 3 25 - END - NUMERO 345 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,445 - GROUP 3 - END - NUMERO 346 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,446 - GROUP 3 25 - END - NUMERO 347 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,447 - GROUP 3 - END - NUMERO 348 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,448 - GROUP 3 - END - END // tot ggiac3 - - END // GGIAC2 - SECTION TOT_GLIVGIAC2 1 2 2 GROUP - STRINGA 477 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 450 35 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 451 7 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 453 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - FIELD LF_UMART->UM - END - NUMERO 441 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,541 - GROUP 4 - END - NUMERO 442 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,542 - GROUP 4 25 - END - NUMERO 443 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,543 - GROUP 4 - END - NUMERO 444 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,544 - GROUP 4 25 - END - NUMERO 445 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,545 - GROUP 4 - END - NUMERO 446 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,546 - GROUP 4 25 - END - NUMERO 447 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,547 - GROUP 4 - END - NUMERO 448 11 - BEGIN - KEY "DISP" - PROMPT 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,548 - GROUP 4 - END - END // tot ggiac2 - END // GGIAC1 - SECTION TOT_GLIVGIAC1 1 2 2 GROUP - STRINGA 577 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 550 35 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 551 7 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 553 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - FIELD LF_UMART->UM - END - NUMERO 541 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,641 - GROUP 5 - END - NUMERO 542 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,642 - GROUP 5 25 - END - NUMERO 543 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,643 - GROUP 5 - END - NUMERO 544 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,644 - GROUP 5 25 - END - NUMERO 545 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,645 - GROUP 5 - END - NUMERO 546 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,646 - GROUP 5 25 - END - NUMERO 547 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,647 - GROUP 5 - END - NUMERO 548 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,648 - GROUP 5 - END - END // tot ggiac1 + STRINGA 150 30 1 + BEGIN + KEY "Magazzino" + PROMPT 3 1 "" + END + STRINGA 151 12 1 + BEGIN + KEY "Magazzino" + PROMPT 2 1 " Totale mag." + END + STRINGA 153 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + FIELD LF_UMART->UM + END + NUMERO 141 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE ADD,241 + GROUP 1 + END + NUMERO 142 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE ADD,242 + GROUP 1 25 + END + NUMERO 143 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE ADD,243 + GROUP 1 + END + NUMERO 144 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE ADD,244 + GROUP 1 25 + END + NUMERO 145 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE ADD,245 + GROUP 1 + END + NUMERO 146 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE ADD,246 + GROUP 1 25 + END + NUMERO 147 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE ADD,247 + GROUP 1 + END + NUMERO 148 11 + BEGIN + KEY "DISP" + PROMPT 13 1 "" + PICTURE "########,@#" + MESSAGE ADD,248 + GROUP 1 + END + END // tot magazz + + END // GGIAC4 + SECTION TOT_GLIVGIAC4 1 1 1 GROUP + STRINGA 250 35 2 + BEGIN + PROMPT 3 1 "" + END + STRINGA 251 7 2 + BEGIN + KEY "Livello giac4" + PROMPT 2 1 " Totale" + END + STRINGA 253 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + FIELD LF_UMART->UM + END + NUMERO 241 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE ADD,341 + GROUP 2 + END + NUMERO 242 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE ADD,342 + GROUP 2 25 + END + NUMERO 243 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE ADD,343 + GROUP 2 + END + NUMERO 244 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE ADD,344 + GROUP 2 25 + END + NUMERO 245 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE ADD,345 + GROUP 2 + END + NUMERO 246 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE ADD,346 + GROUP 2 25 + END + NUMERO 247 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE ADD,347 + GROUP 2 + END + NUMERO 248 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE ADD,348 + GROUP 2 + END + END // tot ggiac4 + + END // GGIAC3 + SECTION TOT_GLIVGIAC3 1 1 1 GROUP + STRINGA 350 35 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 351 7 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 353 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + FIELD LF_UMART->UM + END + NUMERO 341 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE ADD,441 + GROUP 3 + END + NUMERO 342 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE ADD,442 + GROUP 3 25 + END + NUMERO 343 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE ADD,443 + GROUP 3 + END + NUMERO 344 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE ADD,444 + GROUP 3 25 + END + NUMERO 345 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE ADD,445 + GROUP 3 + END + NUMERO 346 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE ADD,446 + GROUP 3 25 + END + NUMERO 347 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE ADD,447 + GROUP 3 + END + NUMERO 348 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE ADD,448 + GROUP 3 + END + END // tot ggiac3 + + END // GGIAC2 + SECTION TOT_GLIVGIAC2 1 1 1 GROUP + STRINGA 450 35 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 451 7 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 453 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + FIELD LF_UMART->UM + END + NUMERO 441 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE ADD,541 + GROUP 4 + END + NUMERO 442 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE ADD,542 + GROUP 4 25 + END + NUMERO 443 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE ADD,543 + GROUP 4 + END + NUMERO 444 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE ADD,544 + GROUP 4 25 + END + NUMERO 445 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE ADD,545 + GROUP 4 + END + NUMERO 446 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE ADD,546 + GROUP 4 25 + END + NUMERO 447 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE ADD,547 + GROUP 4 + END + NUMERO 448 11 + BEGIN + KEY "DISP" + PROMPT 13 1 "" + PICTURE "########,@#" + MESSAGE ADD,548 + GROUP 4 + END + END // tot ggiac2 + END // GGIAC1 + SECTION TOT_GLIVGIAC1 1 1 1 GROUP + STRINGA 550 35 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 551 7 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 553 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + FIELD LF_UMART->UM + END + NUMERO 541 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE ADD,641 + GROUP 5 + END + NUMERO 542 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE ADD,642 + GROUP 5 25 + END + NUMERO 543 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE ADD,643 + GROUP 5 + END + NUMERO 544 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE ADD,644 + GROUP 5 25 + END + NUMERO 545 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE ADD,645 + GROUP 5 + END + NUMERO 546 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE ADD,646 + GROUP 5 25 + END + NUMERO 547 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE ADD,647 + GROUP 5 + END + NUMERO 548 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE ADD,648 + GROUP 5 + END + END // tot ggiac1 - END // FILE GIACENZE - SECTION TOT_ARTICOLO 1 2 2 FOOTER - STRINGA 677 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 650 30 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 651 12 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale art." - END - STRINGA 653 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - FIELD LF_UMART->UM - MESSAGE COPY,753|_USER,SAVE_UM - END - NUMERO 641 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,741 - GROUP 6 - END - NUMERO 642 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,742 - GROUP 6 25 - END - NUMERO 643 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,743 - GROUP 6 - END - NUMERO 644 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,744 - GROUP 6 25 - END - - NUMERO 645 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,745 - GROUP 6 - END - NUMERO 646 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,746 - GROUP 6 25 - END - NUMERO 647 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,747 - GROUP 6 - END - NUMERO 648 11 - BEGIN - KEY "DISP" - PROMPT 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,748 - GROUP 6 - END - END // TOT ART + END // FILE GIACENZE + SECTION TOT_ARTICOLO 1 1 1 FOOTER + STRINGA 650 30 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 651 12 2 + BEGIN + KEY "" + PROMPT 2 1 "Articolo " + END + STRINGA 653 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + FIELD LF_UMART->UM + MESSAGE _USER,COPY_UM,753 + END + NUMERO 641 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE ADD,741 + GROUP 6 + END + NUMERO 642 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE ADD,742 + GROUP 6 25 + END + NUMERO 643 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE ADD,743 + GROUP 6 + END + NUMERO 644 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE ADD,744 + GROUP 6 25 + END + + NUMERO 645 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE ADD,745 + GROUP 6 + END + NUMERO 646 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE ADD,746 + GROUP 6 25 + END + NUMERO 647 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE ADD,747 + GROUP 6 + END + NUMERO 648 11 + BEGIN + KEY "DISP" + PROMPT 13 1 "" + PICTURE "########,@#" + MESSAGE ADD,748 + GROUP 6 + END + END // TOT ART - END // GART8 - SECTION TOT_GART8 1 2 2 FOOTER - STRINGA 777 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 750 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 751 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 753 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE _USER,VALIDATE_UM|COPY,853 - END - NUMERO 741 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#741|ADD,841 - GROUP 7 - END - NUMERO 742 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#742|ADD,842 - GROUP 7 25 - END - NUMERO 743 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#743|ADD,843 - GROUP 7 - END - NUMERO 744 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#744|ADD,844 - GROUP 7 25 - END - NUMERO 745 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#745|ADD,845 - GROUP 7 - END - NUMERO 746 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#746|ADD,846 - GROUP 7 25 - END - NUMERO 747 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#747|ADD,847 - GROUP 7 - END - NUMERO 748 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#748|ADD,848 - GROUP 7 - END - END // tot gart8 + END // GART8 + SECTION TOT_GART8 1 1 1 FOOTER + STRINGA 750 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 751 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 753 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,853 + END + NUMERO 741 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,841 + GROUP 7 + END + NUMERO 742 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,842 + GROUP 7 25 + END + NUMERO 743 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,843 + GROUP 7 + END + NUMERO 744 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,844 + GROUP 7 25 + END + NUMERO 745 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,845 + GROUP 7 + END + NUMERO 746 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,846 + GROUP 7 25 + END + NUMERO 747 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,847 + GROUP 7 + END + NUMERO 748 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,848 + GROUP 7 + END + END // tot gart8 - END // GART7 - SECTION TOT_GART7 1 2 2 FOOTER - STRINGA 877 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 850 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 851 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 853 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,953 - END - NUMERO 841 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,941 - GROUP 8 - END - NUMERO 842 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,942 - GROUP 8 25 - END - NUMERO 843 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,943 - GROUP 8 - END - NUMERO 844 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,944 - GROUP 8 25 - END - NUMERO 845 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,945 - GROUP 8 - END - NUMERO 846 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,946 - GROUP 8 25 - END - NUMERO 847 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,947 - GROUP 8 - END - NUMERO 848 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,948 - GROUP 8 - END - END // tot gart7 + END // GART7 + SECTION TOT_GART7 1 1 1 FOOTER + STRINGA 850 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 851 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 853 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,953 + END + NUMERO 841 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,941 + GROUP 8 + END + NUMERO 842 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,942 + GROUP 8 25 + END + NUMERO 843 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,943 + GROUP 8 + END + NUMERO 844 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,944 + GROUP 8 25 + END + NUMERO 845 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,945 + GROUP 8 + END + NUMERO 846 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,946 + GROUP 8 25 + END + NUMERO 847 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,947 + GROUP 8 + END + NUMERO 848 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,948 + GROUP 8 + END + END // tot gart7 - END // GART6 - SECTION TOT_GART6 1 2 2 FOOTER - STRINGA 977 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 950 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 951 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 953 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1053 - END - NUMERO 941 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,1041 - GROUP 9 - END - NUMERO 942 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,1042 - GROUP 9 25 - END - NUMERO 943 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,1043 - GROUP 9 - END - NUMERO 944 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,1044 - GROUP 9 25 - END - NUMERO 945 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,1045 - GROUP 9 - END - NUMERO 946 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,1046 - GROUP 9 25 - END - NUMERO 947 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,1047 - GROUP 9 - END - NUMERO 948 11 - BEGIN - KEY "DISP" - PROMPT 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,1048 - GROUP 9 - END - END // tot gart6 + END // GART6 + SECTION TOT_GART6 1 1 1 FOOTER + STRINGA 950 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 951 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 953 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1053 + END + NUMERO 941 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1041 + GROUP 9 + END + NUMERO 942 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1042 + GROUP 9 25 + END + NUMERO 943 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1043 + GROUP 9 + END + NUMERO 944 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1044 + GROUP 9 25 + END + NUMERO 945 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1045 + GROUP 9 + END + NUMERO 946 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1046 + GROUP 9 25 + END + NUMERO 947 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1047 + GROUP 9 + END + NUMERO 948 11 + BEGIN + KEY "DISP" + PROMPT 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1048 + GROUP 9 + END + END // tot gart6 - END // GART5 - SECTION TOT_GART5 1 2 2 FOOTER - STRINGA 1077 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 1050 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1051 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1053 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1153 - END - NUMERO 1041 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,1141 - GROUP 10 - END - NUMERO 1042 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,1142 - GROUP 10 25 - END - NUMERO 1043 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,1143 - GROUP 10 - END - NUMERO 1044 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,1144 - GROUP 10 25 - END - NUMERO 1045 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,1145 - GROUP 10 - END - NUMERO 1046 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,1146 - GROUP 10 25 - END - NUMERO 1047 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,1147 - GROUP 10 - END - NUMERO 1048 11 - BEGIN - KEY "DISP" - PROMPT 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,1148 - GROUP 10 - END - END // tot gart5 + END // GART5 + SECTION TOT_GART5 1 1 1 FOOTER + STRINGA 1050 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1051 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1053 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1153 + END + NUMERO 1041 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1141 + GROUP 10 + END + NUMERO 1042 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1142 + GROUP 10 25 + END + NUMERO 1043 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1143 + GROUP 10 + END + NUMERO 1044 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1144 + GROUP 10 25 + END + NUMERO 1045 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1145 + GROUP 10 + END + NUMERO 1046 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1146 + GROUP 10 25 + END + NUMERO 1047 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1147 + GROUP 10 + END + NUMERO 1048 11 + BEGIN + KEY "DISP" + PROMPT 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1148 + GROUP 10 + END + END // tot gart5 - END // GART4 - SECTION TOT_GART4 1 2 2 FOOTER - STRINGA 1177 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 1150 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1151 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1153 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1253 - END - NUMERO 1141 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,1241 - GROUP 11 - END - NUMERO 1142 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,1242 - GROUP 11 25 - END - NUMERO 1143 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,1243 - GROUP 11 - END - NUMERO 1144 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,1244 - GROUP 11 25 - END - NUMERO 1145 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,1245 - GROUP 11 - END - NUMERO 1146 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,1246 - GROUP 11 25 - END - NUMERO 1147 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,1247 - GROUP 11 - END - NUMERO 1148 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,1248 - GROUP 11 - END - END // tot gart4 + END // GART4 + SECTION TOT_GART4 1 1 1 FOOTER + STRINGA 1150 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1151 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1153 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1253 + END + NUMERO 1141 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1241 + GROUP 11 + END + NUMERO 1142 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1242 + GROUP 11 25 + END + NUMERO 1143 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1243 + GROUP 11 + END + NUMERO 1144 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1244 + GROUP 11 25 + END + NUMERO 1145 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1245 + GROUP 11 + END + NUMERO 1146 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1246 + GROUP 11 25 + END + NUMERO 1147 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1247 + GROUP 11 + END + NUMERO 1148 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1248 + GROUP 11 + END + END // tot gart4 - END // GART3 - SECTION TOT_GART3 1 2 2 FOOTER - STRINGA 1277 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 1250 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1251 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1253 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1353 - END - NUMERO 1241 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,1341 - GROUP 12 - END - NUMERO 1242 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,1342 - GROUP 12 25 - END - NUMERO 1243 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,1343 - GROUP 12 - END - NUMERO 1244 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,1344 - GROUP 12 25 - END - NUMERO 1245 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,1345 - GROUP 12 - END - NUMERO 1246 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,1346 - GROUP 12 25 - END - NUMERO 1247 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,1347 - GROUP 12 - END - NUMERO 1248 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,1348 - GROUP 12 - END - END // tot gart3 + END // GART3 + SECTION TOT_GART3 1 1 1 FOOTER + STRINGA 1250 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1251 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1253 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1353 + END + NUMERO 1241 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1341 + GROUP 12 + END + NUMERO 1242 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1342 + GROUP 12 25 + END + NUMERO 1243 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1343 + GROUP 12 + END + NUMERO 1244 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1344 + GROUP 12 25 + END + NUMERO 1245 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1345 + GROUP 12 + END + NUMERO 1246 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1346 + GROUP 12 25 + END + NUMERO 1247 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1347 + GROUP 12 + END + NUMERO 1248 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1348 + GROUP 12 + END + END // tot gart3 - END // GART2 - SECTION TOT_GART2 1 2 2 FOOTER - STRINGA 1377 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" + END // GART2 + SECTION TOT_GART2 1 1 1 FOOTER + STRINGA 1350 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" END - STRINGA 1350 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1351 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1353 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1453 - END - NUMERO 1341 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,1441 - GROUP 13 - END - NUMERO 1342 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,1442 - GROUP 13 25 - END - NUMERO 1343 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,1443 - GROUP 13 - END - NUMERO 1344 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,1444 - GROUP 13 25 - END - NUMERO 1345 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,1445 - GROUP 13 - END - NUMERO 1346 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,1446 - GROUP 13 25 - END - NUMERO 1347 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,1447 - GROUP 13 - END - NUMERO 1348 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,1448 - GROUP 13 - END - END // tot gart2 + STRINGA 1351 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1353 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1453 + END + NUMERO 1341 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1441 + GROUP 13 + END + NUMERO 1342 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1442 + GROUP 13 25 + END + NUMERO 1343 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1443 + GROUP 13 + END + NUMERO 1344 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1444 + GROUP 13 25 + END + NUMERO 1345 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1445 + GROUP 13 + END + NUMERO 1346 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1446 + GROUP 13 25 + END + NUMERO 1347 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1447 + GROUP 13 + END + NUMERO 1348 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1448 + GROUP 13 + END + END // tot gart2 - END // GART1 - SECTION TOT_GART1 1 2 2 FOOTER - STRINGA 1477 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 1450 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1451 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1453 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1553 - END - NUMERO 1441 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,1541 - GROUP 14 - END - NUMERO 1442 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,1542 - GROUP 14 25 - END - NUMERO 1443 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,1543 - GROUP 14 - END - NUMERO 1444 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,1544 - GROUP 14 25 - END - NUMERO 1445 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,1545 - GROUP 14 - END - NUMERO 1446 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,1546 - GROUP 14 25 - END - NUMERO 1447 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,1547 - GROUP 14 - END - NUMERO 1448 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,1548 - GROUP 14 - END - END // tot gart1 + END // GART1 + SECTION TOT_GART1 1 1 1 FOOTER + STRINGA 1450 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1451 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1453 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1553 + END + NUMERO 1441 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,1541 + GROUP 14 + END + NUMERO 1442 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,1542 + GROUP 14 25 + END + NUMERO 1443 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,1543 + GROUP 14 + END + NUMERO 1444 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,1544 + GROUP 14 25 + END + NUMERO 1445 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,1545 + GROUP 14 + END + NUMERO 1446 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,1546 + GROUP 14 25 + END + NUMERO 1447 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,1547 + GROUP 14 + END + NUMERO 1448 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,1548 + GROUP 14 + END + END // tot gart1 - END // GRUPPI_CATMER - SECTION TOT_CATMER 1 2 2 FOOTER - STRINGA 1577 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 1550 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1551 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1553 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - END - NUMERO 1541 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - GROUP 15 - END - NUMERO 1542 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - GROUP 15 25 - END - NUMERO 1543 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - GROUP 15 - END - NUMERO 1544 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - GROUP 15 25 - END - NUMERO 1545 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - GROUP 15 - END - NUMERO 1546 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - GROUP 15 25 - END - NUMERO 1547 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - GROUP 15 - END - NUMERO 1548 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - GROUP 15 - END - END // tot catmerc + END // GRUPPI_CATMER + SECTION TOT_CATMER 1 1 1 FOOTER + STRINGA 1550 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1551 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1553 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + END + NUMERO 1541 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1553 + GROUP 15 + END + NUMERO 1542 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1553 + GROUP 15 25 + END + NUMERO 1543 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1553 + GROUP 15 + END + NUMERO 1544 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1553 + GROUP 15 25 + END + NUMERO 1545 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1553 + GROUP 15 + END + NUMERO 1546 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1553 + GROUP 15 25 + END + NUMERO 1547 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1553 + GROUP 15 + END + NUMERO 1548 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1553 + GROUP 15 + END + END // tot catmerc END // section body, loop anamag diff --git a/mg/mg3200b.frm b/mg/mg3200b.frm index 2af9193a2..04d66c4c8 100755 --- a/mg/mg3200b.frm +++ b/mg/mg3200b.frm @@ -126,1642 +126,1584 @@ END SECTION BODY ODD 0 COLUMNWISE - NUMBER FF_FLAGTOTQTA 1 - BEGIN - FLAG "H" - PROMPT 1 1 "" - END + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "MAGAZZ" + PROMPT 2 1 "" + MESSAGE RESET,1@|_USER,RESET_UM,153 + END + SECTION H_MAGAZZINO 1 1 1 GROUP + STRINGA 60 40 1 + BEGIN + KEY "codice magazzino" + PROMPT 2 1 "Magazzino " + FIELD 500@->s0 + MESSAGE COPY,150 + END + END + + SECTION GRUPPI_MAGAZZINO 1 0 0 FILE LF_MAG GROUP CODMAG[1,3] + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "dep" + PROMPT 2 1 "" + MESSAGE RESET,15@|_USER,RESET_UM,53 + END + SECTION H_DEPOSITO 1 1 1 GROUP + STRINGA 60 40 1 + BEGIN + KEY "codice dep" + PROMPT 2 1 "Deposito " + FIELD 501@->s0 + MESSAGE COPY,50 + END + END - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "MAGAZZ" - PROMPT 2 1 "" - MESSAGE RESET,1@ - END - SECTION H_MAGAZZINO 1 1 1 GROUP - STRINGA 60 40 1 - BEGIN - KEY "codice magazzino" - PROMPT 2 1 "Magazzino " - FIELD 500@->s0 - MESSAGE COPY,150 - END - END - - SECTION GRUPPI_MAGAZZINO 1 0 0 FILE LF_MAG GROUP CODMAG[1,3] - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "dep" - PROMPT 2 1 "" - MESSAGE RESET,15@ - END - SECTION H_DEPOSITO 1 1 1 GROUP - STRINGA 60 40 1 - BEGIN - KEY "codice dep" - PROMPT 2 1 "Deposito " - FIELD 501@->s0 - MESSAGE COPY,50 - END - END - - SECTION GRUPPI_DEPOSITO 1 0 0 FILE LF_MAG GROUP CODMAG[1,5] - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "gcodart1" - PROMPT 2 1 "" - MESSAGE RESET,14@ - END - SECTION H_GCODART1 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,1 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,1|COPY,1450 - END - END - - SECTION GRUPPI_CODART1 1 0 0 FILE LF_MAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,13@ - END - SECTION H_GCODART2 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,2 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,2|COPY,1350 - END - END - - SECTION GRUPPI_CODART2 1 0 0 FILE LF_MAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,12@ - END - SECTION H_GCODART3 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,3 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,3|COPY,1250 - END - END - - SECTION GRUPPI_CODART3 1 0 0 FILE LF_MAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,11@ - END - SECTION H_GCODART4 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,4 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,4|COPY,1150 - END - END - - SECTION GRUPPI_CODART4 1 0 0 FILE LF_MAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,10@ - END - SECTION H_GCODART5 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,5 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,5|COPY,1050 - END - END - - SECTION GRUPPI_CODART5 1 0 0 FILE LF_MAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,9@ - END - SECTION H_GCODART6 1 1 2 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,6 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,6|COPY,950 - END - END - - SECTION GRUPPI_CODART6 1 0 0 FILE LF_MAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,8@ - END - SECTION H_GCODART7 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,7 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,7|COPY,850 - END - END - - SECTION GRUPPI_CODART7 1 0 0 FILE LF_MAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,7@ - END - - SECTION H_GCODART8 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,8 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,8|COPY,750 - END - END - - SECTION GRUPPI_CODART8 1 0 0 FILE LF_MAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,6@ - END - SECTION H_ARTICOLO 1 1 1 GROUP - STRINGA 2020 12 2 - BEGIN - KEY "CODICE articolo" - PROMPT 2 1 "" - FIELD LF_ANAMAG->CODART - END - STRINGA 21 30 2 - BEGIN - KEY "DESCR.articolo" - PROMPT 3 1 "" - FIELD LF_ANAMAG->DESCR - MESSAGE COPY,650 - END - END - - SECTION ARTICOLO 1 0 0 FILE LF_MAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,5@ - END - SECTION H_GLIVGIAC1 1 1 1 GROUP - STRINGA 31 50 1 - BEGIN - KEY "Livello giac" - PROMPT 2 1 "" - MESSAGE _USER,GRUPPOGIAC,1|COPY,550 - END - END - - SECTION GRUPPI_LIVGIAC1 1 0 0 FILE LF_MAG GROUP LIVELLO - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,4@ - END - SECTION H_GLIVGIAC2 1 1 1 GROUP - STRINGA 31 50 1 - BEGIN - KEY "Livello giac" - PROMPT 2 1 "" - MESSAGE _USER,GRUPPOGIAC,2|COPY,450 - END - END - - SECTION GRUPPI_LIVGIAC2 1 0 0 FILE LF_MAG GROUP LIVELLO - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,3@ - END - - SECTION H_GLIVGIAC3 1 1 1 GROUP - STRINGA 31 50 1 - BEGIN - KEY "Livello giac" - PROMPT 2 1 "" - MESSAGE _USER,GRUPPOGIAC,3|COPY,350 - END - END - - SECTION GRUPPI_LIVGIAC3 1 0 0 FILE LF_MAG GROUP LIVELLO - SECTION H_GLIVGIAC4 1 1 1 GROUP - END - + SECTION GRUPPI_DEPOSITO 1 0 0 FILE LF_MAG GROUP CODMAG[1,5] + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "gcodart1" + PROMPT 2 1 "" + MESSAGE RESET,14@|_USER,RESET_UM,1453 + END + SECTION H_GCODART1 1 1 1 GROUP + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,1 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,1|COPY,1450 + END + END + + SECTION GRUPPI_CODART1 1 0 0 FILE LF_MAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,13@|_USER,RESET_UM,1353 + END + SECTION H_GCODART2 1 1 1 GROUP + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,2 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,2|COPY,1350 + END + END + + SECTION GRUPPI_CODART2 1 0 0 FILE LF_MAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,12@|_USER,RESET_UM,1253 + END + SECTION H_GCODART3 1 1 1 GROUP + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,3 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,3|COPY,1250 + END + END + + SECTION GRUPPI_CODART3 1 0 0 FILE LF_MAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,11@|_USER,RESET_UM,1153 + END + SECTION H_GCODART4 1 1 1 GROUP + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,4 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,4|COPY,1150 + END + END + + SECTION GRUPPI_CODART4 1 0 0 FILE LF_MAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,10@|_USER,RESET_UM,1053 + END + SECTION H_GCODART5 1 1 1 GROUP + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,5 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,5|COPY,1050 + END + END + + SECTION GRUPPI_CODART5 1 0 0 FILE LF_MAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,9@|_USER,RESET_UM,953 + END + SECTION H_GCODART6 1 1 2 GROUP + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,6 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,6|COPY,950 + END + END + + SECTION GRUPPI_CODART6 1 0 0 FILE LF_MAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,8@|_USER,RESET_UM,853 + END + SECTION H_GCODART7 1 1 1 GROUP + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,7 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,7|COPY,850 + END + END + + SECTION GRUPPI_CODART7 1 0 0 FILE LF_MAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,7@|_USER,RESET_UM,753 + END + + SECTION H_GCODART8 1 1 1 GROUP + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,8 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,8|COPY,750 + END + END + + SECTION GRUPPI_CODART8 1 0 0 FILE LF_MAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,6@ + END + SECTION H_ARTICOLO 1 1 1 GROUP + STRINGA 2020 12 2 + BEGIN + KEY "CODICE articolo" + PROMPT 2 1 "" + FIELD LF_ANAMAG->CODART + END + STRINGA 21 30 2 + BEGIN + KEY "DESCR.articolo" + PROMPT 3 1 "" + FIELD LF_ANAMAG->DESCR + MESSAGE COPY,650 + END + END + + SECTION ARTICOLO 1 0 0 FILE LF_MAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,5@ + END + SECTION H_GLIVGIAC1 1 1 1 GROUP + STRINGA 31 50 1 + BEGIN + KEY "Livello giac" + PROMPT 2 1 "" + MESSAGE _USER,GRUPPOGIAC,1|COPY,550 + END + END + + SECTION GRUPPI_LIVGIAC1 1 0 0 FILE LF_MAG GROUP LIVELLO + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,4@ + END + SECTION H_GLIVGIAC2 1 1 1 GROUP + STRINGA 31 50 1 + BEGIN + KEY "Livello giac" + PROMPT 2 1 "" + MESSAGE _USER,GRUPPOGIAC,2|COPY,450 + END + END + + SECTION GRUPPI_LIVGIAC2 1 0 0 FILE LF_MAG GROUP LIVELLO + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,3@ + END + + SECTION H_GLIVGIAC3 1 1 1 GROUP + STRINGA 31 50 1 + BEGIN + KEY "Livello giac" + PROMPT 2 1 "" + MESSAGE _USER,GRUPPOGIAC,3|COPY,350 + END + END + + SECTION GRUPPI_LIVGIAC3 1 0 0 FILE LF_MAG GROUP LIVELLO + SECTION H_GLIVGIAC4 1 1 1 GROUP + END + SECTION TOT_GLIVGIAC4 1 1 2 GROUP - STRINGA 251 2 - BEGIN - KEY "Livello giac4" - PROMPT 2 1 "" - END - STRINGA 250 40 1 - BEGIN - KEY "Livello giac" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOGIAC,4 - END - STRINGA 253 3 - BEGIN - KEY "UM" - PROMPT 5 1 "" - FIELD LF_UMART->UM - END - NUMERO 241 11 - BEGIN - KEY "GIAC" - PROMPT 6 1 "" - FIELD 109->GIAC - PICTURE "########,@#" - MESSAGE ADD,341 - END - NUMERO 242 11 - BEGIN - KEY "ORDF" - PROMPT 7 1 "" - FIELD 109->ordf - PICTURE "########,@#" - MESSAGE ADD,342 - GROUP 10 - END - - NUMERO 243 11 - BEGIN - KEY "ORDC" - PROMPT 8 1 "" - FIELD 109->ordc - PICTURE "########,@#" - MESSAGE ADD,343 - END - NUMERO 244 11 - BEGIN - KEY "ACL" - PROMPT 9 1 "" - FIELD 109->acl - PICTURE "########,@#" - MESSAGE ADD,344 - GROUP 10 - END - - NUMERO 245 11 - BEGIN - KEY "INCL" - PROMPT 10 1 "" - FIELD 109->incl - PICTURE "########,@#" - MESSAGE ADD,345 - END - NUMERO 246 11 - BEGIN - KEY "PRODFIN" - PROMPT 11 1 "" - PICTURE "########,@#" - FIELD 109->prodfin - MESSAGE ADD,346 - GROUP 10 - END - - NUMERO 247 11 - BEGIN - KEY "PRODCOMP" - PROMPT 12 1 "" - PICTURE "########,@#" - FIELD 109->prodcomp - MESSAGE ADD,347 - END - NUMERO 248 11 - BEGIN - KEY "DISPONIBILITA'" - PROMPT 13 1 "" - PICTURE "#######@,@#" - MESSAGE _NUMEXPR,109->giac+109->ORDF-109->ORDC+109->ACL-109->INCL+109->PRODFIN-109->PRODCOMP|ADD,348 - END - END // tot ggiac4 - - END // GGIAC3 - SECTION TOT_GLIVGIAC3 1 2 2 GROUP - STRINGA 377 - BEGIN - KEY "SEP" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 350 35 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 351 7 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 353 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - FIELD LF_UMART->UM - END - NUMERO 341 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" + STRINGA 251 2 + BEGIN + KEY "Livello giac4" + PROMPT 2 1 "" + END + STRINGA 250 40 1 + BEGIN + KEY "Livello giac" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOGIAC,4 + END + STRINGA 253 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + FIELD LF_UMART->UM + END + NUMERO 241 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + FIELD 109->GIAC + PICTURE "########,@#" + MESSAGE ADD,341 + END + NUMERO 242 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + FIELD 109->ordf + PICTURE "########,@#" + MESSAGE ADD,342 + GROUP 10 + END + + NUMERO 243 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + FIELD 109->ordc + PICTURE "########,@#" + MESSAGE ADD,343 + END + NUMERO 244 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + FIELD 109->acl + PICTURE "########,@#" + MESSAGE ADD,344 + GROUP 10 + END + + NUMERO 245 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + FIELD 109->incl + PICTURE "########,@#" + MESSAGE ADD,345 + END + NUMERO 246 11 + BEGIN + KEY "PRODFIN" + PROMPT 11 1 "" + PICTURE "########,@#" + FIELD 109->prodfin + MESSAGE ADD,346 + GROUP 10 + END + + NUMERO 247 11 + BEGIN + KEY "PRODCOMP" + PROMPT 12 1 "" + PICTURE "########,@#" + FIELD 109->prodcomp + MESSAGE ADD,347 + END + NUMERO 248 11 + BEGIN + KEY "DISPONIBILITA'" + PROMPT 13 1 "" + PICTURE "#######@,@#" + MESSAGE _NUMEXPR,109->giac+109->ORDF-109->ORDC+109->ACL-109->INCL+109->PRODFIN-109->PRODCOMP|ADD,348 + END + END // tot ggiac4 + + END // GGIAC3 + SECTION TOT_GLIVGIAC3 1 1 1 GROUP + STRINGA 350 35 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 351 7 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 353 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + FIELD LF_UMART->UM + END + NUMERO 341 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE ADD,441 + GROUP 3 + END + NUMERO 342 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE ADD,442 + GROUP 3 25 + END + NUMERO 343 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE ADD,443 + GROUP 3 + END + NUMERO 344 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE ADD,444 + GROUP 3 25 + END + NUMERO 345 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" PICTURE "########,@#" - MESSAGE ADD,441 - GROUP 3 - END - NUMERO 342 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,442 - GROUP 3 25 - END - NUMERO 343 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,443 - GROUP 3 - END - NUMERO 344 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,444 - GROUP 3 25 - END - NUMERO 345 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,445 - GROUP 3 - END - NUMERO 346 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,446 - GROUP 3 25 - END - NUMERO 347 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,447 - GROUP 3 - END - NUMERO 348 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,448 - GROUP 3 - END - END // tot ggiac3 - - END // GGIAC2 - SECTION TOT_GLIVGIAC2 1 2 2 GROUP - STRINGA 477 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 450 35 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 451 7 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 453 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - FIELD LF_UMART->UM - END - NUMERO 441 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,541 - GROUP 4 - END - NUMERO 442 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,542 - GROUP 4 25 - END - NUMERO 443 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,543 - GROUP 4 - END - NUMERO 444 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,544 - GROUP 4 25 - END - NUMERO 445 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,545 - GROUP 4 - END - NUMERO 446 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,546 - GROUP 4 25 - END - NUMERO 447 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,547 - GROUP 4 - END - NUMERO 448 11 - BEGIN - KEY "DISP" - PROMPT 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,548 - GROUP 4 - END - END // tot ggiac2 - END // GGIAC1 - SECTION TOT_GLIVGIAC1 1 2 2 GROUP - STRINGA 577 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 550 35 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 551 7 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 553 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - FIELD LF_UMART->UM - END - NUMERO 541 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" + MESSAGE ADD,445 + GROUP 3 + END + NUMERO 346 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE ADD,446 + GROUP 3 25 + END + NUMERO 347 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE ADD,447 + GROUP 3 + END + NUMERO 348 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE ADD,448 + GROUP 3 + END + END // tot ggiac3 + + END // GGIAC2 + SECTION TOT_GLIVGIAC2 1 1 1 GROUP + STRINGA 450 35 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 451 7 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 453 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + FIELD LF_UMART->UM + END + NUMERO 441 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE ADD,541 + GROUP 4 + END + NUMERO 442 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE ADD,542 + GROUP 4 25 + END + NUMERO 443 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE ADD,543 + GROUP 4 + END + NUMERO 444 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE ADD,544 + GROUP 4 25 + END + NUMERO 445 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE ADD,545 + GROUP 4 + END + NUMERO 446 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE ADD,546 + GROUP 4 25 + END + NUMERO 447 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE ADD,547 + GROUP 4 + END + NUMERO 448 11 + BEGIN + KEY "DISP" + PROMPT 13 1 "" + PICTURE "########,@#" + MESSAGE ADD,548 + GROUP 4 + END + END // tot ggiac2 + END // GGIAC1 + SECTION TOT_GLIVGIAC1 1 1 1 GROUP + STRINGA 550 35 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 551 7 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 553 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + FIELD LF_UMART->UM + END + NUMERO 541 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE ADD,641 + GROUP 5 + END + NUMERO 542 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE ADD,642 + GROUP 5 25 + END + NUMERO 543 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE ADD,643 + GROUP 5 + END + NUMERO 544 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" PICTURE "########,@#" - MESSAGE ADD,641 - GROUP 5 - END - NUMERO 542 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,642 - GROUP 5 25 - END - NUMERO 543 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,643 - GROUP 5 - END - NUMERO 544 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,644 - GROUP 5 25 - END - NUMERO 545 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,645 - GROUP 5 - END - NUMERO 546 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,646 - GROUP 5 25 - END - NUMERO 547 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,647 - GROUP 5 - END - NUMERO 548 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,648 - GROUP 5 - END - END // tot ggiac1 - - END // FILE GIACENZE - SECTION TOT_ARTICOLO 1 2 2 GROUP - STRINGA 677 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 650 30 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 651 12 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale art." - END - STRINGA 653 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - FIELD LF_UMART->UM - MESSAGE COPY,753|_USER,SAVE_UM - END - NUMERO 641 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,741 - GROUP 6 - END - NUMERO 642 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,742 - GROUP 6 25 - END - NUMERO 643 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,743 - GROUP 6 - END - NUMERO 644 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,744 - GROUP 6 25 - END - NUMERO 645 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,745 - GROUP 6 - END - NUMERO 646 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,746 - GROUP 6 25 - END - NUMERO 647 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,747 - GROUP 6 - END - NUMERO 648 11 - BEGIN - KEY "DISP" - PROMPT 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,748 - GROUP 6 - END - END // TOT ART - - END // GART8 - SECTION TOT_GART8 1 2 2 GROUP - STRINGA 777 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 750 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 751 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 753 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE _USER,VALIDATE_UM |COPY,853 - END - NUMERO 741 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#741|ADD,841 - GROUP 7 - END - NUMERO 742 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#742|ADD,842 - GROUP 7 25 - END - NUMERO 743 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#743|ADD,843 - GROUP 7 - END - NUMERO 744 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#744|ADD,844 - GROUP 7 25 - END - NUMERO 745 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#745|ADD,845 - GROUP 7 - END - NUMERO 746 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#746|ADD,846 - GROUP 7 25 - END - NUMERO 747 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#747|ADD,847 - GROUP 7 - END - NUMERO 748 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#748|ADD,848 - GROUP 7 - END - END // tot gart8 - - END // GART7 - SECTION TOT_GART7 1 2 2 GROUP - STRINGA 877 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 850 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 851 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 853 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,953 - END - NUMERO 841 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,941 - GROUP 8 - END - NUMERO 842 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,942 - GROUP 8 25 - END - NUMERO 843 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,943 - GROUP 8 - END - NUMERO 844 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,944 - GROUP 8 25 - END - NUMERO 845 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,945 - GROUP 8 - END - NUMERO 846 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,946 - GROUP 8 25 - END - NUMERO 847 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,947 - GROUP 8 - END - NUMERO 848 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,948 - GROUP 8 - END - END // tot gart7 - - END // GART6 - SECTION TOT_GART6 1 2 2 GROUP - STRINGA 977 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 950 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 951 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 953 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1053 - END - NUMERO 941 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,1041 - GROUP 9 - END - NUMERO 942 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,1042 - GROUP 9 25 - END - NUMERO 943 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,1043 - GROUP 9 - END - NUMERO 944 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,1044 - GROUP 9 25 - END - NUMERO 945 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,1045 - GROUP 9 - END - NUMERO 946 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,1046 - GROUP 9 25 - END - NUMERO 947 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,1047 - GROUP 9 - END - NUMERO 948 11 - BEGIN - KEY "DISP" - PROMPT 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,1048 - GROUP 9 - END - END // tot gart6 - - END // GART5 - SECTION TOT_GART5 1 2 2 GROUP - STRINGA 1077 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 1050 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1051 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1053 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1153 - END - NUMERO 1041 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,1141 - GROUP 10 - END - NUMERO 1042 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,1142 - GROUP 10 25 - END - NUMERO 1043 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,1143 - GROUP 10 - END - NUMERO 1044 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,1144 - GROUP 10 25 - END - NUMERO 1045 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,1145 - GROUP 10 - END - NUMERO 1046 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,1146 - GROUP 10 25 - END - NUMERO 1047 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,1147 - GROUP 10 - END - NUMERO 1048 11 - BEGIN - KEY "DISP" - PROMPT 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,1148 - GROUP 10 - END - END // tot gart5 - - END // GART4 - SECTION TOT_GART4 1 2 2 GROUP - STRINGA 1177 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 1150 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1151 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1153 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1253 - END - NUMERO 1141 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,1241 - GROUP 11 - END - NUMERO 1142 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,1242 - GROUP 11 25 - END - NUMERO 1143 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,1243 - GROUP 11 - END - NUMERO 1144 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,1244 - GROUP 11 25 - END - NUMERO 1145 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,1245 - GROUP 11 - END - NUMERO 1146 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,1246 - GROUP 11 25 - END - NUMERO 1147 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,1247 - GROUP 11 - END - NUMERO 1148 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,1248 - GROUP 11 - END - END // tot gart4 - - END // GART3 - SECTION TOT_GART3 1 2 2 GROUP - STRINGA 1277 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 1250 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1251 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1253 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1353 - END - NUMERO 1241 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" + MESSAGE ADD,644 + GROUP 5 25 + END + NUMERO 545 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE ADD,645 + GROUP 5 + END + NUMERO 546 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE ADD,646 + GROUP 5 25 + END + NUMERO 547 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE ADD,647 + GROUP 5 + END + NUMERO 548 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE ADD,648 + GROUP 5 + END + END // tot ggiac1 + + END // FILE GIACENZE + SECTION TOT_ARTICOLO 1 1 1 GROUP + STRINGA 650 30 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 651 12 2 + BEGIN + KEY "" + PROMPT 2 1 "Articolo " + END + STRINGA 653 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + FIELD LF_UMART->UM + MESSAGE _USER,COPY_UM,753 + END + NUMERO 641 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE ADD,741 + GROUP 6 + END + NUMERO 642 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE ADD,742 + GROUP 6 25 + END + NUMERO 643 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE ADD,743 + GROUP 6 + END + NUMERO 644 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE ADD,744 + GROUP 6 25 + END + NUMERO 645 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE ADD,745 + GROUP 6 + END + NUMERO 646 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE ADD,746 + GROUP 6 25 + END + NUMERO 647 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE ADD,747 + GROUP 6 + END + NUMERO 648 11 + BEGIN + KEY "DISP" + PROMPT 13 1 "" + PICTURE "########,@#" + MESSAGE ADD,748 + GROUP 6 + END + END // TOT ART + + END // GART8 + SECTION TOT_GART8 1 1 1 GROUP + STRINGA 750 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 751 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 753 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,853 + END + NUMERO 741 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,841 + GROUP 7 + END + NUMERO 742 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,842 + GROUP 7 25 + END + NUMERO 743 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,843 + GROUP 7 + END + NUMERO 744 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,844 + GROUP 7 25 + END + NUMERO 745 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,845 + GROUP 7 + END + NUMERO 746 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,846 + GROUP 7 25 + END + NUMERO 747 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,847 + GROUP 7 + END + NUMERO 748 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,753|ADD,848 + GROUP 7 + END + END // tot gart8 + + END // GART7 + SECTION TOT_GART7 1 1 1 GROUP + STRINGA 850 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 851 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 853 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,953 + END + NUMERO 841 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,941 + GROUP 8 + END + NUMERO 842 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,942 + GROUP 8 25 + END + NUMERO 843 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,943 + GROUP 8 + END + NUMERO 844 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,944 + GROUP 8 25 + END + NUMERO 845 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,945 + GROUP 8 + END + NUMERO 846 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,946 + GROUP 8 25 + END + NUMERO 847 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,947 + GROUP 8 + END + NUMERO 848 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,853|ADD,948 + GROUP 8 + END + END // tot gart7 + + END // GART6 + SECTION TOT_GART6 1 1 1 GROUP + STRINGA 950 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 951 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 953 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1053 + END + NUMERO 941 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1041 + GROUP 9 + END + NUMERO 942 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1042 + GROUP 9 25 + END + NUMERO 943 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1043 + GROUP 9 + END + NUMERO 944 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1044 + GROUP 9 25 + END + NUMERO 945 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1045 + GROUP 9 + END + NUMERO 946 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1046 + GROUP 9 25 + END + NUMERO 947 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1047 + GROUP 9 + END + NUMERO 948 11 + BEGIN + KEY "DISP" + PROMPT 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,953|ADD,1048 + GROUP 9 + END + END // tot gart6 + + END // GART5 + SECTION TOT_GART5 1 1 1 GROUP + STRINGA 1050 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1051 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1053 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1153 + END + NUMERO 1041 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1141 + GROUP 10 + END + NUMERO 1042 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1142 + GROUP 10 25 + END + NUMERO 1043 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1143 + GROUP 10 + END + NUMERO 1044 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1144 + GROUP 10 25 + END + NUMERO 1045 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1145 + GROUP 10 + END + NUMERO 1046 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1146 + GROUP 10 25 + END + NUMERO 1047 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1147 + GROUP 10 + END + NUMERO 1048 11 + BEGIN + KEY "DISP" + PROMPT 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1148 + GROUP 10 + END + END // tot gart5 + + END // GART4 + SECTION TOT_GART4 1 1 1 GROUP + STRINGA 1150 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1151 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1153 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1253 + END + NUMERO 1141 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1241 + GROUP 11 + END + NUMERO 1142 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1242 + GROUP 11 25 + END + NUMERO 1143 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1243 + GROUP 11 + END + NUMERO 1144 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1244 + GROUP 11 25 + END + NUMERO 1145 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1245 + GROUP 11 + END + NUMERO 1146 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1246 + GROUP 11 25 + END + NUMERO 1147 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1247 + GROUP 11 + END + NUMERO 1148 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1248 + GROUP 11 + END + END // tot gart4 + + END // GART3 + SECTION TOT_GART3 1 1 1 GROUP + STRINGA 1250 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1251 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1253 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1353 + END + NUMERO 1241 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1341 + GROUP 12 + END + NUMERO 1242 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1342 + GROUP 12 25 + END + NUMERO 1243 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1343 + GROUP 12 + END + NUMERO 1244 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1344 + GROUP 12 25 + END + NUMERO 1245 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1345 + GROUP 12 + END + NUMERO 1246 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1346 + GROUP 12 25 + END + NUMERO 1247 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" PICTURE "########,@#" - MESSAGE ADD,1341 - GROUP 12 - END - NUMERO 1242 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,1342 - GROUP 12 25 - END - NUMERO 1243 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,1343 - GROUP 12 - END - NUMERO 1244 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,1344 - GROUP 12 25 - END - NUMERO 1245 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,1345 - GROUP 12 - END - NUMERO 1246 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,1346 - GROUP 12 25 - END - NUMERO 1247 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,1347 - GROUP 12 - END - NUMERO 1248 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,1348 - GROUP 12 - END - END // tot gart3 - - END // GART2 - SECTION TOT_GART2 1 2 2 GROUP - STRINGA 1377 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 1350 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1351 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1353 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1453 - END - NUMERO 1341 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,1441 - GROUP 13 - END - NUMERO 1342 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,1442 - GROUP 13 25 - END - NUMERO 1343 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,1443 - GROUP 13 - END - NUMERO 1344 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,1444 - GROUP 13 25 - END - NUMERO 1345 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,1445 - GROUP 13 - END - NUMERO 1346 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,1446 - GROUP 13 25 - END - NUMERO 1347 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,1447 - GROUP 13 - END - NUMERO 1348 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,1448 - GROUP 13 - END - END // tot gart2 - - END // GART1 - SECTION TOT_GART1 1 2 2 GROUP - STRINGA 1477 - BEGIN - KEY "PRODC" - PROMPT 6 1 "----------------------------------------------------------------------------------------------------" - END - STRINGA 1450 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1451 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1453 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,53 - END - NUMERO 1441 11 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@#" - MESSAGE ADD,41 - GROUP 14 - END - NUMERO 1442 11 - BEGIN - KEY "ORDF" - PROMPT 7 2 "" - PICTURE "########,@#" - MESSAGE ADD,42 - GROUP 14 25 - END - NUMERO 1443 11 - BEGIN - KEY "ORDC" - PROMPT 8 2 "" - PICTURE "########,@#" - MESSAGE ADD,43 - GROUP 14 - END - NUMERO 1444 11 - BEGIN - KEY "ACL" - PROMPT 9 2 "" - PICTURE "########,@#" - MESSAGE ADD,44 - GROUP 14 25 - END - NUMERO 1445 11 - BEGIN - KEY "INCL" - PROMPT 10 2 "" - PICTURE "########,@#" - MESSAGE ADD,45 - GROUP 14 - END - NUMERO 1446 11 - BEGIN - KEY "PRODF" - PROMPT 11 2 "" - PICTURE "########,@#" - MESSAGE ADD,46 - GROUP 14 25 - END - NUMERO 1447 11 - BEGIN - KEY "PRODC" - PROMPT 12 2 "" - PICTURE "########,@#" - MESSAGE ADD,47 - GROUP 14 - END - NUMERO 1448 11 - BEGIN - KEY "DISP" - prompt 13 2 "" - PICTURE "########,@#" - MESSAGE ADD,48 - GROUP 14 - END - END // tot gart1 + MESSAGE _USER,VALIDATE_UM,1253|ADD,1347 + GROUP 12 + END + NUMERO 1248 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1253|ADD,1348 + GROUP 12 + END + END // tot gart3 + + END // GART2 + SECTION TOT_GART2 1 1 1 GROUP + STRINGA 1350 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1351 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1353 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1453 + END + NUMERO 1341 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1441 + GROUP 13 + END + NUMERO 1342 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1442 + GROUP 13 25 + END + NUMERO 1343 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1443 + GROUP 13 + END + NUMERO 1344 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1444 + GROUP 13 25 + END + NUMERO 1345 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1445 + GROUP 13 + END + NUMERO 1346 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1446 + GROUP 13 25 + END + NUMERO 1347 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1447 + GROUP 13 + END + NUMERO 1348 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1448 + GROUP 13 + END + END // tot gart2 + + END // GART1 + SECTION TOT_GART1 1 1 1 GROUP + STRINGA 1450 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1451 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1453 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,53 + END + NUMERO 1441 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,41 + GROUP 14 + END + NUMERO 1442 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,42 + GROUP 14 25 + END + NUMERO 1443 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,43 + GROUP 14 + END + NUMERO 1444 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,44 + GROUP 14 25 + END + NUMERO 1445 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,45 + GROUP 14 + END + NUMERO 1446 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,46 + GROUP 14 25 + END + NUMERO 1447 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,47 + GROUP 14 + END + NUMERO 1448 11 + BEGIN + KEY "DISP" + prompt 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,1453|ADD,48 + GROUP 14 + END + END // tot gart1 - END // GRUPPI DEPOSITO + END // GRUPPI DEPOSITO - SECTION TOT_DEPOSITO 1 1 1 GROUP - SECTION SEP_DEPOSITO 1 1 NORMAL GROUP - STRINGA 77 - BEGIN - KEY "giac" - PROMPT 52 1 "----------------------------------------------------------------------------------------------------" - END - END - STRINGA 51 12 - BEGIN - KEY "CODICE" - PROMPT 2 1 " Totale dep." - END - STRINGA 50 30 - BEGIN - KEY "descr" - PROMPT 3 1 "" - END - STRINGA 53 3 - BEGIN - KEY "UM" - PROMPT 5 1 "" - MESSAGE COPY,153 - END - NUMERO 41 11 - BEGIN - KEY "GIAC" - PROMPT 6 1 "" - PICTURE "########,@#" - MESSAGE ADD,141 - GROUP 15 - END - NUMERO 42 11 - BEGIN - KEY "ORDF" - PROMPT 7 1 "" - PICTURE "########,@#" - MESSAGE ADD,142 - GROUP 15 - END - - NUMERO 43 11 - BEGIN - KEY "ORDC" - PROMPT 8 1 "" - PICTURE "########,@#" - MESSAGE ADD,143 - GROUP 15 - END - NUMERO 44 11 - BEGIN - KEY "ACL" - PROMPT 9 1 "" - PICTURE "########,@#" - MESSAGE ADD,144 - GROUP 15 - END - NUMERO 45 11 - BEGIN - KEY "INCL" - PROMPT 10 1 "" - PICTURE "########,@#" - MESSAGE ADD,145 - END - NUMERO 46 11 - BEGIN - KEY "PRODFIN" - PROMPT 11 1 "" - PICTURE "########,@#" - MESSAGE ADD,146 - GROUP 15 - END - NUMERO 47 11 - BEGIN - KEY "PRODCOMP" - PROMPT 12 1 "" - PICTURE "########,@#" - MESSAGE ADD,147 - GROUP 15 - END - NUMERO 48 11 - BEGIN - KEY "DISPONIBILITA'" - PROMPT 13 1 "" - PICTURE "#######@,@#" - MESSAGE ADD,148 - GROUP 15 - END - END // tot depositi - END // MAGAZZ + SECTION TOT_DEPOSITO 1 1 1 GROUP + SECTION SEP_DEPOSITO 1 1 NORMAL GROUP + STRINGA 77 + BEGIN + KEY "giac" + PROMPT 52 1 "----------------------------------------------------------------------------------------------------" + END + END + STRINGA 51 12 + BEGIN + KEY "CODICE" + PROMPT 2 1 " Totale dep." + END + STRINGA 50 30 + BEGIN + KEY "descr" + PROMPT 3 1 "" + END + STRINGA 53 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,153 + END + NUMERO 41 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,53|ADD,141 + GROUP 15 + END + NUMERO 42 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,53|ADD,142 + GROUP 15 + END + + NUMERO 43 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,53|ADD,143 + GROUP 15 + END + NUMERO 44 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,53|ADD,144 + GROUP 15 + END + NUMERO 45 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,53|ADD,145 + END + NUMERO 46 11 + BEGIN + KEY "PRODFIN" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,53|ADD,146 + GROUP 15 + END + NUMERO 47 11 + BEGIN + KEY "PRODCOMP" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,53|ADD,147 + GROUP 15 + END + NUMERO 48 11 + BEGIN + KEY "DISPONIBILITA'" + PROMPT 13 1 "" + PICTURE "#######@,@#" + MESSAGE _USER,VALIDATE_UM,53|ADD,148 + GROUP 15 + END + END // tot depositi + END // MAGAZZ - SECTION TOT_MAGAZZINO 1 1 1 GROUP - SECTION SEP_MAGAZZINO 1 1 1 NORMAL GROUP - STRINGA 77 - BEGIN - KEY "giac" + SECTION TOT_MAGAZZINO 1 1 1 GROUP + SECTION SEP_MAGAZZINO 1 1 1 NORMAL GROUP + STRINGA 77 + BEGIN + KEY "giac" PROMPT 50 1 "----------------------------------------------------------------------------------------------------" - END - END - STRINGA 150 30 1 - BEGIN - KEY "Magazzino" - PROMPT 3 1 "" - END - STRINGA 151 12 1 - BEGIN - KEY "Magazzino" - PROMPT 2 1 " Totale mag." - END - STRINGA 153 3 - BEGIN - KEY "UM" - PROMPT 5 1 "" - END - NUMERO 141 11 - BEGIN - KEY "GIAC" - PROMPT 6 1 "" - PICTURE "########,@#" - GROUP 1 - END - NUMERO 142 11 - BEGIN - KEY "ORDF" - PROMPT 7 1 "" - PICTURE "########,@#" - GROUP 1 - END - NUMERO 143 11 - BEGIN - KEY "ORDC" - PROMPT 8 1 "" - PICTURE "########,@#" - GROUP 1 - END - NUMERO 144 11 - BEGIN - KEY "ACL" - PROMPT 9 1 "" - PICTURE "########,@#" - GROUP 1 - END - NUMERO 145 11 - BEGIN - KEY "INCL" - PROMPT 10 1 "" - PICTURE "########,@#" - GROUP 1 - END - NUMERO 146 11 - BEGIN - KEY "PRODF" - PROMPT 11 1 "" - PICTURE "########,@#" - GROUP 1 - END - NUMERO 147 11 - BEGIN - KEY "PRODC" - PROMPT 12 1 "" - PICTURE "########,@#" - GROUP 1 - END - NUMERO 148 11 - BEGIN - KEY "DISP" - PROMPT 13 1 "" - PICTURE "########,@#" - GROUP 1 - END - END // tot magazz + END + END + STRINGA 150 30 1 + BEGIN + KEY "Magazzino" + PROMPT 3 1 "" + END + STRINGA 151 12 1 + BEGIN + KEY "Magazzino" + PROMPT 2 1 " Totale mag." + END + STRINGA 153 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + END + NUMERO 141 11 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,153 + GROUP 1 + END + NUMERO 142 11 + BEGIN + KEY "ORDF" + PROMPT 7 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,153 + GROUP 1 + END + NUMERO 143 11 + BEGIN + KEY "ORDC" + PROMPT 8 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,153 + GROUP 1 + END + NUMERO 144 11 + BEGIN + KEY "ACL" + PROMPT 9 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,153 + GROUP 1 + END + NUMERO 145 11 + BEGIN + KEY "INCL" + PROMPT 10 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,153 + GROUP 1 + END + NUMERO 146 11 + BEGIN + KEY "PRODF" + PROMPT 11 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,153 + GROUP 1 + END + NUMERO 147 11 + BEGIN + KEY "PRODC" + PROMPT 12 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,153 + GROUP 1 + END + NUMERO 148 11 + BEGIN + KEY "DISP" + PROMPT 13 1 "" + PICTURE "########,@#" + MESSAGE _USER,VALIDATE_UM,153 + GROUP 1 + END + END // tot magazz END // section body, loop anamag diff --git a/mg/mg3300a.frm b/mg/mg3300a.frm index e4506cfb2..38e9e8242 100755 --- a/mg/mg3300a.frm +++ b/mg/mg3300a.frm @@ -296,7 +296,7 @@ SECTION BODY ODD 0 STRINGA 100 30 BEGIN - PROMPT 1 1 ">>>" + PROMPT 1 1 "" MESSAGE _STREXPR,LF_RMOVMAG->CODART+"/"+LF_RMOVMAG->LIVGIAC+":"+LF_RMOVMAG->CODMAG END @@ -327,6 +327,7 @@ SECTION BODY ODD 0 END // sezione movimento di competenza END // loop movimento + SECTION TOTALI_MOV 1 2 2 NUMEXPR #FF_SALDO_MOV!=0 NUMBER FF_NUM_MOV 32 BEGIN @@ -373,7 +374,6 @@ SECTION BODY ODD 0 END END // totali mov END // loop scheda - SECTION TOTALI_GRMOV 1 1 3 NUMEXPR #FF_SALDO_GRMOV!=0 STRINGA 100 15 diff --git a/mg/mg4100.cpp b/mg/mg4100.cpp index cf65e5351..8a78608aa 100755 --- a/mg/mg4100.cpp +++ b/mg/mg4100.cpp @@ -95,16 +95,16 @@ void TStampa_listamov::main_loop() { sortexp="NUMREG|CODART|NRIG"; // trova il record iniziale E finale - darec.put("NUMREG",_mask->get(F_DANUM)); - arec.put("NUMREG",_mask->get(F_ANUM)); - _form->find_field('B',odd_page,"HEADER_DATA").hide(); + darec.put(MOVMAG_NUMREG,_mask->get(F_DANUM)); + arec.put(MOVMAG_NUMREG,_mask->get(F_ANUM)); + _form->find_field('B',odd_page,"HEADER_DATA").disable(); } else { sortexp.cut(0) << LF_MOVMAG << "->DATAREG|NUMREG|CODART|NRIG"; // trova il record iniziale E finale if (_mask->get(F_DADATA).not_empty()) - filter << "&&(" << LF_MOVMAG <<"->DATACOMP>=" << '"' << _mask->get(F_DADATA)<< "\")"; + filter << "&&(ANSI(" << LF_MOVMAG <<"->DATACOMP)>=ANSI(" << '"' << _mask->get_date(F_DADATA)<< "\"))"; if (_mask->get(F_ADATA).not_empty()) - filter << "&&(" << LF_MOVMAG <<"->DATACOMP<=" << '"' << _mask->get(F_ADATA) << "\")"; + filter << "&&(ANSI(" << LF_MOVMAG <<"->DATACOMP)<=ANSI(" << '"' << _mask->get_date(F_ADATA) << "\"))"; _form->find_field('B',odd_page,"HEADER_DATA").show(); } diff --git a/mg/mg4100.frm b/mg/mg4100.frm index 7fd4e30b3..7f1935aaf 100755 --- a/mg/mg4100.frm +++ b/mg/mg4100.frm @@ -1,3 +1,4 @@ +#define FF_DATAMOV 555 USE LF_RMOVMAG BY NUMREG CODART NRIG JOIN LF_MOVMAG TO LF_RMOVMAG INTO NUMREG==NUMREG JOIN %CAU TO 110 INTO CODTAB==CODCAUS @@ -30,7 +31,7 @@ SECTION GRAPHIC BEGIN END -SECTION HEADER ODD 6 +SECTION HEADER ODD 5 STRINGA 1 40 1 BEGIN @@ -65,111 +66,96 @@ BEGIN PROMPT 1 3 "------------------------------------------------------------------------------------------------------------------------------------------------------" END -STRINGA 6 -BEGIN - KEY "numreg" - PROMPT 3 4 "Num." -END - -STRINGA 7 -BEGIN - KEY "datacomp" - PROMPT 10 4 "Data" -END - -STRINGA 8 - BEGIN - KEY "descr mov" - PROMPT 20 4 "Descrizione movimento" -END - STRINGA 101 BEGIN KEY "" - PROMPT 2 5 "Cod.mag." + PROMPT 2 4 "Cod.mag." END STRINGA 103 20 BEGIN KEY "" - PROMPT 13 5 "Articolo" + PROMPT 13 4 "Articolo" END STRINGA 104 40 BEGIN KEY "" - PROMPT 35 5 "Descrizione articolo" + PROMPT 35 4 "Descrizione articolo" END -//STRINGA 105 -//BEGIN -// KEY "caus" -// PROMPT 74 5 "Causale" -//END STRINGA 105 BEGIN KEY "UMART" - PROMPT 82 5 "UM" + PROMPT 82 4 "UM" END NUMERO 106 BEGIN KEY "quant" - PROMPT 88 5 "Quantita'" + PROMPT 88 4 "Quantita'" END NUMERO 107 BEGIN KEY "prezzo" - PROMPT 109 5 "Prezzo" + PROMPT 104 4 "Prezzo" END NUMERO 108 BEGIN KEY "valore" - PROMPT 120 5 "Valore" + PROMPT 120 4 "Valore" END STRINGA 100 132 BEGIN KEY "Separatore (iniziale)" - PROMPT 1 6 "------------------------------------------------------------------------------------------------------------------------------------------------------" + PROMPT 1 5 "------------------------------------------------------------------------------------------------------------------------------------------------------" END END SECTION BODY ODD 1 - SECTION HEADER_DATA 1 4 1 GROUP + NUMERO 1 15 + BEGIN + FLAGS "H" + KEY "ENabler" + MESSAGE SHOW,FF_DATAMOV + END + + SECTION HEADER_DATA 1 6 1 GROUP DATA 1 BEGIN KEY "raggr fdata" PROMPT 1 1 "------------- Registrazioni del " FIELD LF_MOVMAG->DATACOMP + MESSAGE HIDE,FF_DATAMOV END END - SECTION RAGG_MOV 1 3 3 FILE LF_RMOVMAG GROUP LF_MOVMAG->DATACOMP + SECTION RAGG_MOV 1 5 3 FILE LF_RMOVMAG GROUP LF_MOVMAG->DATACOMP - NUMERO 1 + NUMERO 1 15 BEGIN KEY "numreg" - PROMPT 1 1 "Registrazione " + PROMPT 1 1 "Num.Reg. " FIELD LF_MOVMAG->NUMREG PICTURE "#####" MESSAGE RESET,10 END - DATA 2 8 + DATA FF_DATAMOV 10 BEGIN KEY "datacomp" - PROMPT 24 1 "" + PROMPT 16 1 "del " FIELD LF_MOVMAG->DATACOMP END STRINGA 3 40 BEGIN KEY "descr mov" - PROMPT 34 1 "" + PROMPT 35 1 "" FIELD LF_MOVMAG->DESCR END STRINGA 4 24 @@ -181,28 +167,12 @@ SECTION BODY ODD 1 STRINGA 5 50 BEGIN KEY " DESCR CAUS" - PROMPT 30 2 "" + PROMPT 35 2 "" FIELD %CAU->S0 END -/* - SECTION INFO_DOC 3 0 1 NUM_EXPR LF_MOVMAG->NUMDOC!=0 - STRINGA 6 20 - BEGIN - KEY " NUMDOC" - PROMPT 10 1 "Documento " - FIELD LF_MOVMAG->NUMDOC - END - STRINGA 7 20 - BEGIN - KEY " datadoc" - PROMPT 30 1 "del " - FIELD 33->DATADOC - END - END -*/ - SECTION INFO_EXDOC 3 0 1 NUM_EXPR LF_MOVMAG->EX_NUMDOC!=0 + SECTION INFO_EXDOC 3 1 1 NUM_EXPR LF_MOVMAG->EX_NUMDOC!=0 STRINGA 6 20 BEGIN KEY " NUMDOC" @@ -218,7 +188,7 @@ SECTION BODY ODD 1 END - SECTION RIGHE_MOV 3 1 1 FILE LF_RMOVMAG GROUP NUMREG + SECTION RIGHE_MOV 3 2 1 FILE LF_RMOVMAG GROUP NUMREG SECTION CAUS_RIGA 1 1 1 STREXPR LF_RMOVMAG->CAUS!="" STRINGA 4 24 BEGIN @@ -313,5 +283,4 @@ SECTION BODY ODD 1 END // BODY SECTION SECTION FOOTER ODD 2 -BEGIN END diff --git a/mg/mg4200.uml b/mg/mg4200.uml index 0336525ad..07bcd8503 100755 --- a/mg/mg4200.uml +++ b/mg/mg4200.uml @@ -34,15 +34,6 @@ BEGIN HELP "reale =(giac+ACL-INCL)" END -LIST F_FIN_COMP 22 -BEGIN - PROMPT 2 3 "Valorizzo solo " - ITEM "C|i componenti impegnati" - ITEM "F|i finiti in produzione" - HELP "finiti =(giac+INPRODF-INPRODC)" -END - - NUMBER F_ANNOES 4 BEGIN FLAGS "A" @@ -57,6 +48,16 @@ BEGIN CHECKTYPE NORMAL END + +LIST F_FIN_COMP 22 +BEGIN + PROMPT 2 3 "Valorizzo solo " + ITEM "C|i componenti impegnati" + ITEM "F|i finiti in produzione" + HELP "finiti =(giac+INPRODF-INPRODC)" +END + + LIST F_FILTRO 23 BEGIN PROMPT 43 3 " Stampo " diff --git a/mg/mg4200a.frm b/mg/mg4200a.frm index 113668f8c..82aa4106e 100755 --- a/mg/mg4200a.frm +++ b/mg/mg4200a.frm @@ -65,157 +65,158 @@ BEGIN PROMPT 1 3 "------------------------------------------------------------------------------------------------------------------------------------------------------" END - LIST FF_ENABLECOLS - BEGIN - FLAGS "H" - ITEM "|only one, " - ITEM "1|only one, " - MESSAGE DISABLE,FG_COL1@|DISABLE,FG_COL2@|DISABLE,FG_COL3@|DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@ - ITEM "2|two" - MESSAGE DISABLE,FG_COL3@|DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@ - ITEM "3|three" - MESSAGE DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@ - ITEM "4|four" - MESSAGE DISABLE,FG_COL5@|DISABLE,FG_COL6@ - ITEM "5|five" - MESSAGE DISABLE,FG_COL6@ - ITEM "6|six" - END + LIST FF_ENABLECOLS + BEGIN + FLAGS "H" + ITEM "|only one, " + ITEM "1|only one, " + MESSAGE DISABLE,FG_COL1@|DISABLE,FG_COL2@|DISABLE,FG_COL3@|DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@ + ITEM "2|two" + MESSAGE DISABLE,FG_COL3@|DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@ + ITEM "3|three" + MESSAGE DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@ + ITEM "4|four" + MESSAGE DISABLE,FG_COL5@|DISABLE,FG_COL6@ + ITEM "5|five" + MESSAGE DISABLE,FG_COL6@ + ITEM "6|six" + END + + STRINGA 1 28 + BEGIN + KEY "H1" + PROMPT 72 4 "" + MESSAGE _USER,NAMEVAL1 + END + STRINGA 1 28 + BEGIN + KEY "H1" + PROMPT 101 4 "" + MESSAGE _USER,NAMEVAL2 + GROUP FG_COL2 + END + STRINGA 1 28 + BEGIN - STRINGA 1 28 - BEGIN KEY "H1" - PROMPT 72 4 "" - MESSAGE _USER,NAMEVAL1 - END - STRINGA 1 28 - BEGIN - KEY "H1" - PROMPT 101 4 "" - MESSAGE _USER,NAMEVAL2 - GROUP FG_COL2 - END - STRINGA 1 28 - BEGIN - KEY "H1" - PROMPT 130 4 "" - MESSAGE _USER,NAMEVAL3 - GROUP FG_COL3 - END - STRINGA 1 28 - BEGIN - KEY "H1" - PROMPT 159 4 "" - MESSAGE _USER,NAMEVAL4 - GROUP FG_COL4 - END - STRINGA 1 28 - BEGIN - KEY "H1" - PROMPT 188 4 "" - MESSAGE _USER,NAMEVAL5 - GROUP FG_COL5 - END - STRINGA 1 28 - BEGIN - KEY "H1" - PROMPT 217 4 "" - MESSAGE _USER,NAMEVAL6 - GROUP FG_COL6 - END + PROMPT 130 4 "" + MESSAGE _USER,NAMEVAL3 + GROUP FG_COL3 + END + STRINGA 1 28 + BEGIN + KEY "H1" + PROMPT 159 4 "" + MESSAGE _USER,NAMEVAL4 + GROUP FG_COL4 + END + STRINGA 1 28 + BEGIN + KEY "H1" + PROMPT 188 4 "" + MESSAGE _USER,NAMEVAL5 + GROUP FG_COL5 + END + STRINGA 1 28 + BEGIN + KEY "H1" + PROMPT 217 4 "" + MESSAGE _USER,NAMEVAL6 + GROUP FG_COL6 + END - STRINGA 6 20 - BEGIN - KEY "H1" - PROMPT 2 5 "Codice" - END - STRINGA 7 40 - BEGIN - KEY "H1" - PROMPT 24 5 "Descrizione" - END - STRINGA 7 40 - BEGIN - KEY "H1" - PROMPT 45 5 "UM" - END - STRINGA 8 12 - BEGIN - KEY "H1" - PROMPT 55 5 "Giacenza" - END - STRINGA 8 12 - BEGIN - KEY "H1" - PROMPT 71 5 "Valore" - END - STRINGA 9 12 - BEGIN - KEY "H1" - PROMPT 84 5 "Val.unitario" - GROUP FG_COL2 - END - STRINGA 9 12 - BEGIN - KEY "H1" - PROMPT 100 5 "Valore" - GROUP FG_COL2 - END - STRINGA 10 12 - BEGIN - KEY "H1" - PROMPT 113 5 "Val.unitario" - GROUP FG_COL2 - END - STRINGA 10 12 - BEGIN - KEY "H1" - PROMPT 129 5 "Valore" - GROUP FG_COL3 - END - STRINGA 11 12 - BEGIN - KEY "H1" - PROMPT 142 5 "Val.unitario" - GROUP FG_COL3 - END - STRINGA 12 12 - BEGIN - KEY "H1" - PROMPT 158 5 "Valore" - GROUP FG_COL4 - END - STRINGA 13 12 - BEGIN - KEY "H1" - PROMPT 171 5 "Val.unitario" - GROUP FG_COL4 - END - STRINGA 14 12 - BEGIN - KEY "H1" - PROMPT 187 5 "Valore" - GROUP FG_COL5 - END - STRINGA 15 12 - BEGIN - KEY "H1" - PROMPT 200 5 "Val.unitario" - GROUP FG_COL5 - END - STRINGA 14 12 - BEGIN - KEY "H1" - PROMPT 216 5 "Valore" - GROUP FG_COL6 - END - STRINGA 15 12 - BEGIN - KEY "H1" - PROMPT 229 5 "Val.unitario" - GROUP FG_COL6 - END + STRINGA 6 20 + BEGIN + KEY "H1" + PROMPT 2 5 "Codice" + END + STRINGA 7 40 + BEGIN + KEY "H1" + PROMPT 24 5 "Descrizione" + END + STRINGA 7 40 + BEGIN + KEY "H1" + PROMPT 45 5 "UM" + END + STRINGA 8 12 + BEGIN + KEY "H1" + PROMPT 55 5 "Giacenza" + END + STRINGA 8 12 + BEGIN + KEY "H1" + PROMPT 71 5 "Valore" + END + STRINGA 9 12 + BEGIN + KEY "H1" + PROMPT 84 5 "Val.unitario" + GROUP FG_COL2 + END + STRINGA 9 12 + BEGIN + KEY "H1" + PROMPT 100 5 "Valore" + GROUP FG_COL2 + END + STRINGA 10 12 + BEGIN + KEY "H1" + PROMPT 113 5 "Val.unitario" + GROUP FG_COL2 + END + STRINGA 10 12 + BEGIN + KEY "H1" + PROMPT 129 5 "Valore" + GROUP FG_COL3 + END + STRINGA 11 12 + BEGIN + KEY "H1" + PROMPT 142 5 "Val.unitario" + GROUP FG_COL3 + END + STRINGA 12 12 + BEGIN + KEY "H1" + PROMPT 158 5 "Valore" + GROUP FG_COL4 + END + STRINGA 13 12 + BEGIN + KEY "H1" + PROMPT 171 5 "Val.unitario" + GROUP FG_COL4 + END + STRINGA 14 12 + BEGIN + KEY "H1" + PROMPT 187 5 "Valore" + GROUP FG_COL5 + END + STRINGA 15 12 + BEGIN + KEY "H1" + PROMPT 200 5 "Val.unitario" + GROUP FG_COL5 + END + STRINGA 14 12 + BEGIN + KEY "H1" + PROMPT 216 5 "Valore" + GROUP FG_COL6 + END + STRINGA 15 12 + BEGIN + KEY "H1" + PROMPT 229 5 "Val.unitario" + GROUP FG_COL6 + END STRINGA 17 146 BEGIN KEY "Separatore (iniziale)" @@ -226,2408 +227,2327 @@ END SECTION BODY ODD 0 COLUMNWISE - LIST FF_ENABLECOLS - BEGIN - FLAGS "H" - ITEM "|only one, " - ITEM "1|only one, " - MESSAGE DISABLE,FG_COL2@|DISABLE,FG_COL3@|DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@ - ITEM "2|two" - MESSAGE DISABLE,FG_COL3@|DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@ - ITEM "3|three" - MESSAGE DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@ - ITEM "4|four" - MESSAGE DISABLE,FG_COL5@|DISABLE,FG_COL6@ - ITEM "5|five" - MESSAGE DISABLE,FG_COL6@ - ITEM "6|six" - END + LIST FF_ENABLECOLS + BEGIN + FLAGS "H" + ITEM "|only one, " + ITEM "1|only one, " + MESSAGE DISABLE,FG_COL2@|DISABLE,FG_COL3@|DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@ + ITEM "2|two" + MESSAGE DISABLE,FG_COL3@|DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@ + ITEM "3|three" + MESSAGE DISABLE,FG_COL4@|DISABLE,FG_COL5@|DISABLE,FG_COL6@ + ITEM "4|four" + MESSAGE DISABLE,FG_COL5@|DISABLE,FG_COL6@ + ITEM "5|five" + MESSAGE DISABLE,FG_COL6@ + ITEM "6|six" + END - NUMBER FF_FLAGTOTQTA 1 - BEGIN - FLAGS "H" - END - - SECTION H_CATMER 1 1 2 GROUP - STRINGA 11 12 2 - BEGIN - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE _USER,CODCATMER - END - STRINGA 12 30 2 - BEGIN - KEY "CODICE CATMER" - PROMPT 3 1 "" - MESSAGE _USER,CATMER|COPY,1550 - END - END + + SECTION H_CATMER 1 2 1 GROUP + STRINGA 11 12 2 + BEGIN + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE _USER,CODCATMER + END + STRINGA 12 30 2 + BEGIN + KEY "CODICE CATMER" + PROMPT 3 1 "" + MESSAGE _USER,CATMER|COPY,1550 + END + END - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,15@ - END + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,15@|_USER,RESET_UM,1553 + END - SECTION GRUPPI_CATMER 1 0 1 FILE LF_ANAMAG GROUP GRMERC + SECTION GRUPPI_CATMER 1 0 0 FILE LF_ANAMAG GROUP GRMERC - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,14@ - END - SECTION H_GCODART1 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,1 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,1|COPY,1450 - END - END + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,14@|_USER,RESET_UM,1453 + END + SECTION H_GCODART1 1 1 1 GROUP + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,1 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,1|COPY,1450 + END + END - SECTION GRUPPI_CODART1 1 0 0 FILE LF_ANAMAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,13@ - END - SECTION H_GCODART2 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,2 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,2|COPY,1350 - END - END + SECTION GRUPPI_CODART1 1 0 0 FILE LF_ANAMAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,13@|_USER,RESET_UM,1353 + END + SECTION H_GCODART2 1 1 1 GROUP + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,2 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,2|COPY,1350 + END + END - SECTION GRUPPI_CODART2 1 0 0 FILE LF_ANAMAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,12@ - END - SECTION H_GCODART3 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,3 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,3|COPY,1250 - END - END + SECTION GRUPPI_CODART2 1 0 0 FILE LF_ANAMAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,12@|_USER,RESET_UM,1253 + END + SECTION H_GCODART3 1 1 1 GROUP + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,3 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,3|COPY,1250 + END + END - SECTION GRUPPI_CODART3 1 0 0 FILE LF_ANAMAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,11@ - END - SECTION H_GCODART4 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,4 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,4|COPY,1150 - END - END + SECTION GRUPPI_CODART3 1 0 0 FILE LF_ANAMAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,11@|_USER,RESET_UM,1153 + END + SECTION H_GCODART4 1 1 1 GROUP + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,4 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,4|COPY,1150 + END + END - SECTION GRUPPI_CODART4 1 0 0 FILE LF_ANAMAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,10@ - END - SECTION H_GCODART5 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,5 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,5|COPY,1050 - END - END + SECTION GRUPPI_CODART4 1 0 0 FILE LF_ANAMAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,10@|_USER,RESET_UM,1053 + END + SECTION H_GCODART5 1 1 1 GROUP + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,5 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,5|COPY,1050 + END + END - SECTION GRUPPI_CODART5 1 0 0 FILE LF_ANAMAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,9@ - END - SECTION H_GCODART6 1 1 2 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,6 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,6|COPY,950 - END - END + SECTION GRUPPI_CODART5 1 0 0 FILE LF_ANAMAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,9@|_USER,RESET_UM,953 + END + SECTION H_GCODART6 1 1 1 GROUP + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,6 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,6|COPY,950 + END + END - SECTION GRUPPI_CODART6 1 0 0 FILE LF_ANAMAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,8@ - END - SECTION H_GCODART7 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,7 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,7|COPY,850 - END - END + SECTION GRUPPI_CODART6 1 0 0 FILE LF_ANAMAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,8@|_USER,RESET_UM,853 + END + SECTION H_GCODART7 1 1 1 GROUP + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,7 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,7|COPY,850 + END + END - SECTION GRUPPI_CODART7 1 0 0 FILE LF_ANAMAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,7@ - END + SECTION GRUPPI_CODART7 1 0 0 FILE LF_ANAMAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,7@|_USER,RESET_UM,753 + END - SECTION H_GCODART8 1 1 1 GROUP - STRINGA 16 12 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 2 1 "" - MESSAGE _USER,CODGRUPPOART,8 - END - STRINGA 17 30 2 - BEGIN - KEY "CODICE GRUPPO" - PROMPT 3 1 "" - MESSAGE _USER,GRUPPOART,8|COPY,750 - END - END + SECTION H_GCODART8 1 1 1 GROUP + STRINGA 16 12 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 2 1 "" + MESSAGE _USER,CODGRUPPOART,8 + END + STRINGA 17 30 2 + BEGIN + KEY "CODICE GRUPPO" + PROMPT 3 1 "" + MESSAGE _USER,GRUPPOART,8|COPY,750 + END + END - SECTION GRUPPI_CODART8 1 0 0 FILE LF_ANAMAG GROUP CODART - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" + SECTION GRUPPI_CODART8 1 0 0 FILE LF_ANAMAG GROUP CODART + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" MESSAGE RESET,6@ - END - SECTION H_ARTICOLO 1 1 1 GROUP - STRINGA 2020 12 2 - BEGIN - KEY "CODICE articolo" - PROMPT 2 1 "" - FIELD CODART - END - STRINGA 21 30 2 - BEGIN - KEY "DESCR.articolo" - PROMPT 3 1 "" - FIELD LF_ANAMAG->DESCR - MESSAGE COPY,650 - END - END + END + SECTION H_ARTICOLO 1 1 1 GROUP + STRINGA 2020 12 2 + BEGIN + KEY "CODICE articolo" + PROMPT 2 1 "" + FIELD CODART + END + STRINGA 21 30 2 + BEGIN + KEY "DESCR.articolo" + PROMPT 3 1 "" + FIELD LF_ANAMAG->DESCR + MESSAGE COPY,650 + END + END - SECTION FILE_GIACENZE 1 1 0 FILE LF_MAG - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "HGIAC" - PROMPT 2 1 "" - MESSAGE RESET,5@ - END - SECTION H_GLIVGIAC1 1 1 1 GROUP - STRINGA 31 50 1 - BEGIN - KEY "Livello giac" - PROMPT 2 1 "" - MESSAGE _USER,GRUPPOGIAC,1|COPY,550 - END - END + SECTION FILE_GIACENZE 1 1 0 FILE LF_MAG + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "HGIAC" + PROMPT 2 1 "" + MESSAGE RESET,5@ + END + SECTION H_GLIVGIAC1 1 1 1 GROUP + STRINGA 31 50 1 + BEGIN + KEY "Livello giac" + PROMPT 2 1 "" + MESSAGE _USER,GRUPPOGIAC,1|COPY,550 + END + END - SECTION GRUPPI_LIVGIAC1 1 0 0 FILE LF_MAG GROUP LIVELLO - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,4@ - END - SECTION H_GLIVGIAC2 1 1 1 GROUP - STRINGA 31 50 1 - BEGIN - KEY "Livello giac" - PROMPT 2 1 "" - MESSAGE _USER,GRUPPOGIAC,2|COPY,450 - END - END + SECTION GRUPPI_LIVGIAC1 1 0 0 FILE LF_MAG GROUP LIVELLO + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,4@ + END + SECTION H_GLIVGIAC2 1 1 1 GROUP + STRINGA 31 50 1 + BEGIN + KEY "Livello giac" + PROMPT 2 1 "" + MESSAGE _USER,GRUPPOGIAC,2|COPY,450 + END + END - SECTION GRUPPI_LIVGIAC2 1 0 0 FILE LF_MAG GROUP LIVELLO - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,3@ - END + SECTION GRUPPI_LIVGIAC2 1 0 0 FILE LF_MAG GROUP LIVELLO + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,3@ + END - SECTION H_GLIVGIAC3 1 1 1 GROUP - STRINGA 31 50 1 - BEGIN - KEY "Livello giac" - PROMPT 2 1 "" - MESSAGE _USER,GRUPPOGIAC,3|COPY,350 - END - END + SECTION H_GLIVGIAC3 1 1 1 GROUP + STRINGA 31 50 1 + BEGIN + KEY "Livello giac" + PROMPT 2 1 "" + MESSAGE _USER,GRUPPOGIAC,3|COPY,350 + END + END - SECTION GRUPPI_LIVGIAC3 1 0 0 FILE LF_MAG GROUP LIVELLO - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "CATMER" - PROMPT 2 1 "" - MESSAGE RESET,2@ - END + SECTION GRUPPI_LIVGIAC3 1 0 0 FILE LF_MAG GROUP LIVELLO + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "CATMER" + PROMPT 2 1 "" + MESSAGE RESET,2@ + END - SECTION H_GLIVGIAC4 1 1 1 GROUP - STRINGA 31 50 1 - BEGIN - KEY "Livello giac" - PROMPT 2 1 "" - MESSAGE _USER,GRUPPOGIAC,4|COPY,250 - END - END + SECTION H_GLIVGIAC4 1 1 1 GROUP + STRINGA 31 50 1 + BEGIN + KEY "Livello giac" + PROMPT 2 1 "" + MESSAGE _USER,GRUPPOGIAC,4|COPY,250 + END + END - SECTION GRUPPI_LIVGIAC4 1 0 0 FILE LF_MAG GROUP LIVELLO - STRINGA 60 40 1 - BEGIN - FLAGS "H" - KEY "MAGAZZ" - PROMPT 2 1 "" - MESSAGE RESET,1@ - END - SECTION H_MAGAZZINO 1 1 1 GROUP - STRINGA 60 40 1 - BEGIN - KEY "codice magazzino" - PROMPT 2 1 "Magazzino " - FIELD 500@->s0 - MESSAGE COPY,150 - END - END + SECTION GRUPPI_LIVGIAC4 1 0 0 FILE LF_MAG GROUP LIVELLO + STRINGA 60 40 1 + BEGIN + FLAGS "H" + KEY "MAGAZZ" + PROMPT 2 1 "" + MESSAGE RESET,1@ + END + SECTION H_MAGAZZINO 1 1 1 GROUP + STRINGA 60 40 1 + BEGIN + KEY "codice magazzino" + PROMPT 2 1 "Magazzino " + FIELD 500@->s0 + MESSAGE COPY,150 + END + END - SECTION GRUPPI_MAGAZZINO 1 0 0 FILE LF_MAG GROUP CODMAG[1,3] - SECTION H_DEPOSITO 1 0 0 GROUP - END - SECTION TOT_DEPOSITO 1 1 1 GROUP - STRINGA 51 12 - BEGIN - KEY "CODICE" - PROMPT 2 1 " Deposito" - END - STRINGA 52 30 - BEGIN - KEY "descr" - PROMPT 3 1 "" - FIELD 501@->s0 - END - STRINGA 53 3 - BEGIN - KEY "UM" - PROMPT 5 1 "" - FIELD LF_UMART->UM - MESSAGE COPY,153 - END - NUMERO 41 12 - BEGIN - KEY "GIAC" - PROMPT 6 1 "" - PICTURE "########,@##" - MESSAGE _USER,GIAC|ADD,141 - END - NUMERO 42 15 - BEGIN - KEY "VAL1" - PROMPT 7 1 "" - PICTURE "##.###.###.##@" - MESSAGE _USER,VAL1|ADD,142 - END - NUMERO 82 12 - BEGIN - KEY "VAL1M" - PROMPT 8 1 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#42/#41 - GROUP FG_COL1 - END - NUMERO 43 15 - BEGIN - KEY "VAL2" - PROMPT 9 1 "" - PICTURE "##.###.###.##@" - MESSAGE _USER,VAL2|ADD,143 - GROUP FG_COL2 - END - NUMERO 83 12 - BEGIN - KEY "VAL2M" - PROMPT 10 1 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#43/#41 - GROUP FG_COL2 - END - NUMERO 44 15 - BEGIN - KEY "VAL3" - PROMPT 11 1 "" - PICTURE "##.###.###.##@" - MESSAGE _USER,VAL3|ADD,144 - GROUP FG_COL3 - END - NUMERO 84 12 - BEGIN - KEY "VAL3M" - PROMPT 12 1 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#44/#41 - GROUP FG_COL3 - END - NUMERO 45 15 - BEGIN - KEY "VAL4" - PROMPT 13 1 "" - PICTURE "##.###.###.##@" - MESSAGE _USER,VAL4|ADD,145 - GROUP FG_COL4 - END - NUMERO 85 12 - BEGIN - KEY "VAL4M" - PROMPT 14 1 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#45/#41 - GROUP FG_COL4 - END - NUMERO 46 15 - BEGIN - KEY "VAL5" - PROMPT 15 1 "" - PICTURE "##.###.###.##@" - MESSAGE _USER,VAL5|ADD,146 - GROUP FG_COL5 - END - NUMERO 86 12 - BEGIN - KEY "VAL5M" - PROMPT 16 1 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#46/#41 - GROUP FG_COL5 - END - NUMERO 47 15 - BEGIN - KEY "VAL6" - PROMPT 17 1 "" - PICTURE "##.###.###.##@" - MESSAGE _USER,VAL6|ADD,147 - GROUP FG_COL6 - END - NUMERO 87 12 - BEGIN - KEY "VAL6M" - PROMPT 18 1 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#47/#41 - GROUP FG_COL6 - END - END // depositi dello stesso magazzino - END // MAGAZZ + SECTION GRUPPI_MAGAZZINO 1 0 0 FILE LF_MAG GROUP CODMAG[1,3] + SECTION H_DEPOSITO 1 0 0 GROUP + END + SECTION TOT_DEPOSITO 1 1 1 GROUP + STRINGA 51 12 + BEGIN + KEY "CODICE" + PROMPT 2 1 " Deposito" + END + STRINGA 52 30 + BEGIN + KEY "descr" + PROMPT 3 1 "" + FIELD 501@->s0 + END + STRINGA 53 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + FIELD LF_UMART->UM + MESSAGE COPY,153 + END + NUMERO 41 12 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@##" + MESSAGE _USER,GIAC|ADD,141 + END + NUMERO 42 15 + BEGIN + KEY "VAL1" + PROMPT 7 1 "" + PICTURE "##.###.###.##@" + MESSAGE _USER,VAL1|ADD,142 + END + NUMERO 82 12 + BEGIN + KEY "VAL1M" + PROMPT 8 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#42/#41 + GROUP FG_COL1 + END + NUMERO 43 15 + BEGIN + KEY "VAL2" + PROMPT 9 1 "" + PICTURE "##.###.###.##@" + MESSAGE _USER,VAL2|ADD,143 + GROUP FG_COL2 + END + NUMERO 83 12 + BEGIN + KEY "VAL2M" + PROMPT 10 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#43/#41 + GROUP FG_COL2 + END + NUMERO 44 15 + BEGIN + KEY "VAL3" + PROMPT 11 1 "" + PICTURE "##.###.###.##@" + MESSAGE _USER,VAL3|ADD,144 + GROUP FG_COL3 + END + NUMERO 84 12 + BEGIN + KEY "VAL3M" + PROMPT 12 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#44/#41 + GROUP FG_COL3 + END + NUMERO 45 15 + BEGIN + KEY "VAL4" + PROMPT 13 1 "" + PICTURE "##.###.###.##@" + MESSAGE _USER,VAL4|ADD,145 + GROUP FG_COL4 + END + NUMERO 85 12 + BEGIN + KEY "VAL4M" + PROMPT 14 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#45/#41 + GROUP FG_COL4 + END + NUMERO 46 15 + BEGIN + KEY "VAL5" + PROMPT 15 1 "" + PICTURE "##.###.###.##@" + MESSAGE _USER,VAL5|ADD,146 + GROUP FG_COL5 + END + NUMERO 86 12 + BEGIN + KEY "VAL5M" + PROMPT 16 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#46/#41 + GROUP FG_COL5 + END + NUMERO 47 15 + BEGIN + KEY "VAL6" + PROMPT 17 1 "" + PICTURE "##.###.###.##@" + MESSAGE _USER,VAL6|ADD,147 + GROUP FG_COL6 + END + NUMERO 87 12 + BEGIN + KEY "VAL6M" + PROMPT 18 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#47/#41 + GROUP FG_COL6 + END + END // depositi dello stesso magazzino + END // MAGAZZ - SECTION TOT_MAGAZZINO 1 1 1 GROUP - STRINGA 150 30 2 - BEGIN - KEY "Magazzino" - PROMPT 3 1 "" - END - STRINGA 151 12 2 - BEGIN - KEY "Magazzino" - PROMPT 2 1 " Totale mag." - END - STRINGA 153 3 - BEGIN - KEY "UM" - PROMPT 5 1 "" - MESSAGE COPY,253 - END - NUMERO 141 12 - BEGIN - KEY "GIAC" - PROMPT 6 1 "" - PICTURE "########,@##" - MESSAGE ADD,241 - GROUP 1 - END - NUMERO 142 15 - BEGIN - KEY "VAL1" - PROMPT 7 1 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,242 - GROUP 1 - END - NUMERO 182 12 - BEGIN - KEY "VAL1" - PROMPT 8 1 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#142/#141 - GROUP 1 FG_COL1 - END - NUMERO 143 15 - BEGIN - KEY "VAL2" - PROMPT 9 1 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,243 - GROUP 1 FG_COL2 - END - NUMERO 183 12 - BEGIN - KEY "VAL1" - PROMPT 10 1 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#143/#141 - GROUP 1 FG_COL2 - END - NUMERO 144 15 - BEGIN - KEY "VAL3" - PROMPT 11 1 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,244 - GROUP 1 FG_COL3 - END - NUMERO 184 15 - BEGIN - KEY "VAL1" - PROMPT 12 1 "" - PICTURE "##.###.###.##@" - MESSAGE _NUMEXPR,#144/#141 - GROUP 1 FG_COL3 - END - NUMERO 145 12 - BEGIN - KEY "VAL4" - PROMPT 13 1 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,245 - GROUP 1 FG_COL4 - END - NUMERO 185 12 - BEGIN - KEY "VAL4" - PROMPT 14 1 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#145/#141 - GROUP 1 FG_COL4 - END - NUMERO 146 15 - BEGIN - KEY "VAL5" - PROMPT 15 1 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,246 - GROUP 1 FG_COL5 - END - NUMERO 186 12 - BEGIN - KEY "VAL1" - PROMPT 16 1 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#146/#141 - GROUP 1 FG_COL5 - END - NUMERO 147 15 - BEGIN - KEY "VAL6" - PROMPT 17 1 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,247 - GROUP 1 FG_COL6 - END - NUMERO 187 12 - BEGIN - KEY "VAL6" - PROMPT 18 1 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#147/#141 - GROUP 1 FG_COL6 - END - END // tot magazz - - END // GGIAC4 - SECTION TOT_GLIVGIAC4 1 2 2 GROUP - STRINGA 1 255 - BEGIN - KEY "sep" + SECTION TOT_MAGAZZINO 1 1 1 GROUP + STRINGA 150 30 2 + BEGIN + KEY "Magazzino" + PROMPT 3 1 "" + END + STRINGA 151 12 2 + BEGIN + KEY "Magazzino" + PROMPT 2 1 " Totale mag." + END + STRINGA 153 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE COPY,253 + END + NUMERO 141 12 + BEGIN + KEY "GIAC" + PROMPT 6 1 "" + PICTURE "########,@##" + MESSAGE ADD,241 + GROUP 1 + END + NUMERO 142 15 + BEGIN + KEY "VAL1" + PROMPT 7 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,242 + GROUP 1 + END + NUMERO 182 12 + BEGIN + KEY "VAL1" + PROMPT 8 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#142/#141 + GROUP 1 FG_COL1 + END + NUMERO 143 15 + BEGIN + KEY "VAL2" + PROMPT 9 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,243 + GROUP 1 FG_COL2 + END + NUMERO 183 12 + BEGIN + KEY "VAL1" + PROMPT 10 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#143/#141 + GROUP 1 FG_COL2 + END + NUMERO 144 15 + BEGIN + KEY "VAL3" + PROMPT 11 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,244 + GROUP 1 FG_COL3 + END + NUMERO 184 15 + BEGIN + KEY "VAL1" + PROMPT 12 1 "" + PICTURE "##.###.###.##@" + MESSAGE _NUMEXPR,#144/#141 + GROUP 1 FG_COL3 + END + NUMERO 145 12 + BEGIN + KEY "VAL4" + PROMPT 13 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,245 + GROUP 1 FG_COL4 + END + NUMERO 185 12 + BEGIN + KEY "VAL4" + PROMPT 14 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#145/#141 + GROUP 1 FG_COL4 + END + NUMERO 146 15 + BEGIN + KEY "VAL5" + PROMPT 15 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,246 + GROUP 1 FG_COL5 + END + NUMERO 186 12 + BEGIN + KEY "VAL1" + PROMPT 16 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#146/#141 + GROUP 1 FG_COL5 + END + NUMERO 147 15 + BEGIN + KEY "VAL6" + PROMPT 17 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,247 + GROUP 1 FG_COL6 + END + NUMERO 187 12 + BEGIN + KEY "VAL6" + PROMPT 18 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#147/#141 + GROUP 1 FG_COL6 + END + END // tot magazz + + END // GGIAC4 + SECTION TOT_GLIVGIAC4 1 1 1 GROUP + STRINGA 250 35 2 + BEGIN + PROMPT 3 1 "" + END + STRINGA 251 7 2 + BEGIN + KEY "Livello giac4" + PROMPT 2 1 " Totale" + END + STRINGA 253 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE COPY,353 + END + NUMERO 241 12 + BEGIN + KEY "GIAC" PROMPT 6 1 "" - MESSAGE _USER,LINEATOTALI - END - STRINGA 250 35 2 - BEGIN - PROMPT 3 2 "" - END - STRINGA 251 7 2 - BEGIN - KEY "Livello giac4" - PROMPT 2 2 " Totale" - END - STRINGA 253 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,353 - END - NUMERO 241 12 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@##" - MESSAGE ADD,341 - GROUP 2 - END - NUMERO 242 15 - BEGIN - KEY "VAL1" - PROMPT 7 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,342 - GROUP 2 - END - NUMERO 282 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 8 2 "" + PICTURE "########,@##" + MESSAGE ADD,341 + GROUP 2 + END + NUMERO 242 15 + BEGIN + KEY "VAL1" + PROMPT 7 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,342 + GROUP 2 + END + NUMERO 282 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 8 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#242/#241 + GROUP 2 FG_COL1 + END + NUMERO 243 15 + BEGIN + KEY "VAL2" + PROMPT 9 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,343 + GROUP 2 FG_COL2 + END + NUMERO 283 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 10 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#243/#241 + GROUP 2 FG_COL2 + END + NUMERO 244 15 + BEGIN + KEY "VAL3" + PROMPT 11 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,344 + GROUP 2 FG_COL3 + END + NUMERO 284 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 12 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#244/#241 + GROUP 2 FG_COL3 + END + NUMERO 245 15 + BEGIN + KEY "COL4" + PROMPT 13 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,345 + GROUP 2 FG_COL4 + END + NUMERO 285 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 14 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#245/#241 + GROUP 2 FG_COL4 + END + NUMERO 246 15 + BEGIN + KEY "COL5" + PROMPT 15 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,346 + GROUP 2 FG_COL5 + END + NUMERO 286 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 16 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#246/#241 + GROUP 2 FG_COL5 + END + NUMERO 247 15 + BEGIN + KEY "giac" + PROMPT 17 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,347 + GROUP 2 FG_COL6 + END + NUMERO 287 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 18 1 "" PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#242/#241 - GROUP 2 FG_COL1 - END - NUMERO 243 15 - BEGIN - KEY "VAL2" - PROMPT 9 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,343 - GROUP 2 FG_COL2 - END - NUMERO 283 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 10 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#243/#241 - GROUP 2 FG_COL2 - END - NUMERO 244 15 - BEGIN - KEY "VAL3" - PROMPT 11 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,344 - GROUP 2 FG_COL3 - END - NUMERO 284 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 12 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#244/#241 - GROUP 2 FG_COL3 - END - NUMERO 245 15 - BEGIN - KEY "COL4" - PROMPT 13 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,345 - GROUP 2 FG_COL4 - END - NUMERO 285 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 14 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#245/#241 - GROUP 2 FG_COL4 - END - NUMERO 246 15 - BEGIN - KEY "COL5" - PROMPT 15 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,346 - GROUP 2 FG_COL5 - END - NUMERO 286 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 16 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#246/#241 - GROUP 2 FG_COL5 - END - NUMERO 247 15 - BEGIN - KEY "giac" - PROMPT 17 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,347 - GROUP 2 FG_COL6 - END - NUMERO 287 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#246/#241 - GROUP 2 FG_COL6 - END - END // tot ggiac4 - - END // GGIAC3 - SECTION TOT_GLIVGIAC3 1 2 2 GROUP - STRINGA 1 255 - BEGIN - KEY "sep" + MESSAGE _NUMEXPR,#246/#241 + GROUP 2 FG_COL6 + END + END // tot ggiac4 + + END // GGIAC3 + SECTION TOT_GLIVGIAC3 1 1 1 GROUP + STRINGA 350 35 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 351 7 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 353 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE COPY,453 + END + NUMERO 341 12 + BEGIN + KEY "GIAC" PROMPT 6 1 "" - MESSAGE _USER,LINEATOTALI - END - STRINGA 350 35 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 351 7 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 353 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,453 - END - NUMERO 341 12 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@##" - MESSAGE ADD,441 - GROUP 3 - END - NUMERO 342 15 - BEGIN - KEY "COL1" - PROMPT 7 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,442 - GROUP 3 - END - NUMERO 382 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 8 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#342/#341 - GROUP 3 FG_COL1 - END - NUMERO 343 15 - BEGIN - KEY "COL2" - PROMPT 9 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,443 - GROUP 3 FG_COL2 - END - NUMERO 383 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 10 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#343/#341 - GROUP 3 FG_COL2 - END - NUMERO 344 15 - BEGIN - KEY "COL3" - PROMPT 11 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,444 - GROUP 3 FG_COL3 - END - NUMERO 384 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 12 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#344/#341 - GROUP 3 FG_COL3 - END - NUMERO 345 15 - BEGIN - KEY "COL4" - PROMPT 13 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,445 - GROUP 3 FG_COL4 - END - NUMERO 385 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 14 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#345/#341 - GROUP 3 FG_COL4 - END - NUMERO 346 15 - BEGIN - KEY "COL5" - PROMPT 15 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,446 - GROUP 3 FG_COL5 - END - NUMERO 386 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 16 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#346/#341 - GROUP 3 FG_COL5 - END - NUMERO 347 15 - BEGIN - KEY "COL6" - PROMPT 17 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,447 - GROUP 3 FG_COL6 - END - NUMERO 387 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#347/#341 - GROUP 3 FG_COL6 - END - END // tot ggiac3 - - END // GGIAC2 - SECTION TOT_GLIVGIAC2 1 2 2 GROUP - STRINGA 1 255 - BEGIN - KEY "sep" + PICTURE "########,@##" + MESSAGE ADD,441 + GROUP 3 + END + NUMERO 342 15 + BEGIN + KEY "COL1" + PROMPT 7 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,442 + GROUP 3 + END + NUMERO 382 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 8 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#342/#341 + GROUP 3 FG_COL1 + END + NUMERO 343 15 + BEGIN + KEY "COL2" + PROMPT 9 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,443 + GROUP 3 FG_COL2 + END + NUMERO 383 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 10 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#343/#341 + GROUP 3 FG_COL2 + END + NUMERO 344 15 + BEGIN + KEY "COL3" + PROMPT 11 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,444 + GROUP 3 FG_COL3 + END + NUMERO 384 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 12 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#344/#341 + GROUP 3 FG_COL3 + END + NUMERO 345 15 + BEGIN + KEY "COL4" + PROMPT 13 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,445 + GROUP 3 FG_COL4 + END + NUMERO 385 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 14 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#345/#341 + GROUP 3 FG_COL4 + END + NUMERO 346 15 + BEGIN + KEY "COL5" + PROMPT 15 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,446 + GROUP 3 FG_COL5 + END + NUMERO 386 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 16 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#346/#341 + GROUP 3 FG_COL5 + END + NUMERO 347 15 + BEGIN + KEY "COL6" + PROMPT 17 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,447 + GROUP 3 FG_COL6 + END + NUMERO 387 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 18 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#347/#341 + GROUP 3 FG_COL6 + END + END // tot ggiac3 + + END // GGIAC2 + SECTION TOT_GLIVGIAC2 1 1 1 GROUP + STRINGA 450 35 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 451 7 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 453 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE COPY,553 + END + NUMERO 441 12 + BEGIN + KEY "GIAC" PROMPT 6 1 "" - MESSAGE _USER,LINEATOTALI - END - STRINGA 450 35 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 451 7 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 453 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,553 - END - NUMERO 441 12 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@##" - MESSAGE ADD,541 - GROUP 4 - END - NUMERO 442 15 - BEGIN - KEY "VAL1" - PROMPT 7 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,542 - GROUP 4 - END - NUMERO 482 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 8 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#442/#441 - GROUP 4 FG_COL1 - END - NUMERO 443 15 - BEGIN - KEY "COL2" - PROMPT 9 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,543 - GROUP 4 FG_COL2 - END - NUMERO 483 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 10 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#443/#441 - GROUP 4 FG_COL2 - END - NUMERO 444 15 - BEGIN - KEY "COL3" - PROMPT 11 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,544 - GROUP 4 FG_COL3 - END - NUMERO 484 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 12 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#444/#441 - GROUP 4 FG_COL3 - END - NUMERO 445 15 - BEGIN - KEY "COL4" - PROMPT 13 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,545 - GROUP 4 FG_COL4 - END - NUMERO 485 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 14 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#445/#441 - GROUP 4 FG_COL4 - END - NUMERO 446 15 - BEGIN - KEY "COL5" - PROMPT 15 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,546 - GROUP 4 FG_COL5 - END - NUMERO 486 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 16 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#446/#441 - GROUP 4 FG_COL5 - END - NUMERO 447 15 - BEGIN - KEY "giac" - PROMPT 17 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,547 - GROUP 4 FG_COL6 - END - NUMERO 487 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#447/#441 - GROUP 4 FG_COL6 - END - END // tot ggiac2 - END // GGIAC1 - SECTION TOT_GLIVGIAC1 1 2 2 GROUP - STRINGA 1 255 - BEGIN - KEY "sep" + PICTURE "########,@##" + MESSAGE ADD,541 + GROUP 4 + END + NUMERO 442 15 + BEGIN + KEY "VAL1" + PROMPT 7 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,542 + GROUP 4 + END + NUMERO 482 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 8 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#442/#441 + GROUP 4 FG_COL1 + END + NUMERO 443 15 + BEGIN + KEY "COL2" + PROMPT 9 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,543 + GROUP 4 FG_COL2 + END + NUMERO 483 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 10 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#443/#441 + GROUP 4 FG_COL2 + END + NUMERO 444 15 + BEGIN + KEY "COL3" + PROMPT 11 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,544 + GROUP 4 FG_COL3 + END + NUMERO 484 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 12 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#444/#441 + GROUP 4 FG_COL3 + END + NUMERO 445 15 + BEGIN + KEY "COL4" + PROMPT 13 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,545 + GROUP 4 FG_COL4 + END + NUMERO 485 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 14 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#445/#441 + GROUP 4 FG_COL4 + END + NUMERO 446 15 + BEGIN + KEY "COL5" + PROMPT 15 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,546 + GROUP 4 FG_COL5 + END + NUMERO 486 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 16 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#446/#441 + GROUP 4 FG_COL5 + END + NUMERO 447 15 + BEGIN + KEY "giac" + PROMPT 17 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,547 + GROUP 4 FG_COL6 + END + NUMERO 487 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 18 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#447/#441 + GROUP 4 FG_COL6 + END + END // tot ggiac2 + END // GGIAC1 + SECTION TOT_GLIVGIAC1 1 1 1 GROUP + STRINGA 550 35 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 551 7 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 553 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE COPY,653 + END + NUMERO 541 12 + BEGIN + KEY "GIAC" PROMPT 6 1 "" - MESSAGE _USER,LINEATOTALI - END - STRINGA 550 35 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 551 7 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 553 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,653 - END - NUMERO 541 12 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@##" - MESSAGE ADD,641 - GROUP 5 - END - NUMERO 542 15 - BEGIN - KEY "VAL1" - PROMPT 7 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,642 - GROUP 5 - END - NUMERO 582 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 8 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#542/#541 - GROUP 5 FG_COL1 - END - NUMERO 543 15 - BEGIN - KEY "COL2" - PROMPT 9 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,643 - GROUP 5 FG_COL2 - END - NUMERO 583 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 10 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#543/#541 - GROUP 5 FG_COL2 - END - NUMERO 544 15 - BEGIN - KEY "COL3" - PROMPT 11 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,644 - GROUP 5 FG_COL3 - END - NUMERO 584 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 12 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#544/#541 - GROUP 5 FG_COL3 - END - NUMERO 545 15 - BEGIN - KEY "COL4" - PROMPT 13 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,645 - GROUP 5 FG_COL4 - END - NUMERO 585 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 14 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#545/#541 - GROUP 5 FG_COL4 - END - NUMERO 546 15 - BEGIN - KEY "COL5" - PROMPT 15 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,646 - GROUP 5 FG_COL5 - END - NUMERO 586 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 16 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#546/#541 - GROUP 5 FG_COL5 - END - NUMERO 547 15 - BEGIN - KEY "giac" - PROMPT 17 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,647 - GROUP 5 FG_COL6 - END - NUMERO 587 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#547/#541 - GROUP 5 FG_COL6 - END - END // tot ggiac1 + PICTURE "########,@##" + MESSAGE ADD,641 + GROUP 5 + END + NUMERO 542 15 + BEGIN + KEY "VAL1" + PROMPT 7 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,642 + GROUP 5 + END + NUMERO 582 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 8 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#542/#541 + GROUP 5 FG_COL1 + END + NUMERO 543 15 + BEGIN + KEY "COL2" + PROMPT 9 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,643 + GROUP 5 FG_COL2 + END + NUMERO 583 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 10 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#543/#541 + GROUP 5 FG_COL2 + END + NUMERO 544 15 + BEGIN + KEY "COL3" + PROMPT 11 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,644 + GROUP 5 FG_COL3 + END + NUMERO 584 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 12 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#544/#541 + GROUP 5 FG_COL3 + END + NUMERO 545 15 + BEGIN + KEY "COL4" + PROMPT 13 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,645 + GROUP 5 FG_COL4 + END + NUMERO 585 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 14 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#545/#541 + GROUP 5 FG_COL4 + END + NUMERO 546 15 + BEGIN + KEY "COL5" + PROMPT 15 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,646 + GROUP 5 FG_COL5 + END + NUMERO 586 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 16 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#546/#541 + GROUP 5 FG_COL5 + END + NUMERO 547 15 + BEGIN + KEY "giac" + PROMPT 17 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,647 + GROUP 5 FG_COL6 + END + NUMERO 587 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 18 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#547/#541 + GROUP 5 FG_COL6 + END + END // tot ggiac1 - END // FILE GIACENZE - SECTION TOT_ARTICOLO 1 2 2 GROUP - STRINGA 1 255 - BEGIN - KEY "sep" + END // FILE GIACENZE + SECTION TOT_ARTICOLO 1 1 1 GROUP + STRINGA 650 30 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 651 12 2 + BEGIN + KEY "" + PROMPT 2 1 "Articolo " + END + STRINGA 653 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,753 + END + NUMERO 641 12 + BEGIN + KEY "GIAC" PROMPT 6 1 "" - MESSAGE _USER,LINEATOTALI - END - STRINGA 650 30 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 651 12 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale art." - END - STRINGA 653 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,753 - END - NUMERO 641 12 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@##" - MESSAGE ADD,741 - GROUP 6 - END - NUMERO 642 15 - BEGIN - KEY "VAL1" - PROMPT 7 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,742 - GROUP 6 - END - NUMERO 682 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 8 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#642/#641 - GROUP 6 FG_COL1 - END - NUMERO 643 15 - BEGIN - KEY "COL2" - PROMPT 9 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,743 - GROUP 6 FG_COL2 - END - NUMERO 683 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 10 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#643/#641 - GROUP 6 FG_COL2 - END - NUMERO 644 15 - BEGIN - KEY "COL3" - PROMPT 11 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,744 - GROUP 6 FG_COL3 - END - NUMERO 684 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 12 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#644/#641 - GROUP 6 FG_COL3 - END - NUMERO 645 15 - BEGIN - KEY "COL4" - PROMPT 13 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,745 - GROUP 6 FG_COL4 - END - NUMERO 685 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 14 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#645/#641 - GROUP 6 FG_COL4 - END - NUMERO 646 15 - BEGIN - KEY "COL5" - PROMPT 15 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,746 - GROUP 6 FG_COL5 - END - NUMERO 686 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 16 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#646/#641 - GROUP 6 FG_COL5 - END - NUMERO 647 15 - BEGIN - KEY "giac" - PROMPT 17 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,747 - GROUP 6 FG_COL6 - END - NUMERO 687 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#647/#641 - GROUP 6 FG_COL6 - END - END // TOT ART + PICTURE "########,@##" + MESSAGE ADD,741 + GROUP 6 + END + NUMERO 642 15 + BEGIN + KEY "VAL1" + PROMPT 7 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,742 + GROUP 6 + END + NUMERO 682 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 8 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#642/#641 + GROUP 6 FG_COL1 + END + NUMERO 643 15 + BEGIN + KEY "COL2" + PROMPT 9 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,743 + GROUP 6 FG_COL2 + END + NUMERO 683 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 10 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#643/#641 + GROUP 6 FG_COL2 + END + NUMERO 644 15 + BEGIN + KEY "COL3" + PROMPT 11 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,744 + GROUP 6 FG_COL3 + END + NUMERO 684 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 12 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#644/#641 + GROUP 6 FG_COL3 + END + NUMERO 645 15 + BEGIN + KEY "COL4" + PROMPT 13 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,745 + GROUP 6 FG_COL4 + END + NUMERO 685 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 14 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#645/#641 + GROUP 6 FG_COL4 + END + NUMERO 646 15 + BEGIN + KEY "COL5" + PROMPT 15 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,746 + GROUP 6 FG_COL5 + END + NUMERO 686 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 16 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#646/#641 + GROUP 6 FG_COL5 + END + NUMERO 647 15 + BEGIN + KEY "giac" + PROMPT 17 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,747 + GROUP 6 FG_COL6 + END + NUMERO 687 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 18 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#647/#641 + GROUP 6 FG_COL6 + END + END // TOT ART - END // GART8 - SECTION TOT_GART8 1 2 2 GROUP - STRINGA 1 255 - BEGIN - KEY "sep" + END // GART8 + SECTION TOT_GART8 1 1 1 GROUP + STRINGA 750 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 751 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 753 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,853 + END + NUMERO 741 12 + BEGIN + KEY "GIAC" PROMPT 6 1 "" - MESSAGE _USER,LINEATOTALI - END - STRINGA 750 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 751 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 753 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,853 - END - NUMERO 741 12 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@##" - MESSAGE _NUMEXPR,#FF_FLAGTOTQTA*#741|ADD,841 - GROUP 7 - END - NUMERO 742 15 - BEGIN - KEY "VAL1" - PROMPT 7 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,842 - GROUP 7 - END - NUMERO 782 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 8 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#742/#741 - GROUP 7 FG_COL1 - END - NUMERO 743 15 - BEGIN - KEY "COL2" - PROMPT 9 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,843 - GROUP 7 FG_COL2 - END - NUMERO 783 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 10 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#743/#741 - GROUP 7 FG_COL2 - END - NUMERO 744 15 - BEGIN - KEY "COL3" - PROMPT 11 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,844 - GROUP 7 FG_COL3 - END - NUMERO 784 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 12 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#744/#741 - GROUP 7 FG_COL3 - END - NUMERO 745 15 - BEGIN - KEY "COL4" - PROMPT 13 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,845 - GROUP 7 FG_COL4 - END - NUMERO 785 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 14 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#745/#741 - GROUP 7 FG_COL4 - END - NUMERO 746 15 - BEGIN - KEY "COL5" - PROMPT 15 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,846 - GROUP 7 FG_COL5 - END - NUMERO 786 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 16 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#746/#741 - GROUP 7 FG_COL5 - END - NUMERO 747 15 - BEGIN - KEY "COL6" - PROMPT 17 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,847 - GROUP 7 FG_COL6 - END - NUMERO 787 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#747/#741 - GROUP 7 FG_COL6 - END - END // tot gart8 + PICTURE "########,@##" + MESSAGE _USER,VALIDATE_UM,753|ADD,841 + GROUP 7 + END + NUMERO 742 15 + BEGIN + KEY "VAL1" + PROMPT 7 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,842 + GROUP 7 + END + NUMERO 782 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 8 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#742/#741 + GROUP 7 FG_COL1 + END + NUMERO 743 15 + BEGIN + KEY "COL2" + PROMPT 9 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,843 + GROUP 7 FG_COL2 + END + NUMERO 783 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 10 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#743/#741 + GROUP 7 FG_COL2 + END + NUMERO 744 15 + BEGIN + KEY "COL3" + PROMPT 11 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,844 + GROUP 7 FG_COL3 + END + NUMERO 784 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 12 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#744/#741 + GROUP 7 FG_COL3 + END + NUMERO 745 15 + BEGIN + KEY "COL4" + PROMPT 13 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,845 + GROUP 7 FG_COL4 + END + NUMERO 785 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 14 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#745/#741 + GROUP 7 FG_COL4 + END + NUMERO 746 15 + BEGIN + KEY "COL5" + PROMPT 15 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,846 + GROUP 7 FG_COL5 + END + NUMERO 786 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 16 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#746/#741 + GROUP 7 FG_COL5 + END + NUMERO 747 15 + BEGIN + KEY "COL6" + PROMPT 17 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,847 + GROUP 7 FG_COL6 + END + NUMERO 787 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 18 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#747/#741 + GROUP 7 FG_COL6 + END + END // tot gart8 - END // GART7 - SECTION TOT_GART7 1 2 2 GROUP - STRINGA 1 255 - BEGIN - KEY "sep" + END // GART7 + SECTION TOT_GART7 1 1 1 GROUP + STRINGA 850 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 851 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 853 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,953 + END + NUMERO 841 12 + BEGIN + KEY "GIAC" PROMPT 6 1 "" - MESSAGE _USER,LINEATOTALI - END - STRINGA 850 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 851 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 853 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,953 - END - NUMERO 841 12 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@##" - MESSAGE ADD,941 - GROUP 8 - END - NUMERO 842 15 - BEGIN - KEY "VAL1" - PROMPT 7 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,942 - GROUP 8 - END - NUMERO 882 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 8 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#842/#841 - GROUP 8 FG_COL1 - END - NUMERO 843 15 - BEGIN - KEY "COL2" - PROMPT 9 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,943 - GROUP 8 FG_COL2 - END - NUMERO 883 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 10 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#843/#841 - GROUP 8 FG_COL2 - END - NUMERO 844 15 - BEGIN - KEY "COL3" - PROMPT 11 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,944 - GROUP 8 FG_COL3 - END - NUMERO 884 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 12 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#844/#841 - GROUP 8 FG_COL3 - END - NUMERO 845 15 - BEGIN - KEY "COL4" - PROMPT 13 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,945 - GROUP 8 FG_COL4 - END - NUMERO 885 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 14 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#845/#841 - GROUP 8 FG_COL4 - END - NUMERO 846 15 - BEGIN - KEY "COL5" - PROMPT 15 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,946 - GROUP 8 FG_COL5 - END - NUMERO 886 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 16 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#846/#841 - GROUP 8 FG_COL5 - END - NUMERO 847 15 - BEGIN - KEY "giac" - PROMPT 17 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,947 - GROUP 8 FG_COL6 - END - NUMERO 887 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#847/#841 - GROUP 8 FG_COL6 - END - END // tot gart7 + PICTURE "########,@##" + MESSAGE _USER,VALIDATE_UM,853|ADD,941 + GROUP 8 + END + NUMERO 842 15 + BEGIN + KEY "VAL1" + PROMPT 7 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,942 + GROUP 8 + END + NUMERO 882 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 8 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#842/#841 + GROUP 8 FG_COL1 + END + NUMERO 843 15 + BEGIN + KEY "COL2" + PROMPT 9 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,943 + GROUP 8 FG_COL2 + END + NUMERO 883 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 10 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#843/#841 + GROUP 8 FG_COL2 + END + NUMERO 844 15 + BEGIN + KEY "COL3" + PROMPT 11 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,944 + GROUP 8 FG_COL3 + END + NUMERO 884 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 12 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#844/#841 + GROUP 8 FG_COL3 + END + NUMERO 845 15 + BEGIN + KEY "COL4" + PROMPT 13 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,945 + GROUP 8 FG_COL4 + END + NUMERO 885 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 14 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#845/#841 + GROUP 8 FG_COL4 + END + NUMERO 846 15 + BEGIN + KEY "COL5" + PROMPT 15 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,946 + GROUP 8 FG_COL5 + END + NUMERO 886 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 16 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#846/#841 + GROUP 8 FG_COL5 + END + NUMERO 847 15 + BEGIN + KEY "giac" + PROMPT 17 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,947 + GROUP 8 FG_COL6 + END + NUMERO 887 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 18 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#847/#841 + GROUP 8 FG_COL6 + END + END // tot gart7 - END // GART6 - SECTION TOT_GART6 1 2 2 GROUP - STRINGA 1 255 - BEGIN - KEY "sep" + END // GART6 + SECTION TOT_GART6 1 1 1 GROUP + STRINGA 950 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 951 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 953 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1053 + END + NUMERO 941 12 + BEGIN + KEY "GIAC" PROMPT 6 1 "" - MESSAGE _USER,LINEATOTALI - END - STRINGA 950 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 951 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 953 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1053 - END - NUMERO 941 12 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@##" - MESSAGE ADD,1041 - GROUP 9 - END - NUMERO 942 15 - BEGIN - KEY "VAL1" - PROMPT 7 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1042 - GROUP 9 - END - NUMERO 982 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 8 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#942/#941 - GROUP 9 FG_COL1 - END - NUMERO 943 15 - BEGIN - KEY "COL2" - PROMPT 9 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1043 - GROUP 9 FG_COL2 - END - NUMERO 983 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 10 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#943/#941 - GROUP 9 FG_COL2 - END - NUMERO 944 15 - BEGIN - KEY "COL3" - PROMPT 11 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1044 - GROUP 9 FG_COL3 - END - NUMERO 984 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 12 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#944/#941 - GROUP 9 FG_COL3 - END - NUMERO 945 15 - BEGIN - KEY "COL4" - PROMPT 13 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1045 - GROUP 9 FG_COL4 - END - NUMERO 985 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 14 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#945/#941 - GROUP 9 FG_COL4 - END - NUMERO 946 15 - BEGIN - KEY "COL5" - PROMPT 15 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1046 - GROUP 9 FG_COL5 - END - NUMERO 986 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 16 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#946/#941 - GROUP 9 FG_COL5 - END - NUMERO 947 15 - BEGIN - KEY "giac" - PROMPT 17 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1047 - GROUP 9 FG_COL6 - END - NUMERO 987 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#947/#941 - GROUP 9 FG_COL6 - END - END // tot gart6 + PICTURE "########,@##" + MESSAGE _USER,VALIDATE_UM,953|ADD,1041 + GROUP 9 + END + NUMERO 942 15 + BEGIN + KEY "VAL1" + PROMPT 7 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1042 + GROUP 9 + END + NUMERO 982 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 8 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#942/#941 + GROUP 9 FG_COL1 + END + NUMERO 943 15 + BEGIN + KEY "COL2" + PROMPT 9 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1043 + GROUP 9 FG_COL2 + END + NUMERO 983 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 10 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#943/#941 + GROUP 9 FG_COL2 + END + NUMERO 944 15 + BEGIN + KEY "COL3" + PROMPT 11 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1044 + GROUP 9 FG_COL3 + END + NUMERO 984 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 12 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#944/#941 + GROUP 9 FG_COL3 + END + NUMERO 945 15 + BEGIN + KEY "COL4" + PROMPT 13 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1045 + GROUP 9 FG_COL4 + END + NUMERO 985 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 14 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#945/#941 + GROUP 9 FG_COL4 + END + NUMERO 946 15 + BEGIN + KEY "COL5" + PROMPT 15 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1046 + GROUP 9 FG_COL5 + END + NUMERO 986 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 16 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#946/#941 + GROUP 9 FG_COL5 + END + NUMERO 947 15 + BEGIN + KEY "giac" + PROMPT 17 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1047 + GROUP 9 FG_COL6 + END + NUMERO 987 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 18 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#947/#941 + GROUP 9 FG_COL6 + END + END // tot gart6 - END // GART5 - SECTION TOT_GART5 1 2 2 GROUP - STRINGA 1 255 - BEGIN - KEY "sep" + END // GART5 + SECTION TOT_GART5 1 1 1 GROUP + STRINGA 1050 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1051 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1053 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1153 + END + NUMERO 1041 12 + BEGIN + KEY "GIAC" PROMPT 6 1 "" - MESSAGE _USER,LINEATOTALI - END - STRINGA 1050 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1051 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1053 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1153 - END - NUMERO 1041 12 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@##" - MESSAGE ADD,1141 - GROUP 10 - END - NUMERO 1042 15 - BEGIN - KEY "VAL1" - PROMPT 7 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1142 - GROUP 10 - END - NUMERO 1082 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 8 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1042/#1041 - GROUP FG_COL1 - END - NUMERO 1043 15 - BEGIN - KEY "COL2" - PROMPT 9 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1143 - GROUP 10 FG_COL2 - END - NUMERO 1083 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 10 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1043/#1041 - GROUP FG_COL2 - END - NUMERO 1044 15 - BEGIN - KEY "COL3" - PROMPT 11 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1144 - GROUP 10 FG_COL3 - END - NUMERO 1084 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 12 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1044/#1041 - GROUP FG_COL3 - END - NUMERO 1045 15 - BEGIN - KEY "COL4" - PROMPT 13 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1145 - GROUP 10 FG_COL4 - END - NUMERO 1085 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 14 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1045/#1041 - GROUP FG_COL4 - END - NUMERO 1046 15 - BEGIN - KEY "COL5" - PROMPT 15 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1146 - GROUP 10 FG_COL5 - END - NUMERO 1086 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 16 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1046/#1041 - GROUP FG_COL5 - END - NUMERO 1047 15 - BEGIN - KEY "giac" - PROMPT 17 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1147 - GROUP 10 FG_COL6 - END - NUMERO 1087 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1047/#1041 - GROUP FG_COL6 - END - END // tot gart5 + PICTURE "########,@##" + MESSAGE _USER,VALIDATE_UM,1053|ADD,1141 + GROUP 10 + END + NUMERO 1042 15 + BEGIN + KEY "VAL1" + PROMPT 7 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1142 + GROUP 10 + END + NUMERO 1082 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 8 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1042/#1041 + GROUP FG_COL1 + END + NUMERO 1043 15 + BEGIN + KEY "COL2" + PROMPT 9 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1143 + GROUP 10 FG_COL2 + END + NUMERO 1083 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 10 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1043/#1041 + GROUP FG_COL2 + END + NUMERO 1044 15 + BEGIN + KEY "COL3" + PROMPT 11 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1144 + GROUP 10 FG_COL3 + END + NUMERO 1084 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 12 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1044/#1041 + GROUP FG_COL3 + END + NUMERO 1045 15 + BEGIN + KEY "COL4" + PROMPT 13 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1145 + GROUP 10 FG_COL4 + END + NUMERO 1085 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 14 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1045/#1041 + GROUP FG_COL4 + END + NUMERO 1046 15 + BEGIN + KEY "COL5" + PROMPT 15 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1146 + GROUP 10 FG_COL5 + END + NUMERO 1086 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 16 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1046/#1041 + GROUP FG_COL5 + END + NUMERO 1047 15 + BEGIN + KEY "giac" + PROMPT 17 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1147 + GROUP 10 FG_COL6 + END + NUMERO 1087 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 18 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1047/#1041 + GROUP FG_COL6 + END + END // tot gart5 - END // GART4 - SECTION TOT_GART4 1 2 2 GROUP - STRINGA 1 255 - BEGIN - KEY "sep" + END // GART4 + SECTION TOT_GART4 1 1 1 GROUP + STRINGA 1150 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1151 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1153 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1253 + END + NUMERO 1141 12 + BEGIN + KEY "GIAC" PROMPT 6 1 "" - MESSAGE _USER,LINEATOTALI - END - STRINGA 1150 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1151 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1153 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1253 - END - NUMERO 1141 12 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@##" - MESSAGE ADD,1241 - GROUP 11 - END - NUMERO 1142 15 - BEGIN - KEY "VAL1" - PROMPT 7 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1242 - GROUP 11 - END - NUMERO 1182 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 8 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1142/#1141 - GROUP FG_COL1 - END - NUMERO 1143 15 - BEGIN - KEY "COL2" - PROMPT 9 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1243 - GROUP 11 FG_COL2 - END - NUMERO 1183 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 10 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1143/#1141 - GROUP FG_COL2 - END - NUMERO 1144 15 - BEGIN - KEY "COL3" - PROMPT 11 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1244 - GROUP 11 FG_COL3 - END - NUMERO 1184 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 12 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1144/#1141 - GROUP FG_COL3 - END - NUMERO 1145 15 - BEGIN - KEY "COL4" - PROMPT 13 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1245 - GROUP 11 FG_COL4 - END - NUMERO 1185 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 14 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1145/#1141 - GROUP FG_COL4 - END - NUMERO 1146 15 - BEGIN - KEY "COL5" - PROMPT 15 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1246 - GROUP 11 FG_COL5 - END - NUMERO 1186 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 16 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1146/#1141 - GROUP FG_COL5 - END - NUMERO 1147 15 - BEGIN - KEY "giac" - PROMPT 17 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1247 - GROUP 11 FG_COL6 - END - NUMERO 1187 12 - BEGIN - KEY "VAL_MEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1147/#1141 - GROUP FG_COL6 - END - END // tot gart4 + PICTURE "########,@##" + MESSAGE _USER,VALIDATE_UM,1153|ADD,1241 + GROUP 11 + END + NUMERO 1142 15 + BEGIN + KEY "VAL1" + PROMPT 7 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1242 + GROUP 11 + END + NUMERO 1182 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 8 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1142/#1141 + GROUP FG_COL1 + END + NUMERO 1143 15 + BEGIN + KEY "COL2" + PROMPT 9 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1243 + GROUP 11 FG_COL2 + END + NUMERO 1183 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 10 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1143/#1141 + GROUP FG_COL2 + END + NUMERO 1144 15 + BEGIN + KEY "COL3" + PROMPT 11 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1244 + GROUP 11 FG_COL3 + END + NUMERO 1184 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 12 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1144/#1141 + GROUP FG_COL3 + END + NUMERO 1145 15 + BEGIN + KEY "COL4" + PROMPT 13 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1245 + GROUP 11 FG_COL4 + END + NUMERO 1185 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 14 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1145/#1141 + GROUP FG_COL4 + END + NUMERO 1146 15 + BEGIN + KEY "COL5" + PROMPT 15 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1246 + GROUP 11 FG_COL5 + END + NUMERO 1186 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 16 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1146/#1141 + GROUP FG_COL5 + END + NUMERO 1147 15 + BEGIN + KEY "giac" + PROMPT 17 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1247 + GROUP 11 FG_COL6 + END + NUMERO 1187 12 + BEGIN + KEY "VAL_MEDIO" + PROMPT 18 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1147/#1141 + GROUP FG_COL6 + END + END // tot gart4 - END // GART3 - SECTION TOT_GART3 1 2 2 GROUP - STRINGA 1 255 - BEGIN - KEY "sep" + END // GART3 + SECTION TOT_GART3 1 1 1 GROUP + STRINGA 1250 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1251 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1253 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1353 + END + NUMERO 1241 12 + BEGIN + KEY "GIAC" PROMPT 6 1 "" - MESSAGE _USER,LINEATOTALI - END - STRINGA 1250 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1251 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1253 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1353 - END - NUMERO 1241 12 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" PICTURE "########,@##" - MESSAGE ADD,1341 - GROUP 12 - END - NUMERO 1242 15 - BEGIN - KEY "VAL1" - PROMPT 7 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1342 - GROUP 12 - END - NUMERO 1282 12 - BEGIN - KEY "VALMEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1242/#1241 - GROUP 12 FG_COL1 - END - NUMERO 1243 15 - BEGIN - KEY "COL2" - PROMPT 8 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1343 - GROUP 12 FG_COL2 - END - NUMERO 1283 12 - BEGIN - KEY "VALMEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1243/#1241 - GROUP 12 FG_COL2 - END - NUMERO 1244 15 - BEGIN - KEY "COL3" - PROMPT 9 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1344 - GROUP 12 FG_COL3 - END - NUMERO 1284 12 - BEGIN - KEY "VALMEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1244/#1241 - GROUP 12 FG_COL3 - END - NUMERO 1245 15 - BEGIN - KEY "COL4" - PROMPT 10 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1345 - GROUP 12 FG_COL4 - END - NUMERO 1285 12 - BEGIN - KEY "VALMEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1245/#1241 - GROUP 12 FG_COL4 - END - NUMERO 1246 15 - BEGIN - KEY "COL5" - PROMPT 11 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1346 - GROUP 12 FG_COL5 - END - NUMERO 1286 12 - BEGIN - KEY "VALMEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1246/#1241 - GROUP 12 FG_COL5 - END - NUMERO 1247 15 - BEGIN - KEY "giac" - PROMPT 12 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1347 - GROUP 12 FG_COL6 - END - NUMERO 1287 12 - BEGIN - KEY "VALMEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1247/#1241 - GROUP 12 FG_COL6 - END - END // tot gart3 + MESSAGE _USER,VALIDATE_UM,1253|ADD,1341 + GROUP 12 + END + NUMERO 1242 15 + BEGIN + KEY "VAL1" + PROMPT 7 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1342 + GROUP 12 + END + NUMERO 1282 12 + BEGIN + KEY "VALMEDIO" + PROMPT 8 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1242/#1241 + GROUP 12 FG_COL1 + END + NUMERO 1243 15 + BEGIN + KEY "COL2" + PROMPT 9 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1343 + GROUP 12 FG_COL2 + END + NUMERO 1283 12 + BEGIN + KEY "VALMEDIO" + PROMPT 10 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1243/#1241 + GROUP 12 FG_COL2 + END + NUMERO 1244 15 + BEGIN + KEY "COL3" + PROMPT 11 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1344 + GROUP 12 FG_COL3 + END + NUMERO 1284 12 + BEGIN + KEY "VALMEDIO" + PROMPT 12 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1244/#1241 + GROUP 12 FG_COL3 + END + NUMERO 1245 15 + BEGIN + KEY "COL4" + PROMPT 13 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1345 + GROUP 12 FG_COL4 + END + NUMERO 1285 12 + BEGIN + KEY "VALMEDIO" + PROMPT 14 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1245/#1241 + GROUP 12 FG_COL4 + END + NUMERO 1246 15 + BEGIN + KEY "COL5" + PROMPT 15 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1346 + GROUP 12 FG_COL5 + END + NUMERO 1286 12 + BEGIN + KEY "VALMEDIO" + PROMPT 16 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1246/#1241 + GROUP 12 FG_COL5 + END + NUMERO 1247 15 + BEGIN + KEY "giac" + PROMPT 17 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1347 + GROUP 12 FG_COL6 + END + NUMERO 1287 12 + BEGIN + KEY "VALMEDIO" + PROMPT 18 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1247/#1241 + GROUP 12 FG_COL6 + END + END // tot gart3 - END // GART2 - SECTION TOT_GART2 1 2 2 GROUP - STRINGA 1 255 - BEGIN - KEY "sep" + END // GART2 + SECTION TOT_GART2 1 1 1 GROUP + STRINGA 1350 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1351 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1353 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1453 + END + NUMERO 1341 12 + BEGIN + KEY "GIAC" PROMPT 6 1 "" - MESSAGE _USER,LINEATOTALI - END - STRINGA 1350 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1351 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1353 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1453 - END - NUMERO 1341 12 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@##" - MESSAGE ADD,1441 - GROUP 13 - END - NUMERO 1342 15 - BEGIN - KEY "VAL1" - PROMPT 7 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1442 - GROUP 13 - END - NUMERO 1382 12 - BEGIN - KEY "VALMEDIO" - PROMPT 8 2 "" + PICTURE "########,@##" + MESSAGE _USER,VALIDATE_UM,1353|ADD,1441 + GROUP 13 + END + NUMERO 1342 15 + BEGIN + KEY "VAL1" + PROMPT 7 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1442 + GROUP 13 + END + NUMERO 1382 12 + BEGIN + KEY "VALMEDIO" + PROMPT 8 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1342/#1341 + GROUP 13 FG_COL1 + END + NUMERO 1343 15 + BEGIN + KEY "COL2" + PROMPT 9 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1443 + GROUP 13 FG_COL2 + END + NUMERO 1383 12 + BEGIN + KEY "VALMEDIO" + PROMPT 10 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1343/#1341 + GROUP 13 FG_COL2 + END + NUMERO 1344 15 + BEGIN + KEY "COL3" + PROMPT 11 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1444 + GROUP 13 FG_COL3 + END + NUMERO 1384 12 + BEGIN + KEY "VALMEDIO" + PROMPT 12 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1344/#1341 + GROUP 13 FG_COL3 + END + NUMERO 1345 15 + BEGIN + KEY "COL4" + PROMPT 13 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1445 + GROUP 13 FG_COL4 + END + NUMERO 1385 12 + BEGIN + KEY "VALMEDIO" + PROMPT 14 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1345/#1341 + GROUP 13 FG_COL4 + END + NUMERO 1346 15 + BEGIN + KEY "COL5" + PROMPT 15 1 "" PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1342/#1341 - GROUP 13 FG_COL1 - END - NUMERO 1343 15 - BEGIN - KEY "COL2" - PROMPT 9 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1443 - GROUP 13 FG_COL2 - END - NUMERO 1383 12 - BEGIN - KEY "VALMEDIO" - PROMPT 10 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1343/#1341 - GROUP 13 FG_COL2 - END - NUMERO 1344 15 - BEGIN - KEY "COL3" - PROMPT 11 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1444 - GROUP 13 FG_COL3 - END - NUMERO 1384 12 - BEGIN - KEY "VALMEDIO" - PROMPT 12 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1344/#1341 - GROUP 13 FG_COL3 - END - NUMERO 1345 15 - BEGIN - KEY "COL4" - PROMPT 13 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1445 - GROUP 13 FG_COL4 - END - NUMERO 1385 12 - BEGIN - KEY "VALMEDIO" - PROMPT 14 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1345/#1341 - GROUP 13 FG_COL4 - END - NUMERO 1346 15 - BEGIN - KEY "COL5" - PROMPT 15 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1446 - GROUP 13 FG_COL5 - END - NUMERO 1386 12 - BEGIN - KEY "VALMEDIO" - PROMPT 16 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1346/#1341 - GROUP 13 FG_COL5 - END - NUMERO 1347 15 - BEGIN - KEY "giac" - PROMPT 17 2 "" - PICTURE "###.###.##@" - MESSAGE ADD,1447 - GROUP 13 FG_COL6 - END - NUMERO 1387 12 - BEGIN - KEY "VALMEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1347/#1341 - GROUP 13 FG_COL6 - END - END // tot gart2 + MESSAGE ADD,1446 + GROUP 13 FG_COL5 + END + NUMERO 1386 12 + BEGIN + KEY "VALMEDIO" + PROMPT 16 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1346/#1341 + GROUP 13 FG_COL5 + END + NUMERO 1347 15 + BEGIN + KEY "giac" + PROMPT 17 1 "" + PICTURE "###.###.##@" + MESSAGE ADD,1447 + GROUP 13 FG_COL6 + END + NUMERO 1387 12 + BEGIN + KEY "VALMEDIO" + PROMPT 18 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1347/#1341 + GROUP 13 FG_COL6 + END + END // tot gart2 - END // GART1 - SECTION TOT_GART1 1 2 2 GROUP - STRINGA 1 255 - BEGIN - KEY "sep" + END // GART1 + SECTION TOT_GART1 1 1 1 GROUP + STRINGA 1450 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1451 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1453 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + MESSAGE _USER,COPY_UM,1553 + END + NUMERO 1441 12 + BEGIN + KEY "GIAC" PROMPT 6 1 "" - MESSAGE _USER,LINEATOTALI - END - STRINGA 1450 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1451 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1453 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - MESSAGE COPY,1553 - END - NUMERO 1441 12 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@##" - MESSAGE ADD,1541 - GROUP 14 - END - NUMERO 1442 15 - BEGIN - KEY "VAL1" - PROMPT 7 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1542 - GROUP 14 - END - NUMERO 1482 12 - BEGIN - KEY "VALMEDIO" - PROMPT 8 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1442/#1441 - GROUP 14 FG_COL1 - END - NUMERO 1443 15 - BEGIN - KEY "COL2" - PROMPT 9 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1543 - GROUP 14 FG_COL2 - END - NUMERO 1483 12 - BEGIN - KEY "VALMEDIO" - PROMPT 10 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1443/#1441 - GROUP 14 FG_COL2 - END - NUMERO 1444 15 - BEGIN - KEY "COL3" - PROMPT 11 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1544 - GROUP 14 FG_COL3 - END - NUMERO 1484 12 - BEGIN - KEY "VALMEDIO" - PROMPT 12 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1444/#1441 - GROUP 14 FG_COL3 - END - NUMERO 1445 15 - BEGIN - KEY "COL4" - PROMPT 13 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1545 - GROUP 14 FG_COL4 - END - NUMERO 1485 12 - BEGIN - KEY "VALMEDIO" - PROMPT 14 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1445/#1441 - GROUP 14 FG_COL4 - END - NUMERO 1446 15 - BEGIN - KEY "COL5" - PROMPT 15 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1546 - GROUP 14 FG_COL5 - END - NUMERO 1486 12 - BEGIN - KEY "VALMEDIO" - PROMPT 16 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1446/#1441 - GROUP 14 FG_COL5 - END - NUMERO 1447 15 - BEGIN - KEY "giac" - PROMPT 17 2 "" - PICTURE "##.###.###.##@" - MESSAGE ADD,1547 - GROUP 14 FG_COL6 - END - NUMERO 1487 12 - BEGIN - KEY "VALMEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1447/#1441 - GROUP 14 FG_COL6 - END - END // tot gart1 + PICTURE "########,@##" + MESSAGE _USER,VALIDATE_UM,1453|ADD,1541 + GROUP 14 + END + NUMERO 1442 15 + BEGIN + KEY "VAL1" + PROMPT 7 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1542 + GROUP 14 + END + NUMERO 1482 12 + BEGIN + KEY "VALMEDIO" + PROMPT 8 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1442/#1441 + GROUP 14 FG_COL1 + END + NUMERO 1443 15 + BEGIN + KEY "COL2" + PROMPT 9 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1543 + GROUP 14 FG_COL2 + END + NUMERO 1483 12 + BEGIN + KEY "VALMEDIO" + PROMPT 10 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1443/#1441 + GROUP 14 FG_COL2 + END + NUMERO 1444 15 + BEGIN + KEY "COL3" + PROMPT 11 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1544 + GROUP 14 FG_COL3 + END + NUMERO 1484 12 + BEGIN + KEY "VALMEDIO" + PROMPT 12 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1444/#1441 + GROUP 14 FG_COL3 + END + NUMERO 1445 15 + BEGIN + KEY "COL4" + PROMPT 13 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1545 + GROUP 14 FG_COL4 + END + NUMERO 1485 12 + BEGIN + KEY "VALMEDIO" + PROMPT 14 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1445/#1441 + GROUP 14 FG_COL4 + END + NUMERO 1446 15 + BEGIN + KEY "COL5" + PROMPT 15 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1546 + GROUP 14 FG_COL5 + END + NUMERO 1486 12 + BEGIN + KEY "VALMEDIO" + PROMPT 16 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1446/#1441 + GROUP 14 FG_COL5 + END + NUMERO 1447 15 + BEGIN + KEY "giac" + PROMPT 17 1 "" + PICTURE "##.###.###.##@" + MESSAGE ADD,1547 + GROUP 14 FG_COL6 + END + NUMERO 1487 12 + BEGIN + KEY "VALMEDIO" + PROMPT 18 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1447/#1441 + GROUP 14 FG_COL6 + END + END // tot gart1 - END // GRUPPI_CATMER - SECTION TOT_CATMER 1 2 2 GROUP - STRINGA 1 255 - BEGIN - KEY "sep" + END // GRUPPI_CATMER + SECTION TOT_CATMER 1 1 1 GROUP + STRINGA 1 255 + BEGIN + KEY "sep" + PROMPT 6 3 "" + MESSAGE _USER,LINEATOTALI + END + STRINGA 1550 34 2 + BEGIN + KEY "" + PROMPT 3 1 "" + END + STRINGA 1551 8 2 + BEGIN + KEY "" + PROMPT 2 1 " Totale" + END + STRINGA 1553 3 + BEGIN + KEY "UM" + PROMPT 5 1 "" + END + NUMERO 1541 12 + BEGIN + KEY "GIAC" PROMPT 6 1 "" - MESSAGE _USER,LINEATOTALI - END - STRINGA 1550 34 2 - BEGIN - KEY "" - PROMPT 3 2 "" - END - STRINGA 1551 8 2 - BEGIN - KEY "" - PROMPT 2 2 " Totale" - END - STRINGA 1553 3 - BEGIN - KEY "UM" - PROMPT 5 2 "" - END - NUMERO 1541 12 - BEGIN - KEY "GIAC" - PROMPT 6 2 "" - PICTURE "########,@##" - GROUP 15 - END - NUMERO 1542 15 - BEGIN - KEY "VAL1" - PROMPT 7 2 "" - PICTURE "##.###.###.##@" - GROUP 15 - END - NUMERO 1582 12 - BEGIN - KEY "VALMEDIO" - PROMPT 8 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1542/#1541 - GROUP 15 FG_COL1 - END - NUMERO 1543 15 - BEGIN - KEY "COL2" - PROMPT 9 2 "" - PICTURE "##.###.###.##@" - GROUP 15 FG_COL2 - END - NUMERO 1583 12 - BEGIN - KEY "VALMEDIO" - PROMPT 10 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1543/#1541 - GROUP 15 FG_COL2 - END - NUMERO 1544 15 - BEGIN - KEY "COL3" - PROMPT 11 2 "" - PICTURE "##.###.###.##@" - GROUP 15 FG_COL3 - END - NUMERO 1584 12 - BEGIN - KEY "VALMEDIO" - PROMPT 12 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1544/#1541 - GROUP 15 FG_COL3 - END - NUMERO 1545 15 - BEGIN - KEY "COL4" - PROMPT 13 2 "" - PICTURE "##.###.###.##@" - GROUP 15 FG_COL4 - END - NUMERO 1585 12 - BEGIN - KEY "VALMEDIO" - PROMPT 14 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1545/#1541 - GROUP 15 FG_COL4 - END - NUMERO 1546 15 - BEGIN - KEY "COL5" - PROMPT 15 2 "" - PICTURE "##.###.###.##@" - GROUP 15 FG_COL5 - END - NUMERO 1586 12 - BEGIN - KEY "VALMEDIO" - PROMPT 16 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1546/#1541 - GROUP 15 FG_COL5 - END - NUMERO 1547 15 - BEGIN - KEY "COL6" - PROMPT 17 2 "" - PICTURE "##.###.###.##@" - GROUP 15 FG_COL6 - END - NUMERO 1587 12 - BEGIN - KEY "VALMEDIO" - PROMPT 18 2 "" - PICTURE "###.###.##@" - MESSAGE _NUMEXPR,#1547/#1541 - GROUP 15 FG_COL6 - END - END // tot catmerc + PICTURE "########,@##" + MESSAGE _USER,VALIDATE_UM,1553 + GROUP 15 + END + NUMERO 1542 15 + BEGIN + KEY "VAL1" + PROMPT 7 1 "" + PICTURE "##.###.###.##@" + GROUP 15 + END + NUMERO 1582 12 + BEGIN + KEY "VALMEDIO" + PROMPT 8 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1542/#1541 + GROUP 15 FG_COL1 + END + NUMERO 1543 15 + BEGIN + KEY "COL2" + PROMPT 9 1 "" + PICTURE "##.###.###.##@" + GROUP 15 FG_COL2 + END + NUMERO 1583 12 + BEGIN + KEY "VALMEDIO" + PROMPT 10 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1543/#1541 + GROUP 15 FG_COL2 + END + NUMERO 1544 15 + BEGIN + KEY "COL3" + PROMPT 11 1 "" + PICTURE "##.###.###.##@" + GROUP 15 FG_COL3 + END + NUMERO 1584 12 + BEGIN + KEY "VALMEDIO" + PROMPT 12 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1544/#1541 + GROUP 15 FG_COL3 + END + NUMERO 1545 15 + BEGIN + KEY "COL4" + PROMPT 13 1 "" + PICTURE "##.###.###.##@" + GROUP 15 FG_COL4 + END + NUMERO 1585 12 + BEGIN + KEY "VALMEDIO" + PROMPT 14 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1545/#1541 + GROUP 15 FG_COL4 + END + NUMERO 1546 15 + BEGIN + KEY "COL5" + PROMPT 15 1 "" + PICTURE "##.###.###.##@" + GROUP 15 FG_COL5 + END + NUMERO 1586 12 + BEGIN + KEY "VALMEDIO" + PROMPT 16 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1546/#1541 + GROUP 15 FG_COL5 + END + NUMERO 1547 15 + BEGIN + KEY "COL6" + PROMPT 17 1 "" + PICTURE "##.###.###.##@" + GROUP 15 FG_COL6 + END + NUMERO 1587 12 + BEGIN + KEY "VALMEDIO" + PROMPT 18 1 "" + PICTURE "###.###.##@" + MESSAGE _NUMEXPR,#1547/#1541 + GROUP 15 FG_COL6 + END + END // tot catmerc END // section body, loop anamag diff --git a/mg/mg4frm.h b/mg/mg4frm.h index f34bbb616..4d2dce31f 100755 --- a/mg/mg4frm.h +++ b/mg/mg4frm.h @@ -5,12 +5,22 @@ #define FF_PREZZIVALORI 670 #define FF_ENABLECOLS 671 -#define FG_COL1 10 -#define FG_COL2 11 -#define FG_COL3 12 -#define FG_COL4 13 -#define FG_COL5 14 -#define FG_COL6 15 +// Questi sono i gruppi dei raggruppamenti +// e rappresentano i vari gruppi articoli / livello giac / magazzini ed +// altro a seconda della stmpa e dell'ordinamento scelto +// essi non sono implementati come MACRO c++ ma come literal nel testo +// (arrivano in partica fino a 15) +//#define FG_RAGGR1 1 +//#define FG_RAGGR2 2 +// Questi sono i gruppi delle colonne dell'inventario +#define FG_COL1 30 +#define FG_COL2 31 +#define FG_COL3 32 +#define FG_COL4 33 +#define FG_COL5 34 +#define FG_COL6 35 + +// altri gruppi per la stampa dati storici: #define FG_VALORI 25 #define FG_VALMEDI 26 #define FG_RIGAVALORI 27 diff --git a/mg/mginst.ini b/mg/mginst.ini index 1456e673d..814a87424 100755 --- a/mg/mginst.ini +++ b/mg/mginst.ini @@ -1,19 +1,24 @@ [mg] -Data = 01-04-1998 +Data = 08-05-1998 Descrizione = Magazzino Dischi = 1 Moduli = ba,ve9,cg9 -Patch = 304 +Patch = 26 PostProcess = PreProcess = Prezzo(1) = 900,300 -Versione = 19980102 +Prezzo(2) = 270,100 +Prezzo(3) = 180,70 +Prezzo(5) = 140,50 +Prezzo(9) = 90,40 +Prezzo(30) = 50,20 +Versione = 19980103 [mg0] File(0) = mg00.bmp File(1) = mgarea.men -Patch = 304 -Versione = 19980102 +Patch = 26 +Versione = 19980103 [mg1] File(2) = bastfcg.msk @@ -50,19 +55,19 @@ File(32) = mg4300.frm File(33) = mg4300.msk File(34) = mgprassi.men File(35) = tab_fcg.frm -Patch = 304 -Versione = 19980102 +Patch = 26 +Versione = 19980103 [mg9] -File(36) = recdesc\f109.dir -File(37) = recdesc\f109.trr -File(38) = recdesc\f110.dir -File(39) = recdesc\f110.trr -File(40) = recdesc\f111.dir -File(41) = recdesc\f111.trr -File(42) = recdesc\f114.dir -File(43) = recdesc\f114.trr -File(44) = mgprassi.hlp|X -Patch = 304 -Versione = 19980102 +File(36) = mgprassi.hlp|X +File(37) = recdesc\f109.dir +File(38) = recdesc\f109.trr +File(39) = recdesc\f110.dir +File(40) = recdesc\f110.trr +File(41) = recdesc\f111.dir +File(42) = recdesc\f111.trr +File(43) = recdesc\f114.dir +File(44) = recdesc\f114.trr +Patch = 26 +Versione = 19980103 diff --git a/mg/mglib03.cpp b/mg/mglib03.cpp index 918fb9677..6ab32826e 100755 --- a/mg/mglib03.cpp +++ b/mg/mglib03.cpp @@ -112,7 +112,42 @@ bool TForm_stampemg::validate(TForm_item &cf, TToken_string &s) else levname="Giacenza"; cf.set(levname << ' ' << valore); - } + } else if (subcode=="VALIDATE_UM") { + /*CHECK(last_um,"Unità di misura non definita"); + if (last_um->blank()) + cf.set(""); + delete last_um; + last_um = NULL;*/ + TForm_string &um_field=(TForm_string &)cf.form().find_field('B',odd_page,atoi(s.get()) ); + if (*um_field.get()<=' ') // blank : not a valid UM! + cf.set("0"); + } else if (subcode=="SAVE_UM") { + CHECK(FALSE,"SAVE_UM no more available"); + } else if (subcode=="RESET_UM") { + TForm_string &dest=(TForm_string &)cf.form().find_field('B',odd_page,atoi(s.get()) ); + dest.set(""); + } else if (subcode=="COPY_UM") { + /*if (last_um==NULL) + last_um = new TString16(cf.get()); + if (*last_um != cf.get()) + { + // impossibile sommare le quantità degli articoli per UM diverse + last_um->cut(0); + dest.set(""); + cf.form().find_field('B',odd_page,FF_FLAGTOTQTA).set("0"); + }*/ + TForm_string &dest=(TForm_string &)cf.form().find_field('B',odd_page,atoi(s.get()) ); + if (*dest.get() && strcmp(dest.get(),cf.get()) != 0) + { + // impossibile sommare le quantità degli articoli per UM diverse + dest.set(" "); + //cf.form().find_field('B',odd_page,FF_FLAGTOTQTA).set("0"); + } else { + // prima sommare le quantità degli articoli per UM diverse + dest.set( cf.get() ); + //cf.form().find_field('B',odd_page,FF_FLAGTOTQTA).set("0"); + } + } return TRUE; } else return TForm::validate(cf, s); diff --git a/pr/pr1200a.uml b/pr/pr1200a.uml index 05e13bc26..a4570f447 100755 --- a/pr/pr1200a.uml +++ b/pr/pr1200a.uml @@ -21,6 +21,7 @@ BEGIN OUTPUT F_DESCR S0 CHECKTYPE REQUIRED WARNING "Codice archivio non presente" + ADD NONE END STRING F_DESCR 50 diff --git a/pr/prinst.ini b/pr/prinst.ini index 5338738e8..0e5ac7c47 100755 --- a/pr/prinst.ini +++ b/pr/prinst.ini @@ -1,33 +1,40 @@ [pr] -Data = 28-04-1998 +Data = 08-05-1998 Descrizione = Provvigioni Agenti Dischi = 1 Moduli = ba,ve0,ve9,cg9 -Patch = 14 +Patch = 25 PostProcess = PreProcess = Prezzo(1) = 450,150 +Prezzo(2) = 140,50 +Prezzo(3) = 90,40 +Prezzo(5) = 70,30 +Prezzo(9) = 50,20 +Prezzo(30) = 30,10 Versione = 19980103 [pr1] -File(0) = pr01.bmp -File(1) = pr0700a.msk -File(2) = pr0700b.msk -File(3) = pr1300a.frm -File(4) = pr1300a.msk -File(5) = pr1400.msk -File(6) = pr1400a.frm -File(7) = prprassi.men -File(12) = pr1200a.msk -File(13) = pr1200a.frm -Patch = 14 +File(0) = bastapr.msk +File(1) = batbapr.rpt +File(2) = pr01.bmp +File(3) = pr0700a.msk +File(4) = pr0700b.msk +File(5) = pr1200a.frm +File(6) = pr1200a.msk +File(7) = pr1300a.frm +File(8) = pr1300a.msk +File(9) = pr1400.msk +File(10) = pr1400a.frm +File(11) = prprassi.men +Patch = 25 Versione = 19980103 [pr9] -File(8) = recdesc\f123.dir -File(9) = recdesc\f123.trr -File(10) = recdesc\f124.dir -File(11) = recdesc\f124.trr -Patch = 14 +File(12) = recdesc\f123.dir +File(13) = recdesc\f123.trr +File(14) = recdesc\f124.dir +File(15) = recdesc\f124.trr +Patch = 25 Versione = 19980103 diff --git a/sv/svinst.ini b/sv/svinst.ini index 6592cfc5d..b4d849ad1 100755 --- a/sv/svinst.ini +++ b/sv/svinst.ini @@ -1,40 +1,45 @@ [sv] -Data = 02-04-1998 +Data = 28-04-1998 Descrizione = Statistiche di Vendita Dischi = 1 Moduli = ve -Patch = 304 +Patch = 14 PostProcess = PreProcess = Prezzo(1) = 900,300 -Versione = 19980102 +Prezzo(2) = 270,100 +Prezzo(3) = 180,70 +Prezzo(5) = 140,50 +Prezzo(9) = 90,40 +Prezzo(30) = 50,20 +Versione = 19980103 [sv1] -File(0) = sv0.exe|X +File(0) = sv0.exe File(1) = sv01.bmp -File(2) = sv0400a.msk|X -File(3) = sv1.exe|X -File(4) = sv1100a.frm|X -File(5) = sv1100a.msk|X -File(6) = sv1200a.msk|X -File(7) = sv1200b.msk|X -File(8) = sv1200c.msk|X -File(9) = sv2.exe|X -File(10) = sv2100a.msk|X +File(2) = sv0400a.msk +File(3) = sv1.exe +File(4) = sv1100a.frm +File(5) = sv1100a.msk +File(6) = sv1200a.msk +File(7) = sv1200b.msk +File(8) = sv1200c.msk +File(9) = sv2.exe +File(10) = sv2100a.msk File(11) = svprassi.men -File(12) = svtbpsv.msk|X -Patch = 304 -Versione = 19980102 +File(12) = svtbpsv.msk +Patch = 14 +Versione = 19980103 [sv2] File(13) = recdesc\f87.dir File(14) = recdesc\f87.trr -Patch = 304 -Versione = 19980102 +Patch = 14 +Versione = 19980103 [sv9] File(15) = recdesc\f86.dir File(16) = recdesc\f86.trr -Patch = 304 -Versione = 19980102 +Patch = 14 +Versione = 19980103 diff --git a/ve/bollac.src b/ve/bollac.src index 619ee4bfe..9f4cee1cd 100755 --- a/ve/bollac.src +++ b/ve/bollac.src @@ -136,7 +136,9 @@ PNETTO = S_NORMALE //2700 DESUMPNETTO = S_NASCOSTO //2700 NCOLLI = S_NORMALE //2800 CAUSMAG = S_OBBLIGATORIO //2900 +CAUSMAGC = S_DISABILITATO //2900 DESCRMAG = S_NORMALE //2900 +DESCRMAGC = S_DISABILITATO //2900 BLANK = S_DISABILITATO //4000 CODNOTE = S_NORMALE //2500 NOTECLI = S_NORMALE //2500 diff --git a/ve/bollaf.src b/ve/bollaf.src index 78a9bdd4d..caa64d6b1 100755 --- a/ve/bollaf.src +++ b/ve/bollaf.src @@ -93,7 +93,9 @@ PNETTO = S_NORMALE //2700 DESUMPNETTO = S_NASCOSTO //2700 NCOLLI = S_NORMALE //2800 CAUSMAG = S_OBBLIGATORIO //2900 +CAUSMAGC = S_DISABILITATO //2900 DESCRMAG = S_NORMALE //2900 +DESCRMAGC = S_DISABILITATO //2900 [DEFAULT] diff --git a/ve/ordbon.src b/ve/ordbon.src index 6bb2c6b9e..de9357637 100755 --- a/ve/ordbon.src +++ b/ve/ordbon.src @@ -137,7 +137,9 @@ PNETTO = S_NORMALE //2700 DESUMPNETTO = S_NASCOSTO //2700 NCOLLI = S_NORMALE //2800 CAUSMAG = S_OBBLIGATORIO //2900 +CAUSMAGC = S_DISABILITATO //2900 DESCRMAG = S_NORMALE //2900 +DESCRMAGC = S_DISABILITATO //2900 BLANK = S_DISABILITATO //4000 CODNOTE = S_NORMALE //2500 NOTECLI = S_NORMALE //2500 diff --git a/ve/ve0100.cpp b/ve/ve0100.cpp index 39daad6fa..d7254df8a 100755 --- a/ve/ve0100.cpp +++ b/ve/ve0100.cpp @@ -50,8 +50,8 @@ void TMotore_application::init_insert_mode( TMask& m ) m.set(F_STATO, _doc->stato()); const TString16 data_doc(m.get( F_DATADOC)); - const int pos = m.id2pos( F_DATACAMBIO1); - + int pos = m.id2pos( F_DATACAMBIO1); + if (pos >= 0 && m.fld(pos).active()) { m.fld(pos).set(data_doc); @@ -59,6 +59,15 @@ void TMotore_application::init_insert_mode( TMask& m ) } m.disable(DLG_PRINT); _occas_mask->reset( ); + + pos = m.id2pos(F_CAUSMAG); + + if (pos >= 0) + { + m.fld(pos).set(doc().tipo().caus_mov()); + m.fld(pos).dirty(); + } + const int ndefaults = pro( ).get_int( "NDEFAULTS", "DEFAULT" ); // prof for( int i = 1; i <= ndefaults; i++ ) diff --git a/ve/ve0300a.src b/ve/ve0300a.src index 2152b9bc9..b826b2d14 100755 --- a/ve/ve0300a.src +++ b/ve/ve0300a.src @@ -182,6 +182,7 @@ FLAG=U USE=LF_COMUNI INPUT=STATO F_STATOCF~COM F_COMCF OUTPUT=F_DENCOM DENCOM~F_PROVCOM PROVCOM +SPECIAL=CH SEARCH [DENCOM] // il campo e' letto nel file 13 comuni con chiave [COMCF] @@ -216,6 +217,7 @@ FLAG=Z USE=%STA INPUT=CODTAB F_STATOCF OUTPUT=F_DESSTATOCF S0 +SPECIAL=CH SEARCH [DESSTATOCF] // il campo e' letto nella tabella %STA e va visualizzato solo se [STATOCF]<>"" @@ -796,6 +798,7 @@ FLAG=Z USE=@F_STATOCF INPUT=CODTAB F_STATOSP OUTPUT=F_DESSTATOSP S0 +SPECIAL=CH SEARCH [DESSTATOSP] GROUP=900 @@ -818,6 +821,7 @@ FLAG=U USE=@F_COMCF INPUT=STATO F_STATOSP~COM F_COMSP OUTPUT=F_DENCOMSP DENCOM~F_PROVCOMSP PROVCOM +SPECIAL=CH SEARCH [DENCOMSP] GROUP=900 @@ -1491,11 +1495,11 @@ Y=0 FIELDNAME=CAUSMAG MSKID=F_CAUSMAG TYPE=T_STRINGA -PROMPT="Causale magazzino " +PROMPT="Caus.magazzino " USE=%CAU INPUT=CODTAB F_CAUSMAG DISPLAY="Codice" CODTAB~"Descrizione@50" S0 -OUTPUT=F_CAUSMAG CODTAB~F_DESCRMAG S0 +OUTPUT=F_CAUSMAG CODTAB~F_DESCRMAG S0~F_CAUSMAGC S9 WARNING=Causale di magazzino non trovata SIZE=5 FLAG=U @@ -1504,7 +1508,7 @@ HELP=Inserisci il codice della causale [DESCRMAG] GROUP=2900 -X=27 +X=25 Y=0 MSKID=F_DESCRMAG TYPE=T_STRINGA @@ -1513,7 +1517,32 @@ USE=%CAU KEY 2 INPUT=S0 F_DESCRMAG DISPLAY="Descrizione@50" S0~"Codice" CODTAB COPY=OU F_CAUSMAG +SIZE=50 + +[CAUSMAGC] +GROUP=2900 +X=2 +Y=1 +MSKID=F_CAUSMAGC +TYPE=T_STRINGA +PROMPT="Caus.mag.coll. " +USE=%CAU +INPUT=CODTAB F_CAUSMAGC +DISPLAY="Codice" CODTAB~"Descrizione@50" S0 +OUTPUT=F_CAUSMAGC CODTAB~F_DESCRMAGC S0 WARNING=Causale di magazzino non trovata +SIZE=5 +FLAG=UDG +HELP=Inserisci il codice della causale +SPECIAL=CH NORMAL + +[DESCRMAGC] +GROUP=2900 +X=25 +Y=1 +MSKID=F_DESCRMAGC +TYPE=T_STRINGA +PROMPT="" SIZE=50 [BLANK] diff --git a/ve/vearea.men b/ve/vearea.men index 1a653e679..4d35ff994 100755 --- a/ve/vearea.men +++ b/ve/vearea.men @@ -179,6 +179,7 @@ Caption = "Configurazione" Picture = Module = 0 Flags = "" +Item_01 = "Magazzino",[ACQVEN_022] Item_01 = "Condizioni di vendita", "ve0 -2 -1", "F" Item_02 = "Agenti e dati generali", "ve0 -2 -2", "F" Item_03 = "Contabilizzazione sconti", "ve0 -2 -3", "F" @@ -192,3 +193,12 @@ Picture = Module = 0 Flags = "" Item_09 = "Modifica valori", "ve4 -0", "F" + +[ACQVEN_022] +Caption = "Configurazione magazzino" +Picture = +Module = 0 +Flags = "" +Item_01 = "Parametri di magazzino", "mg0 -2 -1", "F" +Item_02 = "Formato codice articoli", "mg0 -0 FCA", "F" + diff --git a/ve/veinst.ini b/ve/veinst.ini index 7354508ca..746344d2b 100755 --- a/ve/veinst.ini +++ b/ve/veinst.ini @@ -1,19 +1,24 @@ [ve] -Data = 01-04-1998 +Data = 08-05-1998 Descrizione = Vendite Dischi = 1 Moduli = ba,cg9,pr9,mg9,sv9 -Patch = 304 -PostProcess = +Patch = 25 +PostProcess = bainst -0 VE PreProcess = Prezzo(1) = 900,300 -Versione = 19980102 +Prezzo(2) = 270,100 +Prezzo(3) = 180,70 +Prezzo(5) = 140,50 +Prezzo(9) = 90,40 +Prezzo(30) = 50,20 +Versione = 19980103 [ve0] File(0) = ve00.bmp File(1) = vearea.men -Patch = 304 -Versione = 19980102 +Patch = 25 +Versione = 19980103 [ve1] File(2) = basteld.msk @@ -44,22 +49,22 @@ File(26) = ve1000b.msk File(27) = ve1100a.msk File(28) = ve5.exe File(29) = ve5100a.msk -File(30) = ve6.exe|X +File(30) = ve6.exe File(31) = ve6100a.msk File(32) = ve6200a.msk File(33) = ve6300a.msk File(34) = veprassi.hlp File(35) = veprassi.men -Patch = 304 -Versione = 19980102 +Patch = 25 +Versione = 19980103 [ve2] File(36) = recdesc\f33.dir File(37) = recdesc\f33.trr File(38) = recdesc\f34.dir File(39) = recdesc\f34.trr -Patch = 304 -Versione = 19980102 +Patch = 25 +Versione = 19980103 [ve3] File(40) = bolla.bmp @@ -100,8 +105,8 @@ File(74) = verig08.ini File(75) = verig08.msk File(76) = verig09.ini File(77) = verig09.msk -Patch = 304 -Versione = 19980102 +Patch = 25 +Versione = 19980103 [ve9] File(78) = bastabe.msk @@ -114,7 +119,7 @@ File(84) = bastctr.msk File(85) = bastfca.msk File(86) = bastfrm.msk File(87) = bastgmc.msk -File(88) = bastprs.msk|X +File(88) = bastprs.msk File(89) = bastrfa.msk File(90) = bastrfc.msk File(91) = batbabe.msk @@ -140,8 +145,8 @@ File(110) = batbgmc.msk File(111) = batbgmc.rpt File(112) = batbmag.msk File(113) = batbmag.rpt -File(114) = batbprs.msk|X -File(115) = batbprs.rpt|X +File(114) = batbprs.msk +File(115) = batbprs.rpt File(116) = batbprv.msk File(117) = batbrfa.msk File(118) = batbrfa.rpt @@ -173,7 +178,7 @@ File(143) = recdesc\f52.trr File(144) = recdesc\f53.dir File(145) = recdesc\f53.trr File(146) = tab_fca.frm -File(147) = ve0.exe|X +File(147) = ve0.exe File(148) = ve0100a.msk File(149) = ve0100o.msk File(150) = ve0200a.msk @@ -209,6 +214,6 @@ File(179) = ve3300.msk File(180) = ve3400.msk File(181) = ve4.exe File(182) = ve4100.msk -Patch = 304 -Versione = 19980102 +Patch = 25 +Versione = 19980103 diff --git a/ve/velib03.cpp b/ve/velib03.cpp index da24c1c3e..e32e19963 100755 --- a/ve/velib03.cpp +++ b/ve/velib03.cpp @@ -893,7 +893,20 @@ int TDocumento::write_rewrite(TBaseisamfile & f, bool re) const mov.put(MOVMAG_ANNODOC, get("ANNO"));; mov.put(MOVMAG_CODNUM, get("CODNUM")); const long numdoc = get_long("NDOC"); - mov.put(MOVMAG_NUMDOC, numdoc); + mov.put(MOVMAG_NUMDOC, numdoc); + const long ex_numdoc = get_long("NUMDOCRIF"); + if (ex_numdoc == 0) + { + mov.put(MOVMAG_EXNUMDOC, numdoc); + mov.put(MOVMAG_EXDATADOC, d); + } + else + { + mov.put(MOVMAG_EXNUMDOC, ex_numdoc); + const TDate ex_d(get("DATADOCRIF")); + + mov.put(MOVMAG_EXDATADOC, ex_d); + } mov.put(MOVMAG_CATVEN, get("CATVEN")); mov.put(MOVMAG_CODLIST, get("CODLIST")); mov.put(MOVMAG_CODCONT, get("CODCONT")); diff --git a/ve/veuml.h b/ve/veuml.h index 1996d6e71..fbe7c3a98 100755 --- a/ve/veuml.h +++ b/ve/veuml.h @@ -77,6 +77,7 @@ #define F_CATVEN 181 #define F_CODNOTE 182 #define F_GOLEM 183 +#define F_CAUSMAGC 184 #define F_CODVAL1 200 #define F_NOMEVAL1 201 diff --git a/ve/veuml1.h b/ve/veuml1.h index d9699fde7..b1160f13f 100755 --- a/ve/veuml1.h +++ b/ve/veuml1.h @@ -71,4 +71,5 @@ #define F_DESNOTESP2 357 #define F_DESZON 358 #define F_NOTECLI 359 +#define F_DESCRMAGC 360 #endif // __VEUML1_H