FreeVBCode code snippet: Convert IBM Packed Decimal from DISAM DB to Integer