Home > AS/400 News > DDL for the sample menu tables
AS/400 News:
EMAIL THIS

DDL for the sample menu tables

By Jim Mason
03 Nov 2004 | Search400.com

Digg This!    StumbleUpon Toolbar StumbleUpon    Bookmark with Delicious Del.icio.us   

QSUSR – user table

 

CREATE TABLE EBT.qsusr (  --  database: DEMO

    USERNAME         CHAR(20) ,             -- USERNAME

    DOMAIN   CHAR(20) ,             -- DOMAIN

    REALM     CHAR(20) ,             -- REALM

    ORGANIZATION  CHAR(20) ,             -- ORGANIZATION

    UNIT        CHAR(20) ,             -- UNIT

    PASSWORD        CHAR(20) ,             -- PASSWORD

    FIRSTNAME        CHAR(20) ,             -- FIRSTNAME

    LASTNAME         CHAR(20) ,             -- LASTNAME

    GROUP    CHAR(20) ,             -- GROUP

    ROLE       CHAR(20) ,             -- ROLE

    STATUS    CHAR(10) ,             -- STATUS

    EXPIREDATE       DATE ,         -- EXPIREDATE

    EXPIREDAYS       INTEGER ,              -- EXPIREDAYS

    AUTHORIZEDBY  CHAR(20) ,             -- AUTHORIZEDBY

    AUHORIZEDDATE DATE ,         -- AUHORIZEDDATE

    PASSWORDQUESTION   VARCHAR(50) ,                 -- PASSWORDQUESTION

    PASSWORDANSWER      VARCHAR(50) ,                 -- PASSWORDANSWER

    ADDRESSLINE1    VARCHAR(30) ,                 -- ADDRESSLINE1

    ADDRESSLINE2    VARCHAR(30) ,                 -- ADDRESSLINE2

    CITY        VARCHAR(25) ,                 -- CITY

    STATE      CHAR(5) ,              -- STATE

    MAILCODE CHAR(9) ,              -- MAILCODE

    COUNTRY VARCHAR(25) ,                 -- COUNTRY

    EMAIL      VARCHAR(30) ,                 -- EMAIL

    PHONE     VARCHAR(25) ,                 -- PHONE

    LOCATION         VARCHAR(25)  );               -- LOCATION

-- END COLUMNS

-- ALTER TABLE

ALTER TABLE EBT.qsusr    ADD PRIMARY KEY (  ID)

-- END ALTER TABLE

 

 

QSGRP – group table

 

CREATE TABLE EBT.qsgrp (  --  database: DEMO

    GROUP    CHAR(20) ,             -- GROUP

    DOMAIN   CHAR(20) ,             -- DOMAIN

    REALM     CHAR(20) ,             -- REALM

    ORGANIZATION  CHAR(25) ,             -- ORGANIZATION

    UNIT        CHAR(25) ,             -- UNIT

    DESCRIPTION      VARCHAR(50) ,                 -- DESCRIPTION

    CONTACTNAME  VARCHAR(30) ,                 -- CONTACTNAME

    ROLE       CHAR(20) ,             -- ROLE

    STATUS    CHAR(10) ,             -- STATUS

    MAINTDATE        DATE ,         -- MAINTDATE

    ADDRESSLINE1    VARCHAR(30) ,                 -- ADDRESSLINE1

    ADDRESSLINE2    VARCHAR(30) ,                 -- ADDRESSLINE2

    CITY        VARCHAR(25) ,                 -- CITY

    STATE      CHAR(5) ,              -- STATE

    MAILCODE CHAR(9) ,              -- MAILCODE

    COUNTRY VARCHAR(25) ,                 -- COUNTRY

    EMAIL      VARCHAR(30) ,                 -- EMAIL

    PHONE     VARCHAR(25) ,                 -- PHONE

    LOCATION         VARCHAR(25) ,                 -- LOCATION

    PASSWORD        CHAR(20) ,             -- PASSWORD

    PROFILE   CHAR(20) ,             -- PROFILE

    APP_NAME         VARCHAR(25) ,                 -- APP_NAME

    MENU_NAME      VARCHAR(50) ,                 -- MENU_NAME

    MENU_URL        VARCHAR(256)  );             -- MENU_URL

-- END COLUMNS

-- ALTER TABLE

ALTER TABLE EBT.qsgrp    ADD PRIMARY KEY (  ID)

-- END ALTER TABLE

 

 

QSMIT – menu item table

 

CREATE TABLE EBT.qsmit (  --  database: DEMO

    ID   INTEGER  NOT NULL WITH DEFAULT 0 ,           -- ID

    REALM     CHAR(20) ,             -- REALM

    APP_NAME         VARCHAR(25) ,                 -- APP_NAME

    MENU_NAME      VARCHAR(50) ,                 -- MENU_NAME

    MENU_URL        VARCHAR(256) ,               -- MENU_URL

    MENU_LABEL      VARCHAR(50) ,                 -- MENU_LABEL

    MENU_TYPE       CHAR(10) ,             -- MENU_TYPE

    MENU_STATUS   CHAR(10) ,             -- MENU_STATUS

    MENU_TARGET   CHAR(10) ,             -- MENU_TARGET

    MENU_LEVEL      INTEGER ,              -- MENU_LEVEL

    MENU_ORDER     INTEGER ,              -- MENU_ORDER

    SETUSER   CHAR(4) ,              -- SETUSER

    MENU_USER       CHAR(10) ,             -- MENU_USER

    MENU_PASSWORD        CHAR(10) ,             -- MENU_PASSWORD

    ITEMTYPE CHAR(10) ,             -- ITEMTYPE

    MENU_FLAG       CHAR(10)  );           -- MENU_FLAG

-- END COLUMNS

-- ALTER TABLE

ALTER TABLE EBT.qsmit    ADD PRIMARY KEY (  ID)

-- END ALTER TABLE

 




Digg This!    StumbleUpon Toolbar StumbleUpon    Bookmark with Delicious Del.icio.us   



RELATED RESOURCES
2020software.com, trial software downloads for accounting software, ERP software, CRM software and business software systems
Search Bitpipe.com for the latest white papers and business webcasts
Whatis.com, the online computer dictionary


iSeries Application Development: CL, COBOL, RPG, VB, ILE, Java
HomeNewsTopicsITKnowledge ExchangeTipsBlogsAsk the ExpertsMultimediaWhite PapersProducts
About Us  |  Contact Us  |  For Advertisers  |  For Business Partners  |  Site Index  |  RSS
SEARCH 
TechTarget provides technology professionals with the information they need to perform their jobs - from developing strategy, to making cost-effective purchase decisions and managing their organizations' technology projects - with its network of technology-specific websites, events and online magazines.

TechTarget Corporate Web Site  |  Media Kits  |  Site Map




All Rights Reserved, Copyright 1999 - 2010, TechTarget | Read our Privacy Policy
  TechTarget - The IT Media ROI Experts