This SAS code was very helpful, but without resetting ChkSum, SAS would fail all credit card numbers following an invalid card number.