gtps4m3xSystem Generation

Inner Macros


Macro Name: CVHDK
Prototype: &NAME CVHDK &CHARS
Function: This macro validates hexadecimal input characters and converts them to decimal. From one to seven digits is allowable within the range of 1-FFFFFFF.
Restrictions: No more than seven digits will be converted.
Input: One positional parameter, the hexadecimal value to be converted to decimal, is the only input.
Output: The results of the conversion are stored in the global SETA variable &XADEC. If &XADEC is zero after CVHDK has been called invalid, hexadecimal characters have been submitted for conversion and an error message must be issued.
Diagnostics: &CHARS

Must be one to seven digits, from X'1-FFFFFFF'. Each digit must be from 0-F.

Logic Aids: None
Dependencies: None
Macros Used: None
Error Messages: None
Calling Macros: GENSTC, ISKLG, PKSTG, SKLNG

Macro Name: CVRTK
Prototype: &NAME CVRTK &P1
Function: This macro converts a decimal number into a hexadecimal number.
Restrictions: None
Input: One positional parameter, the decimal value to be converted to hexadecimal, is the only input.
Output: The results of the conversion are stored in the global SETA variable &STCDEC. If &STCDEC is zero after CVRTK has been called, the value submitted for conversion was not numeric and an error message must be issued.
Diagnostics: &P1 must be numeric.
Logic Aids: None
Dependencies: None
Macros Used: None
Error Messages: None
Calling Macros: GENSTC, ISKLG, PKSTG, RLSTG, SENDG, SKLNG

Macro Name: GENSTC
Prototype: &NAME GENSTC
Function: This macro is called by SENDG to generate the STC input for creating an SCK record.
Restrictions: None.
Input: No direct input is provided. All global output from the SCK generation user and inner macros is available to GENSTC.
Output: STC input to create the SCK records. This output is normally placed on tape. The first GENSTC call will generate STC control cards for creating the non-SNA communications pilot tape.
Diagnostics: None
Logic Aids: None
Dependencies: None
Macros Used: CVHDK, CVRTK, SETX
Error Messages: None
Calling Macros: SENDG

Macro Name: ISKLG
Prototype: &NAME ISKLG
Function: This macro is called by SENDG to generate the assembly listing for that portion of the SCK which is common to both local and remote lines. It performs checks and sets values for use by GENSTC in generating the STC input which creates the common area of the SCK.
Restrictions: None
Input: No direct input is provided. All global output from the SCK generation user macros is available to ISKLG, but for the most part this macro handles the output from the user macro SKLNG.
Output: An assembly listing of the SCK common area. Global fields are set up for use by GENSTC in generating the STC input. Object code is generated by ISKLG and output to the same device as the STC input generated by GENSTC. However, STC will ignore the object code when it reads the input data.
Diagnostics: None
Logic Aids: None
Dependencies: GENSTC
Macros Used: CVHDK, CVRTK, SETX
Error Messages: The error messages issued by this macro refer to errors which were discovered during execution of the SKLNG macro. They are put out by ISKLG so that they will appear in the assembly listing as close as possible to the field which will need correction.
4, INVALID LINE IN PATH PARAMETER--DEFAULTED TO
   VOID PATH
4, INVALID CU IN PATH PARAMETER--DEFAULTED TO
   VOID PATH
4, INVALID PATH INDICATOR--MA ASSUMED
4, NO PRIME PATH--DEFAULTED TO NONVOID
4, NUMBER OF PATHS SPECIFIED GT MAX SPECIFIED IN SIP
4, INVALID BSC SEND LEVEL.  DEFAULT = 1
4, NUMBER OF TIS EXCEEDS MAX--DEFAULTED TO MAXTI
Calling Macros: SENDG

Macro Name: SETX
Prototype: &NAME SETX &TI,&OP,&T2
Function: This macro validates two or more hexadecimal numbers and converts them to decimal; it performs the indicated operation and then converts the result into hexadecimal.
Restrictions: Each hexadecimal number specified may be no more than seven digits in the range 1-FFFFFFF.
Input: Three positional parameters:

&TI

the operand, a hexadecimal number in the range, 1-FFFFFFF.

&OP

the operation,

A - Add

S - Subtract

D - Divide

M - Multiply

&T2

the operator, for subtraction, division and multiplication this is a single hex number in the range 1-FFFFFFF. For addition it may be a list of up to 15 subparameters, each one a hexadecimal number in the range 1-FFFFFFF.

Output: The results of the computation are stored in the global SETA variable &STCDEC. If &STCDEC is zero after SETX has been called an error has occurred and an error message must be issued.
Diagnostics:

&TI

must be one to seven hexadecimal digits in the range 1-FFFFFFF.

if invalid, it will be treated as zero.

&OP

must be A, S, D or M.

if invalid, it will be treated as M.

&T2

for addition, may be a list of up to 15 subparameters.

if more than one subparameter is entered for subtraction, multiplication, or division, only the first will be used.

each subparameter must be one to seven hexadecimal digits in the range 1-FFFFFFF.


Logic Aids: None.
Dependencies: None.
Macros Used: CVHDK, CVRTK
Error Messages: None.
Calling Macros: GENSTC, ISKLG