Patch level : 10.0

Files correlati     : ve0
Ricompilazione Demo : [ ]
Commento            :
Modificato il compilatore dei file src in modo che sulle testate delle bolle proponga nell'ordine i campi codcf, ricalt, ragsoc


git-svn-id: svn://10.65.10.50/trunk@18209 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca83 2009-02-06 12:30:16 +00:00
parent 978a74842d
commit 3ea712c4cd

View File

@ -1271,8 +1271,7 @@ void TMask_generator::genera( const TString& profilo )
_pro = new TConfig( proname );
const char tipo_cf = _pro->get_char("TIPOCF", "MAIN");
const bool calimero = tipo_cf == 'C' && _pro->get("MODULE") == "lv";
const char tipo_cf = _pro->get_char("TIPOCF", "MAIN");
TFilename _mskname(profilo);
_mskname.ext( "msk" );
@ -1338,7 +1337,7 @@ void TMask_generator::genera( const TString& profilo )
_m->pagina( _m->page( ), title);
_m->control( T_CORNICE, DLG_NULL, calimero ? 7807 : 7806 );
_m->control( T_CORNICE, DLG_NULL, 7807);
_m->begin( );
_m->prompt( 1, 0, "" );
_m->end( );
@ -1439,41 +1438,19 @@ void TMask_generator::genera( const TString& profilo )
_m->message( "CO,8@" );
_m->check(S_NORMALE);
_m->flag( "DG" );
_m->end( );
const int clifo_y = calimero ? 5 : 4;
if (calimero)
{
_m->control( T_STRINGA, F_RICALT, 30 );
_m->begin( );
_m->prompt( 2, clifo_y-1, "Codice mnemonico " );
_m->warning( "Cliente assente" );
_m->help( "Codice mnemonico del cliente del documento" );
_m->group( 1 );
_m->use( LF_CLIFO, 6 );
temp_s.format( "TIPOCF \"%c\"~RICALT %d", tipo_cf, F_RICALT);
_m->input( temp_s );
_m->display( "\"Mnemonico@30\" RICALT~\"Codice\" CODCF~\"Ragione Sociale@50\" RAGSOC~\"Partita IVA@12\" PAIV~\"Sospeso\" SOSPESO" );
temp_s.format( "%d RICALT~%d CODCF~%d RAGSOC", F_RICALT, F_CODCF, F_RAGSOC );
_m->output( temp_s );
_m->check( S_NORMALE );
temp_s.format( "ADD RU cg0 -1 %c", tipo_cf);
_m->outline( temp_s );
_m->end( );
}
_m->end( );
_m->control( T_STRINGA, F_CODCF, 6 );
_m->begin( );
if ( tipo_cf == 'C' )
{
_m->prompt( 2, clifo_y, "Cliente " );
_m->prompt( 2, 4, "Cliente " );
_m->warning( "Cliente assente" );
_m->help( "Codice del cliente del documento" );
}
else
{
_m->prompt( 2, clifo_y, "Fornitore " );
_m->prompt( 2, 4, "Fornitore " );
_m->warning( "Fornitore assente" );
_m->help( "Codice del fornitore del documento" );
}
@ -1491,6 +1468,23 @@ void TMask_generator::genera( const TString& profilo )
_m->outline( temp_s );
_m->message( "CO,10@" );
_m->end( );
_m->control( T_STRINGA, F_RICALT, 30 );
_m->begin( );
_m->prompt( 22, 4, "" );
_m->warning( "Cliente assente" );
_m->help( "Codice mnemonico del cliente del documento" );
_m->group( 1 );
_m->use( LF_CLIFO, 6 );
temp_s.format( "TIPOCF \"%c\"~RICALT %d", tipo_cf, F_RICALT);
_m->input( temp_s );
_m->display( "\"Mnemonico@30\" RICALT~\"Codice\" CODCF~\"Ragione Sociale@50\" RAGSOC~\"Partita IVA@12\" PAIV~\"Sospeso\" SOSPESO" );
temp_s.format( "%d RICALT~%d CODCF~%d RAGSOC", F_RICALT, F_CODCF, F_RAGSOC );
_m->output( temp_s );
_m->check( S_NORMALE );
temp_s.format( "ADD RU cg0 -1 %c", tipo_cf);
_m->outline( temp_s );
_m->end( );
_m->control( T_STRINGA, F_RAGSOC, 50 );
_m->begin( );
@ -1504,7 +1498,7 @@ void TMask_generator::genera( const TString& profilo )
_m->warning( "Fornitore assente" );
_m->help( "Ragione sociale del fornitore del documento" );
}
_m->prompt( 24, clifo_y, "" );
_m->prompt( 2, 5, "Ragione Sociale " );
_m->group( 1 );
_m->use( LF_CLIFO, 2 );
temp_s.format( "TIPOCF \"%c\"~RAGSOC %d", tipo_cf, F_RAGSOC );
@ -1535,14 +1529,14 @@ void TMask_generator::genera( const TString& profilo )
if (key.not_empty())
{
if (isdigit(key[0]))
{
chiavegruppo.GROUPKEY(atoi(key));
if( _gruppi.is_key( chiavegruppo ) )
sortedgroups.add( _gruppi[ (chiavegruppo) ] );
}
else
sortedgroups.add(key);
if (isdigit(key[0]))
{
chiavegruppo.GROUPKEY(atoi(key));
if( _gruppi.is_key( chiavegruppo ) )
sortedgroups.add( _gruppi[ (chiavegruppo) ] );
}
else
sortedgroups.add(key);
}
}