File Name . . . . K_DBGTBL
Library . . . . K3S_5DTA
Format Descr. . . Debug Table
Format Name . . . RK_DBGTBL
File Type . . . . PF Unique Keys- N
Field Name FMT Start Lngth Dec Key Field Description
DB_UID A 1 1 Unique Identifier
DB_COUNT A 2 10 Arbitrary Counter
DB_PROGRAM A 12 10 Program Name
DB_SEQUENC A 22 3 Sequence
DB_USER A 25 10 User Name
DB_TIMESTP Z 35 26 Current Timestamp
DB_TIMGAP T 61 20 6 Time Since Last Entry
DB_TIMEFLG A 81 1 Time Calculation Flag
DB_FLD1 A 82 32 Additional Information 1
DB_FLD2 A 114 32 Additional Information 2
DB_FLD3 A 146 32 Additional Information 3
DB_FLD4 A 178 32 Additional Information 4
DB_FLD5 A 210 32 Additional Information 5
DB_FLD6 A 242 32 Additional Information 6
DB_FLD7 A 274 32 Additional Information 7
DB_FLD8 A 306 32 Additional Information 8
DB_FLD9 A 338 32 Additional Information 9
DB_FLD10 A 370 32 Additional Information 10
DB_FLD11 A 402 700 Additional Information 11
Note: Engineers and developers may use this table to log debug information. Access to this table is provided via the AR_DEBUG API.
AR_DBGMISC(count:program:sequence:user:timeFlg:fld1:fld2:fld3:fld4:fld5:fld6:fld7:fld8:fld9:fld10:fld11);
Example with sample data
Dcl-S count Char(10) inz('231); // Marker for debug info (line number, etc.)
Dcl-S program Char(10) inz('K3S0001'); // Program name
Dcl-S sequence Char(3) inz('SAP'); // Sequence
Dcl-S user Char(10) inz('CHUK'); // User name
Dcl-S timeFlg Char(1) inz('1'); // Time flag (whether to track time gap)
Dcl-S fld1 Char(32) inz('Field 1'); // Additional information. Can store variable values, etc.
Dcl-S fld2 Char(32) inz('Field 2'); // Additional information. Can store variable values, etc.
Dcl-S fld3 Char(32) inz('Field 3'); // Additional information. Can store variable values, etc.
Dcl-S fld4 Char(32) inz('Field 4'); // Additional information. Can store variable values, etc.
Dcl-S fld5 Char(32) inz('Field 5'); // Additional information. Can store variable values, etc.
Dcl-S fld6 Char(32) inz('Field 6'); // Additional information. Can store variable values, etc.
Dcl-S fld7 Char(32) inz('Field 7'); // Additional information. Can store variable values, etc.
Dcl-S fld8 Char(32) inz('Field 8'); // Additional information. Can store variable values, etc.
Dcl-S fld9 Char(32) inz('Field 9'); // Additional information. Can store variable values, etc.
Dcl-S fld10 Char(32) inz('Field 10'); // Additional information. Can store variable values, etc.
Dcl-S fld11 Char(700) inz('Field 11'); // Additional information. Can store variable values, etc.
AR_DBGMISC(count:program:sequence:user:timeFlg:fld1:fld2:fld3:fld4:fld5:fld6:fld7:fld8:fld9:fld10:fld11);