int chkegn( LPCTSTR s )
{
unsigned int ctrl = 0;

ctrl = (*s-'0') * 2 + (*(s+1)-'0') * 4 + (*(s+2)-'0') * 8 +
(*(s+3)-'0') * 5 + (*(s+4)-'0') * 10 + (*(s+5)-'0') * 9
+(*(s+6)-'0') * 7 + (*(s+7)-'0') * 3 + (*(s+8)-'0') * 6;
ctrl %= 11;
ctrl %= 10;
if ( *(s+9) == (char)ctrl + '0' )
return( TRUE );
else
return( FALSE );
}