Example Data

View Descriptors Based on the Access Descriptors for IMS

This section shows the SAS statements that are used to create the view descriptors for the ACCTDBD database that is used in the examples in this document. The ACCTDBD database is described in IMS Essentials. The view descriptors are presented here in alphabetical order for easy reference.

You can create all the view descriptors used in the document by using PROC ACCESS statements. These view descriptors are based on the MYLIB.ACCOUNT access descriptor shown earlier in this appendix.

proc access dbms=ims ad=mylib.account;
  create vlib.account.view psb=accupsb;
    select  soc_sec_number
            customer_name
            city
            state
            zip_code;
  list view;

  create vlib.cdbtdate.view psb=accupsb;
    select  check_account_number
            check_date;
  list view;

  create vlib.chckacct.view psb=accupsb;
    select  soc_sec_number
            customer_name
            check_account_number
            check_date
            check_balance;
  list view;

  create vlib.chkcrd.view psb=accupsb pcb=2;
    select  customer_record
            checking_account_record
            checking_credit_record;
    reset 17 28;
  list view;

  create vlib.chkdeb.view psb=accupsb pcb=3;
    select  customer_record
            checking_account_record
            checking_debit_record;
    reset 17 22;
  list view;

  create vlib.chktrans.view psb=accupsb;
    select  customer_name
            check_account_number
            check_date
            check_balance;
  list view;

  create vlib.credits.view psb=accupsb;
    select  soc_sec_number
            check_account_number
            check_credit_amount
            check_credit_date
            check_credit_time
            check_credit_desc;
  list view;

  create vlib.custacct.view psb=accupsb;
    select  soc_sec_number
            customer_name
            check_account number;
  list view;

  create vlib.custinfo.view psb=accupsb;
    select  2 3 5 6 7 8 9 10 11 12;
  list view;

  create vlib.custphon.view psb=accupsb;
    select  soc_sec_number
            customer_name
            home_phone
            office_phone;
  list view;

  create vlib.savebal.view psb=accupsb;
    select  soc_sec_number
            customer_name
            city
            32 36;
  list view;

  create vlib.ssname.view psb=accupsb;
    select  soc_sec_number
            customer_name;
  list view;

  create vlib.trans.view psb=accupsb;
    select  soc_sec_number
            check_account_number
            check_debit_amount;
  list view;

run;

EMPLINF2 Database View Descriptors

This section shows the SAS statements that are used to create the view descriptors for the EMPLINF2 database used in the examples in this document. The view descriptors are presented here in alphabetical order for easy reference. You can create all the view descriptors used in the document by using PROC ACCESS statements. These view descriptors are based on the MYLIB.EMPLOYEE access descriptor shown earlier in this appendix.

proc access dbms=ims accdesc=mylib.employee;
  create vlib.emplload.view psbname=empilpsb;
    select  employee_record;
  list view;

  create vlib.emplview.view psbname=empiupsb;
    select  employee_record;
  list view;

  create vlib.empbday.view psbname=empiupsb;
    select  employee_id
            last_name
            first_name
            birthday
            phone_extension;
  list view;

run;

WIRETRAN Database View Descriptor

This section shows the SAS statements that are used to create the VLIB.WIREDATA view descriptor for the WIRETRAN database that is used in the examples in this document. The WIRETRAN database is described in detail in Defining SAS/ACCESS Descriptor Files. This view descriptor is based on the MYLIB.WIRETRAN access descriptor shown earlier in this appendix.

proc access dbms=ims ad=mylib.wiretran;
  create vlib.wiredata.view psbname=acctsam
     pcbindex=5;
    select 'wire transaction';
  list view;
run;

Top of Page