Common ZTDCCLC

0 Modifications

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.ztdcclc +++|*NOSEQ
00002  M01S00002.ztdcclc +++|*WIDTH 95
00003  M01S00003.ztdcclc +++|
00004  M01S00004.ztdcclc +++|{ ZTDCCLC  CL condition codes }
00005  M01S00005.ztdcclc +++|
00006  M01S00006.ztdcclc +++|*CALLC ZCLCDDP
00007  M01S00007.ztdcclc +++|*CALLC ZCLCEXP
00008  M01S00008.ztdcclc +++|*CALLC ZCLCINV
00009  M01S00009.ztdcclc +++|*CALLC ZCLCIOV
00010  M01S00010.ztdcclc +++|*CALLC ZCLCITL
00011  M01S00011.ztdcclc +++|*CALLC ZCLCMFA
00012  M01S00012.ztdcclc +++|*CALLC ZCLCNEC
00013  M01S00013.ztdcclc +++|*CALLC ZCLCNYI
00014  M01S00014.ztdcclc +++|*CALLC ZCLCRNA
00015  M01S00015.ztdcclc +++|*CALLC ZCLCRPM
00016  M01S00016.ztdcclc +++|*CALLC ZCLCSOV
00017  M01S00017.ztdcclc +++|*CALLC ZCLCTFX
00018  M01S00018.ztdcclc +++|*CALLC ZCLCTMX
00019  M01S00019.ztdcclc +++|*CALLC ZCLCTOV
00020  M01S00020.ztdcclc +++|*CALLC ZCLCUNB
00021  M01S00021.ztdcclc +++|*CALLC ZCLCUNK
00022  M01S00022.ztdcclc +++|*CALLC ZCLCUNR
00023  M01S00023.ztdcclc +++|*CALLC ZCLCUNX
00024  M01S00024.ztdcclc +++|*CALLC ZCLCVOR
00025  M01S00014.ztdcclc +++|ZTDCCON
00026  M01S00005.ztdcclc +++|
00027  M01S00006.ztdcclc +++|CONST
00028  M01S00007.ztdcclc +++|   tdc$status_id = 'td',
00029  M01S00008.ztdcclc +++|   tdc$status_condition = 18000;
00030  M01S00009.ztdcclc +++|
00031  M01S00010.ztdcclc +++|CONST
00032  M01S00011.ztdcclc +++|   tde_error_termination = tdc$status_condition + 0,
00033  M01S00012.ztdcclc +++|   {E TDU TERMINATED WITH ERRORS.}
00034  M01S00013.ztdcclc +++|   tde_invalid_character = tdc$status_condition + 1,

Line S00014 Modification History
`M01` (Added by)	`ztdcclc`
`M02` (Yanked) (Updated by)	`@000002`

Seq #  *Modification Id* Act 
----------------------------+
00035  M02S00014.@000002 ---|   {E CHARACTER VALUE MUST RANGE FROM 0 TO 255.}
00036  M01S00001.@000002 +++|   {E CHARACTER VALUE MUST RANGE FROM 0 TO 127.}
00037  M01S00015.ztdcclc +++|   tde_invalid = tdc$status_condition + 2,

Line S00016 Modification History
`M01` (Added by)	`ztdcclc`
`M02` (Yanked) (Updated by)	`@000001`

Seq #  *Modification Id* Act 
----------------------------+
00038  M02S00016.@000001 ---|   {E INVALID +T.}
00039  M01S00001.@000001 +++|   {E INCORRECT +T.}
00040  M01S00017.ztdcclc +++|   tde_invalid_type = tdc$status_condition + 3,

Line S00018 Modification History
`M01` (Added by)	`ztdcclc`
`M02` (Yanked) (Updated by)	`@000001`

Seq #  *Modification Id* Act 
----------------------------+
00041  M02S00018.@000001 ---|   {E INVALID TYPE--ONLY STRING, INTEGER, OR VARIABLE ALLOWED.}
00042  M01S00002.@000001 +++|   {E INCORRECT TYPE--ONLY STRING, INTEGER, OR VARIABLE ALLOWED.}
00043  M01S00019.ztdcclc +++|   tde_invalid_comm = tdc$status_condition + 4,

Line S00020 Modification History
`M01` (Added by)	`ztdcclc`
`M02` (Yanked) (Updated by)	`@000001`

Seq #  *Modification Id* Act 
----------------------------+
00044  M02S00020.@000001 ---|   {E INVALID COMMUNICATIONS TYPE.}
00045  M01S00003.@000001 +++|   {E INCORRECT COMMUNICATIONS TYPE.}
00046  M01S00021.ztdcclc +++|   tde_invalid_cursor = tdc$status_condition + 5,

Line S00022 Modification History
`M01` (Added by)	`ztdcclc`
`M02` (Yanked) (Updated by)	`@000001`

Seq #  *Modification Id* Act 
----------------------------+
00047  M02S00022.@000001 ---|   {E INVALID CURSOR_ENCODING.}
00048  M01S00004.@000001 +++|   {E INCORRECT CURSOR_ENCODING.}
00049  M01S00023.ztdcclc +++|   tde_bias_out_of_range = tdc$status_condition + 6,

Line S00024 Modification History
`M01` (Added by)	`ztdcclc`
`M02` (Yanked) (Updated by)	`@000002`

Seq #  *Modification Id* Act 
----------------------------+
00050  M02S00024.@000002 ---|   {E CURSOR_BIAS OUT OF RANGE, MUST BE -255 TO 255.}
00051  M01S00002.@000002 +++|   {E CURSOR_BIAS OUT OF RANGE, MUST BE -127 TO 127.}
00052  M01S00025.ztdcclc +++|   tde_continuation_overflow = tdc$status_condition + 7,
00053  M01S00026.ztdcclc +++|   {E CONTINUATIONS EXCEED 256 CHARACTERS.}
00054  M01S00027.ztdcclc +++|   tde_expecting_verb_variable = tdc$status_condition + 8,
00055  M01S00028.ztdcclc +++|   {E EXPECTING VERB OR VARIABLE, FOUND +T.}
00056  M01S00029.ztdcclc +++|   tde_empty_file = tdc$status_condition + 9,
00057  M01S00030.ztdcclc +++|   {E EMPTY INPUT FILE.}
00058  M01S00031.ztdcclc +++|   tde_no_room = tdc$status_condition + 10,
00059  M01S00032.ztdcclc +++|   {E NO ROOM IN TABLE FOR +T.}
00060  M01S00033.ztdcclc +++|   tde_duplicate_verb = tdc$status_condition + 11,
00061  M01S00034.ztdcclc +++|   {E VERB +T APPEARS TWICE.}
00062  M01S00035.ztdcclc +++|   tde_superset = tdc$status_condition + 12,
00063  M01S00036.ztdcclc +++|   {E INPUT SEQUENCE FOR +T IS A SUPERSET OF A PREVIOUS ITEM.}
00064  M01S00037.ztdcclc +++|   tde_subset = tdc$status_condition + 13,
00065  M01S00038.ztdcclc +++|   {E INPUT SEQUENCE FOR +T IS A SUBSET OF A PREVIOUS ITEM.}
00066  M01S00039.ztdcclc +++|   tde_not_found = tdc$status_condition + 14,
00067  M01S00040.ztdcclc +++|   {E VARIABLE +T HAS NOT BEEN DECLARED.}
00068  M01S00041.ztdcclc +++|   tde_optimize_table_full = tdc$status_condition + 15,
00069  M01S00042.ztdcclc +++|   {E TABLE OVERFLOW DURING OPTIMIZATION.}
00070  M01S00043.ztdcclc +++|   tde_invalid_verb_variable = tdc$status_condition + 16,

Line S00044 Modification History
`M01` (Added by)	`ztdcclc`
`M02` (Yanked) (Updated by)	`@000001`

Seq #  *Modification Id* Act 
----------------------------+
00071  M02S00044.@000001 ---|   {E INVALID VERB OR MISSING "=" IN VARIABLE ASSIGNMENT.}
00072  M01S00005.@000001 +++|   {E INCORRECT VERB OR MISSING "=" IN VARIABLE ASSIGNMENT.}
00073  M01S00045.ztdcclc +++|   tde_duplicate_in_inout = tdc$status_condition + 17,
00074  M01S00046.ztdcclc +++|   {E DUPLICATE PARAMETERS, BOTH "IN" AND "INOUT".}
00075  M01S00047.ztdcclc +++|   tde_duplicate_out_inout = tdc$status_condition + 18,
00076  M01S00048.ztdcclc +++|   {E DUPLICATE PARAMETERS, BOTH "OUT" AND "INOUT".}
00077  M01S00049.ztdcclc +++|   tde_screen_size_overflow = tdc$status_condition + 19,
00078  M01S00050.ztdcclc +++|   {E TOO MANY SCREEN SIZES SPECIFIED, MAXIMUM 4.}
00079  M01S00051.ztdcclc +++|   tde_screen_row_overflow = tdc$status_condition + 20,

Line S00052 Modification History
`M01` (Added by)	`ztdcclc`
`M02` (Yanked) (Updated by)	`@000000`

Seq #  *Modification Id* Act 
----------------------------+
00080  M02S00052.@000000 ---|   {E NUMBER OF ROWS MUST RANGE FROM 0 TO 127.}
00081  M01S00001.@000000 +++|   {E NUMBER OF ROWS MUST RANGE FROM 0 TO 64.}
00082  M01S00053.ztdcclc +++|   tde_screen_col_overflow = tdc$status_condition + 21,
00083  M01S00054.ztdcclc +++|   {E NUMBER OF COLUMNS MUST RANGE FROM 0 TO 255.}
00084  M01S00055.ztdcclc +++|   tde_invalid_cursor_behavior = tdc$status_condition + 22,

Line S00056 Modification History
`M01` (Added by)	`ztdcclc`
`M02` (Yanked) (Updated by)	`@000001`

Seq #  *Modification Id* Act 
----------------------------+
00085  M02S00056.@000001 ---|   {E INVALID "MOVE_PAST.." OR "CHAR_PAST.." TYPE.}
00086  M01S00006.@000001 +++|   {E INCORRECT "MOVE_PAST.." OR "CHAR_PAST.." TYPE.}
00087  M01S00057.ztdcclc +++|   tde_name_required = tdc$status_condition + 23,
00088  M01S00058.ztdcclc +++|   {E NAME IS REQUIRED.}
00089  M01S00059.ztdcclc +++|   tde_name_too_long = tdc$status_condition + 24,
00090  M01S00060.ztdcclc +++|   {E NAME MUST BE 1 TO 6 CHARACTERS.}
00091  M01S00061.ztdcclc +++|   tde_screen_out_required = tdc$status_condition + 25,
00092  M01S00062.ztdcclc +++|   {E "OUT" REQUIRED FOR SET_SIZE.}
00093  M01S00063.ztdcclc +++|   tde_invalid_name = tdc$status_condition + 26,

Line S00064 Modification History
`M01` (Added by)	`ztdcclc`
`M02` (Yanked) (Updated by)	`@000001`

Seq #  *Modification Id* Act 
----------------------------+
00094  M02S00064.@000001 ---|   {E INVALID NAME--MAY ONLY BE ALPHABETIC AND NUMERIC CHARACTERS.}
00095  M01S00007.@000001 +++|   {E INCORRECT NAME--MAY ONLY BE ALPHABETIC AND NUMERIC CHARACTERS.}
00096  M01S00065.ztdcclc +++|   tde_cursor_len_out_of_range = tdc$status_condition + 27,
00097  M01S00066.ztdcclc +++|   {E CURSOR_POS_COLUMN_LENGTH OR CURSOR_POS_ROW_LENGTH MUST BE 0 TO 7.}
00098  M01S00067.ztdcclc +++|   tde_duplicate_input = tdc$status_condition + 28,
00099  M01S00068.ztdcclc +++|   {E INPUT SEQUENCE FOR +T IS A DUPLICATE OF A PREVIOUS ITEM.}
00100  M01S00069.ztdcclc +++|   tde_invalid_appstr_name = tdc$status_condition + 29,

Line S00070 Modification History
`M01` (Added by)	`ztdcclc`
`M02` (Yanked) (Updated by)	`@000001`

Seq #  *Modification Id* Act 
----------------------------+
00101  M02S00070.@000001 ---|   {E INVALID APPLICATION STRING NAME +T--MAY ONLY USE CDC 63-CHAR SET.}
00102  M01S00008.@000001 +++|   {E INCORRECT APPLICATION STRING NAME +T--MAY ONLY USE CDC 63-CHAR SET.}
00103  M01S00071.ztdcclc +++|   tde_appstr_name_too_long = tdc$status_condition + 30,
00104  M01S00072.ztdcclc +++|   {E APPLICATION STRING NAME MUST BE 1 TO 7 CHARACTERS.}
00105  M01S00073.ztdcclc +++|   tde_function_key_mark_range = tdc$status_condition + 31;
00106  M01S00074.ztdcclc +++|   {E FUNCTION_KEY_LEAVES_MARK MUST INDICATE 0 TO 7 CHARACTERS OF BLOTCH.}