Kay,
OCF SELECT * FROM SYSTEM.TABLE WHERE NAME='DEPARTMENT' which is the SQL-defined table would give you the data-length of the table row
, ,OCF 17.0 IDMS ,PAGE 1 LINE 1 DICT=JISDICT 1/47,SYST0001
CREATE SCHEMA DEMOEMPL
*+ DATE CREATED 2004-06-01-08.40.50.321783 BY QZHJT7
*+ DATE LAST UPDATED 2004-09-28-14.39.51.163901 BY GZWMS0
*+ FOR SQL
;
CREATE TABLE DEMOEMPL.DEPARTMENT
*+ DATE CREATED 2004-06-01-08.40.50.665172 BY QZHJT7
*+ DATE LAST UPDATED 2004-06-01-08.40.51.390141 BY QZHJT7
( DEPT_ID UNSIGNED NUMERIC(4) NOT NULL,
DEPT_HEAD_ID UNSIGNED NUMERIC(4),
DIV_CODE CHARACTER(3) NOT NULL,
DEPT_NAME CHARACTER(40) NOT NULL
)
, ,OCF 17.0 IDMS ,PAGE 1 LINE 1 DICT=JISDICT 1/47,SYST0001
SELECT * FROM SYSTEM.TABLE WHERE NAME='DEPARTMENT'
*+
*+ SCHEMA NAME SEGMENT AREA
*+ ------ ---- ------- ----
*+ DEMOEMPL DEPARTMENT SQLDEMO INFOAREA
*+
*+ TABLEID TYPE LOCMODE COMPRESS FORMAT UPDATABLE CHECKOPT
*+ ------- ---- ------- -------- ------ --------- --------
*+ 1024 T U N F
*+
*+ TIMESTAMP CTIME
*+ --------- -----
*+ 2004-06-01-08.40.51.390220 2004-06-01-08.40.50.665172
*+
*+ UTIME CUSER UUSER
*+ ----- ----- -----
*+ 2004-06-01-08.40.51.390141 QZHJT7 QZHJT7
*+
*+ PUTROUTINE GETROUTINE LENGTH DATALENGTH PREFIXLENGTH CTRLENGTH
*+ ---------- ---------- ------ ---------- ------------ ---------
*+ 60 52 8 12
*+
*+ FIXLENGTH SECLENGTH NUMSYNTAX NUMCOLS NUMINDEXES NUMREFERENCED
*+ --------- --------- --------- ------- ---------- -------------
*+ 52 0 0 4 3 1
*+
*+ NUMREFERENCING DISPLACEMENT ESTROWS NUMPAGES NUMROWS
*+ -------------- ------------ ------- -------- -------
*+ 2 0 0 0 0
*+
*+ ROWSPERPAGE AVGROWLENGTH PCTSPACEUSED PCTFRAGROWS NUMIO01
*+ ----------- ------------ ------------ ----------- -------
*+ 0 0.0000000E+00 0.0000000E+00 0.0000000E+00 0.0000000E+00
*+
*+ NUMIO03 NUMIO05 NUMIO10 NUMIO20 PROCMODE
*+ ------- ------- ------- ------- --------
*+ 0.0000000E+00 0.0000000E+00 0.0000000E+00 0.0000000E+00
*+
*+ TXNSHARING PROCDBNAME FILLER1 SECLENGTH2 LANGUAGE FILLER3
*+ ---------- ---------- ------- ---------- -------- -------
*+ 00 0 00
*+
*+ DYNRESULTSETS FILLER
*+ ------------- ------
*+ 0 000000000000000000000000000000000000
*+
Regards,
Paul Mak
Database Administrator - CA-IDMS & ObjectStar
Best Shore Application Services
HP Enterprise Services, South Pacific
Telephone +61 2 9022 2604
Mobile +61 419 398 116
Email
paul.mak@hp.com
Level 2, 410 Concord Road, Rhodes, NSW 2138, AUSTRALIA