Print Page as PDF
DBIA2622 ICR (2622)

DBIA2622    ICR (2622)

Name Value
NUMBER 2622
IA # 2622
DATE CREATED 1998/10/20
CUSTODIAL PACKAGE KERNEL
CUSTODIAL ISC San Francisco
USAGE Supported
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE XLFUTL
NAME DBIA2622
GENERAL DESCRIPTION
Use of the XLFUTL APIs.
STATUS Active
DURATION Till Otherwise Agreed
ID XLFUTL
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT COMPONENT DESCRIPTION VARIABLES
$$CCD
Compute check digit.  See Taylor report Computerworld
1975 Usage: S Y=$$CCD^XLFUTL(X) Input: an integer.  Returns the input value
with the check digit appended.
$$VCD
Verify check digit (last digit).  Usage:  IF
$$VCD^XLFUTL(X) W "OK" Input: an integer with check digit, from $$CCD^XLFUTL
Output: 1 if the check digit matches, 0 for non-match.
$$BASE
Converts the first parameter from the number base of
the second parameter to the number base of the third parameter.  Usage: W
$$BASE^XLFUTL("1A",16,2) ==> 11010 Input 1: a string representing the number
to convert.  Input 2: a number from 2 to 16, the base of input 1.  Input 3: a
number from 2 to 16, the base for the output.

The useful values for Input 2 and 2 are 2, 8, 10, 16 but other numbers can be
used. e.g. W $$BASE("A",12,3) ==> 101

Because of the use of division, input is limited by the M vendor to the
largest integer they handle, 15 digits.
$$DEC(NUMBER,FROMBASE)
VARIABLES TYPE VARIABLES DESCRIPTION
NUMBER Input
Number to be converted to base 10
FROMBASE Input
Base to convert NUMBER from
$$DEC Output
NUMBER converted to Base 10
$$CNV(NUMBER,TOBASE)
VARIABLES TYPE VARIABLES DESCRIPTION
NUMBER Input
Number to be converted from base 10 to TOBASE
TOBASE Input
Base to convert NUMBER to
$$CNV Output
NUMBER converted to TOBASE from base 10