Presi i file del motore, ne mancano ancora due!

git-svn-id: svn://10.65.10.50/trunk@1790 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
marco 1995-09-06 15:42:25 +00:00
parent 7822619fb6
commit 3a0384a62d
3 changed files with 72 additions and 20 deletions

View File

@ -238,6 +238,21 @@ real TMotore_application::user_row_calculate( TRectype& r, int index )
case 100 :
return ( f100( r ) );
break;
case 200 :
return ( f200( r ) );
break;
case 300 :
return ( f300( r ) );
break;
case 400 :
return ( f400( r ) );
break;
case 500 :
return ( f500( r ) );
break;
case 600 :
return ( f600( r ) );
break;
default:
CHECK( FALSE, "Tentativo di chiamare una funzione di calcolo riga inesistente!" );
return 0.0;

View File

@ -1,8 +1,40 @@
#ifndef __VE0100D_H
#include "ve0100d.h"
#endif
real f100( TRectype& r )
{
return( r.get_real( "PREZZO" ) * r.get_real( "QTA" ) );
};
#ifndef __VE0100D_H
#include "ve0100d.h"
#endif
// IMPORTO NETTO
real f100( TRectype& r )
{
return( r.get_real( "PREZZO" ) * r.get_real( "QTA" ) );
};
// IMPORTO NETTO PROVVIGIONI
real f200( TRectype& r )
{
return( f100(r) * r.get_real( "PERCPROV" ) );
};
// ARTICOLI
real f300( TRectype& r )
{
return( 1 );
};
// QUANTITA'
real f400( TRectype& r )
{
return( r.get_real( "QTA" ) );
};
// PREZZO
real f500( TRectype& r )
{
return( r.get_real( "PREZZO" ) );
};
// SCONTO ***
real f600( TRectype& r )
{
return( 13 );
};

View File

@ -1,12 +1,17 @@
#define __VE0100D_H
#ifndef __REAL_H
#include "real.h"
#endif
#ifndef __ISAM_H
#include "isam.h"
#endif
real f100( TRectype& r );
#define __VE0100D_H
#ifndef __REAL_H
#include "real.h"
#endif
#ifndef __ISAM_H
#include "isam.h"
#endif
real f100( TRectype& r );
real f200( TRectype& r );
real f300( TRectype& r );
real f400( TRectype& r );
real f500( TRectype& r );
real f600( TRectype& r );