Previous Topic: What You Can DoNext Topic: Demonstration (2): Replacing Rows of an Existing Table


Demonstration (1): Adding Rows to an Existing Table

Objective

This example adds the contents of the NEW-CUSTOMER table to the CUSTOMER-LIST table. Note that the type 5 parameters must match the column definitions for the CUSTOMER-LIST table.

Parameters

INPUT TABLE=NEW-CUSTOMERS
TYPE=COPY  USER=DOC1 PW=DOC1
*        CATALOG=ASFDICT

INPUT identifies the INPUT parameter, which includes the COPY instruction.

TABLE=NEW-CUSTOMERS specifies the table that will be added to CUSTOMER-LIST.

TYPE=COPY specifies copying rows from the input table NEW-CUSTOMERS.

05OUTPUT TABLE=CUSTOMER-LIST
TYPE=ADD USER=DOC1 PW=DOC1
*        CATALOG=ASFDICT

OUTPUT identifies the OUTPUT parameter, which includes the ADD instruction.

TABLE=CUSTOMER-LIST specifies the table receiving the additional rows.

TYPE=ADD adds new rows to the CUSTOMER-LIST table.

0551*001 CUST-NUMBER
0551*002 CUST-NAME
0551*003 CUST-ADDRESS

1, 2, and 3 define three table columns.

Complete Code

 col. 2
 ▼
 INPUT TABLE=NEW-CUSTOMERS TYPE=COPY USER=DOC1 PW=DOC1
*        CATALOG=ASFDICT
 05OUTPUT TABLE=CUSTOMER-LIST TYPE=ADD USER=DOC1 PW=DOC1
*       CATALOG=ASFDICT
 0551*001 CUST-NUMBER    FZ   SZ=5
 0551*002 CUST-NAME
 0551*003 CUST-ADDRESS

Results

The contents of NEW-CUSTOMER:

  25060SUSAN     ARMITAGE  56725 OAK STREET    PITTSFIELD     MA02956   27056ALLEN     KOHN      22651 POLK STREET   SAN FRANCISCO  CA09809   39557HENRY     TRUMBLE    2102 WASHINGTON ST BROOKLINE      MA02147   30415MARY      SMYTH      5999 SANDY LANE    LONG BEACH     CA09743   33480VICKY     KNIGHT     5678 PINE ROAD     PORTLAND       ME06895   69879BRUNO     THOR      22002 PEACHS AVE    FRESNO         CA96543   99983ELLEN     SANDS         1 APPLE ORCHARD BISCOE         NC64321

The contents of CUSTOMER-LIST before the ADD modification:

  15060SHARON    ARMSTRONG    25 CEDAR STREET  WAYLAND        MA02756   21056AMOS      JOHNSON   22651 MASS AVENUE   SAN FRANCISCO  CA09801   29557IRWIN     TRIMBLE     102 COLBOURNE ST  BROOKLINE      MA02147   30115IRMA      DOONES     5656 SANDHILL ROAD OCEAN CITY     CA09743   33470VICTORIA  DAY        1234 OAK HILL ROAD EVERGREEN      MI07895   69876BRUCE     THORPE    11002 PEACHTREE LA  ATLANTA        GA76543   99083HELEN     SANTOVEC      3 APPLE ORCHARD CHARLOTTE      NC64321

The contents of CUSTOMER-LIST after the ADD modification:

  15060SHARON    ARMSTRONG    25 CEDAR STREET  WAYLAND        MA02756   21056AMOS      JOHNSON   22651 MASS AVENUE   SAN FRANCISCO  CA09801   29557IRWIN     TRIMBLE     102 COLBOURNE ST  BROOKLINE      MA02147   30115IRMA      DOONES     5656 SANDHILL ROAD OCEAN CITY     CA09743   33470VICTORIA  DAY        1234 OAK HILL ROAD EVERGREEN      MI07895   69876BRUCE     THORPE    11002 PEACHTREE LA  ATLANTA        GA76543   99083HELEN     SANTOVEC      3 APPLE ORCHARD CHARLOTTE      NC64321   25060SUSAN     ARMITAGE  56725 OAK STREET    PITTSFIELD     MA02956   27056ALLEN     KOHN      22651 POLK STREET   SAN FRANCISCO  CA09809   39557HENRY     TRUMBLE    2102 WASHINGTON ST BROOKLINE      MA02147   30415MARY      SMYTH      5999 SANDY LANE    LONG BEACH     CA09743   33480VICKY     KNIGHT     5678 PINE ROAD     PORTLAND       ME06895   69879BRUNO     THOR       2002 PEACHS AVE    FRESNO         CA96543   99983ELLEN     SANDS         1 APPLE ORCHARD BISCOE         NC64321