midrange.com code scratchpad |
Name:
SubGTIN
|
Scriptlanguage:
Plain Text
|
Tabwidth:
4
|
Date:
03/30/2012 03:57:13 pm
|
IP:
Logged
|
|
Description:
A service program with 2 procedures for GTIN (Global Trade ID Number) 14 digits long, the 14th digit is the check digit.
The 2 procedures are:
1) ClcChkDgt - Calculates the check digit and returns it in a separate parm. The check digit is not put into the GTIN 14th position, you must do that outside of this routine.
2) VfyChkDgt - Verify the validity of the check digit. If it is correct, "Y" is returned. If not "N" is returned.
|
Code:
|
|