AddUpInputAK(
int iIndexInputAK,
int iAccumPos,
int iAccumNeg,
double* naSumsBW,
double* naSumsRW )
{
int iRet = SQC_C_Success;
int iIndexSum;
double nBetragBook;
double nBetragBest;
double nBetragKto;
double nBetragRef;
int iAK_Vorz;
 
////
// 
////
if ( ALG_IsIntNull( iIndexInputAK ) ) {
goto L_Eof;
}
if ( ALG_IsIntNull( iAccumPos ) && ALG_IsIntNull( iAccumNeg ) ) {
goto L_Eof;
}
iIndexSum = 0;
nBetragBook = m_naInpAbrKompBetrag[iIndexInputAK];
if ( ALG_IsDoubleNull( nBetragBook ) ) {
goto L_Eof;
}
////
// Correct signage
////
iAK_Vorz = 1;
if ( m_saInpAbrKompVorz[iIndexInputAK].Left( 1 ) == "-" ) {
iAK_Vorz = -1;
nBetragBook = nBetragBook * ( -1.0);
}
 
if ( m_sPosArt == "KTO" ) {
////
// Accounts
////
if ( m_sKtoWhg == m_saInpAbrKompWhg[iIndexInputAK] ) {
nBetragKto = m_naInpAbrKompBetrag[iIndexInputAK];
if ( iAK_Vorz < 0 ) {
nBetragKto = nBetragKto * ( -1 );
} else {
nBetragKto = nBetragBook;
}
 
ALG_SetDoubleNull( &nBetragKto );
 
 
}
if ( ! ALG_IsDoubleNull( nBetragKto ) ) {
naSumsBW[iIndexSum] = naSumsBW[iIndexSum] + nBetragKto;
}
}
L_Eof:
return( iRet );
}