campo-sirio/ve/ve0100d.cpp
marco 3a0384a62d Presi i file del motore, ne mancano ancora due!
git-svn-id: svn://10.65.10.50/trunk@1790 c028cbd2-c16b-5b4b-a496-9718f37d4682
1995-09-06 15:42:25 +00:00

41 lines
576 B
C++
Executable File

#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 );
};