[Search for users]
[Overall Top Noters]
[List of all Conferences]
[Download this site]
| Title: | FOCUS, from INFORMATION BUILDERS |
|
| Moderator: | ZAYIUS::BROUILLETTE |
|
| Created: | Thu Feb 19 1987 |
| Last Modified: | Mon May 05 1997 |
| Last Successful Update: | Fri Jun 06 1997 |
| Number of topics: | 615 |
| Total number of notes: | 1779 |
295.0. "FOCUS/RDB PROBLEM ACCESSING MULTI-TABLES" by TOMCAT::STEVENS () Thu Jan 04 1990 13:29
Hi,
I need help to figure out where I'm going wrong in my usage
of IBI FOCUS to access an RDB database. We just started to
experiment with using RDB databases instead of RMS or native
FOCUS files structures. Almost all our usage of the database
will be for read-only, reporting needs.
Below I included a log of what is happening when I try to
report on all three segments (tables) of our RDB database. If
I use fields from just the HEADER and LITEM tables it works
fine. Once I start trying to use the SCHED table the error
occurs. Its an RDB error code 00DD832C, and a FOCUS error
1469/1462.
If I create separate .MAS and .ACX files for each table and
only access that particular table, it works fine.
Can anyone see where I'm going wrong, and what I should do to
correct it? I also included the MAS, ACX, and actual SQL table
procedures.
Paul
--------------------------------------------------------------
4-JAN-1990 13:08:45
FOCUS 5.2 VX5.2.1 CREATED 09/20/89
(C)Copyright 1988 Information Builders Inc.
STARTUP PROCEDURE BEGINNING
>>
>
>>>>>>>>>STARTUP PROCEDURE COMPLETE
FILEDEF BKLGDB DISK DSS_WORK:BKLG.RDB
>>
TABLE FILE BKLGDB
>>
PRINT S_DEC_NO S_LI_NO SUB_SCH_DT
>
IF S_DEC_NO EQ 90001697Z
>
END
>
JOININT CALLED TO READ DATA
(FOC1469) ERROR IN ACCESSING : DSS_WORK_ROOT:[WRK]BKLG.RDB/SCHED
(FOC1462) RDB PREPARE REQUEST ERROR. RDBCODE IS : 00DD832C
%RDMS-F-WISH_LIST, feature not implemented yet
FIN
>>
4-JAN-1990 13:09:02
SUPPORT_PJS job terminated at 4-JAN-1990 13:09:02.39
Accounting information:
Buffered I/O count: 319 Peak working set size: 3682
Direct I/O count: 205 Peak page file size: 19745
Page faults: 4221 Mounted volumes: 0
Charged CPU time: 0 00:00:05.48 Elapsed time: 0 00:00:22.03
--------------------------------------------------------------
!
! FOCUS - BKLGDB.MAS DESCRIPTION
!
FILENAME=BKLGDB ,SUFFIX=RDB ,$
SEGNAME=HEADER ,SEGTYPE=S0 ,$
FIELDNAME = H_DEC_NO ,DEC_NO ,A9 ,A9 ,MISSING=OFF ,$
FIELDNAME = SEQ_NO ,SEQ_NO ,A15 ,A15 ,MISSING=ON ,$
FIELDNAME = EMP_BADGE ,EMP_BADGE ,A7 ,A7 ,MISSING=ON ,$
FIELDNAME = ORGNTR_BADGE ,ORGNTR_BADGE ,A7 ,A7 ,MISSING=ON ,$
FIELDNAME = CSA_BADGE ,CSA_BADGE ,A7 ,A7 ,MISSING=ON ,$
FIELDNAME = BILL_CUST_ID ,BILL_CUST_ID ,A7 ,A7 ,MISSING=ON ,$
FIELDNAME = SOLD_CUST_ID ,SOLD_CUST_ID ,A7 ,A7 ,MISSING=ON ,$
FIELDNAME = COST_CTR ,COST_CTR ,A4 ,A4 ,MISSING=ON ,$
FIELDNAME = CSA_FAC_CD ,CSA_FAC_CD ,A4 ,A4 ,MISSING=ON ,$
FIELDNAME = IEG_BK_CTR ,IEG_BK_CTR ,A4 ,A4 ,MISSING=ON ,$
FIELDNAME = HDR_ACTVY_CD ,HDR_ACTVY_CD ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = AUTHZ_TYP_CD ,AUTHZ_TYP_CD ,A2 ,A2 ,MISSING=ON ,$
FIELDNAME = CATALG_CD ,CATALG_CD ,A3 ,A3 ,MISSING=ON ,$
FIELDNAME = CORP_CD ,CORP_CD ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = HDR_SEG_CD ,HDR_SEG_CD ,A3 ,A3 ,MISSING=ON ,$
FIELDNAME = SUBS_STA_CD ,SUBS_STA_CD ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = ORD_SRC_CD ,ORD_SRC_CD ,A2 ,A2 ,MISSING=ON ,$
FIELDNAME = AGREE_TYP ,AGREE_TYP ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = BUS_COND_ID ,BUS_COND_ID ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = CAP_EQP_X95 ,CAP_EQP_X95 ,A10 ,A10 ,MISSING=ON ,$
FIELDNAME = CD_RISK ,CD_RISK ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = PO_NO ,PO_NO ,A26 ,A26 ,MISSING=ON ,$
FIELDNAME = AGREE_NO ,AGREE_NO ,A13 ,A13 ,MISSING=ON ,$
FIELDNAME = DISC_LIST_CD ,DISC_LIST_CD ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = DISC_CLAS_CD ,DISC_CLAS_CD ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = IEG_CHRG_NO ,IEG_CHRG_NO ,A5 ,A5 ,MISSING=ON ,$
FIELDNAME = IEG_CHRG_TYP ,IEG_CHRG_TYP ,A3 ,A3 ,MISSING=ON ,$
FIELDNAME = IEG_GL_NO ,IEG_GL_NO ,A3 ,A3 ,MISSING=ON ,$
FIELDNAME = INV_ONLY_CD ,INV_ONLY_CD ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = INV_ONLY_REA ,INV_ONLY_REA ,A2 ,A2 ,MISSING=ON ,$
FIELDNAME = LI_NO_RECS ,LI_NO_RECS ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = OPN_LI_NO ,OPN_LI_NO ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = PT_OF_ENTRY ,PT_OF_ENTRY ,A4 ,A4 ,MISSING=ON ,$
FIELDNAME = PARTL_FLG ,PARTL_FLG ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = SLS_BK_CTR1 ,SLS_BK_CTR1 ,A4 ,A4 ,MISSING=ON ,$
FIELDNAME = SOFT_ONLY_CD ,SOFT_ONLY_CD ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = SHIPMENT_TYP ,SHIPMENT_TYP ,A2 ,A2 ,MISSING=ON ,$
FIELDNAME = HDR_GRS ,HDR_GRS ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = HDR_CHG_AMT ,HDR_CHG_AMT ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = HDR_ALW ,HDR_ALW ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = HDR_DSC ,HDR_DSC ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = INSURE_AMT ,INSURE_AMT ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = HDR_NET ,HDR_NET ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = HDR_OPN ,HDR_OPN ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = TOT_ALW_AMT ,TOT_ALW_AMT ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = TOT_DSC_AMT ,TOT_DSC_AMT ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = ADD_INSTL ,ADD_INSTL ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = PO_AUTHZ_DT ,PO_AUTHZ_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = PO_RCV_DT ,PO_RCV_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = ORD_CERT_DT ,ORD_CERT_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = ORD_CANCL_DT ,ORD_CANCL_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = CR_RLS_DT ,CR_RLS_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = CR_ENT_DT ,CR_ENT_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = SUSP_ENT_DT ,SUSP_ENT_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = SUSP_RLS_DT ,SUSP_RLS_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = ORD_COMP_DT ,ORD_COMP_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = ORD_ENT_DT ,ORD_ENT_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = FIRST_ACK_DT ,FIRST_ACK_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = LAST_ACK_DT ,LAST_ACK_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = EDIT_SUSP_DT ,EDIT_SUSP_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = EDIT_REL_DT ,EDIT_REL_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = ORD_ENT_TI ,ORD_ENT_TI ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = ORD_CERT_TI ,ORD_CERT_TI ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = CR_RLS_TI ,CR_RLS_TI ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = CR_ENT_TI ,CR_ENT_TI ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = SUPS_ENT_TI ,SUSP_ENT_TI ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = SUSP_RLS_TI ,SUSP_RLS_TI ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = EDIT_SUSP_TI ,EDIT_SUSP_TI ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = EDIT_RLS_TI ,EDIT_RLS_TI ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = ORD_TYP ,ORD_TYP ,A1 ,A1 ,MISSING=ON ,$
SEGNAME=LITEM ,SEGTYPE=S0 ,PARENT=HEADER ,$
FIELDNAME = L_DEC_NO ,DEC_NO ,A9 ,A9 ,MISSING=OFF ,$
FIELDNAME = L_LI_NO ,LI_NO ,I4 ,I4 ,MISSING=OFF ,$
FIELDNAME = LI_ACTVY_CD ,LI_ACTVY_CD ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = LI_DSC_CD ,LI_DSC_CD ,A2 ,A2 ,MISSING=ON ,$
FIELDNAME = LI_SEG_CD ,LI_SEG_CD ,A3 ,A3 ,MISSING=ON ,$
FIELDNAME = PRC_DEV_CD ,PRC_DEV_CD ,A2 ,A2 ,MISSING=ON ,$
FIELDNAME = PR_FL_SEG_CD ,PR_FL_SEG_CD ,A3 ,A3 ,MISSING=ON ,$
FIELDNAME = SLS_ACTVY_CD ,SLS_ACTVY_CD ,A2 ,A2 ,MISSING=ON ,$
FIELDNAME = LI_DSC ,LI_DSC ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = LI_GRS ,LI_GRS ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = LI_ADD_INSTL ,LI_ADD_INSTL ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = LI_NET ,LI_NET ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = LI_NON_DSC ,LI_NON_DSC ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = LI_OPN_VAL ,LI_OPN_VAL ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = LI_ALW ,LI_ALW ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = UNIT_MLP ,UNIT_MLP ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = UNIT_QPB ,UNIT_QPB ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = UNIT_PRC ,UNIT_PRC ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = UNIT_COST ,UNIT_COST ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = LI_SHP_QTY ,LI_SHP_QTY ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = RVS_LI_QTY ,RVS_LI_QTY ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = LI_TYP ,LI_TYP ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = LEAD_TI ,LEAD_TI ,A2 ,A2 ,MISSING=ON ,$
FIELDNAME = PART_NO ,PART_NO ,A9 ,A9 ,MISSING=ON ,$
FIELDNAME = PROD_DSG_ID ,PROD_DSG_ID ,A3 ,A3 ,MISSING=ON ,$
FIELDNAME = SYSTEM_ID ,SYSTEM_ID ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = CPU_ID ,CPU_ID ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = LI_CANCL_DT ,LI_CANCL_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = LI_COMP_DT ,LI_COMP_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = LI_ENT_DT ,LI_ENT_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = LAST_SHP_DT ,LAST_SHP_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = LI_ENT_TI ,LI_ENT_TI ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = MDL_SW_LIC ,MDL_SW_LIC ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = UNIT_CLP ,UNIT_CLP ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = UNIT_SLP ,UNIT_SLP ,D12.2 ,F4 ,MISSING=ON ,$
FIELDNAME = WAS_SUP_LVL ,WAS_SUP_LVL ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = SLP_PRC_IND ,SLP_PRC_IND ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = UN_SLP_AD_IN ,UN_SLP_AD_IN ,D12.2 ,F4 ,MISSING=ON ,$
SEGNAME=SCHED ,SEGTYPE=S0 ,PARENT=LITEM ,$
FIELDNAME = S_DEC_NO ,DEC_NO ,A9 ,A9 ,MISSING=OFF ,$
FIELDNAME = S_LI_NO ,LI_NO ,I4 ,I4 ,MISSING=OFF ,$
FIELDNAME = SUB_REQST_DT ,SUB_REQST_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = SUB_SCH_DT ,SUB_SCH_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = SUB_SHP_QTY ,SUB_SHP_QTY ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = SCH_SHP_QTY ,SCH_SHP_QTY ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = SUB_ACTVY_CD ,SUB_ACTVY_CD ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = SUB_AVAIL_ID ,SUB_AVAIL_ID ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = SUB_AVAL_MSC ,SUB_AVAL_MSC ,A1 ,A1 ,MISSING=ON ,$
FIELDNAME = SUB_DOC_NO ,SUB_DOC_NO ,A9 ,A9 ,MISSING=ON ,$
FIELDNAME = SUB_INV_NO1 ,SUB_INV_NO1 ,A9 ,A9 ,MISSING=ON ,$
FIELDNAME = SUB_INV_NO2 ,SUB_INV_NO2 ,A9 ,A9 ,MISSING=ON ,$
FIELDNAME = SUB_INV_NO3 ,SUB_INV_NO3 ,A9 ,A9 ,MISSING=ON ,$
FIELDNAME = HOLD_RCC ,HOLD_RCC ,A2 ,A2 ,MISSING=ON ,$
FIELDNAME = SUB_SBA_NO ,SUB_SBA_NO ,A15 ,A15 ,MISSING=ON ,$
FIELDNAME = SUB_SHP_LOC ,SUB_SHP_LOC ,A3 ,A3 ,MISSING=ON ,$
FIELDNAME = SUB_INV_DT ,SUB_INV_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = SUB_SHP_DT ,SUB_SHP_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = ORG_CMMT_DT ,ORG_CMMT_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = ORG_SCH_DT ,ORG_SCH_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = SUB_BMDS_DT ,SUB_BMDS_DT ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = RVS_SHP_DT_1 ,RVS_SHP_DT_1 ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = RVS_SHP_DT_2 ,RVS_SHP_DT_2 ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = RVS_SHP_DT_3 ,RVS_SHP_DT_3 ,I4 ,I4 ,MISSING=ON ,$
FIELDNAME = SUB_DT_SEQ ,SUB_DT_SEQ ,A2 ,A2 ,MISSING=ON ,$
FIELDNAME = SUB_ETA_DT ,SUB_ETA_DT ,I4 ,I4 ,MISSING=ON ,$
--------------------------------------------------------------
!
! BKLGDB.ACX
!
SEGNAME=HEADER,TABLENAME=BKLGDB.HEADER,$
SEGNAME=LITEM,TABLENAME=BKLGDB.LITEM,
KEYFLD=H_DEC_NO,IXFLD=L_DEC_NO,$
SEGNAME=SCHED,TABLENAME=BKLGDB.SCHED,
KEYFLD=L_DEC_NO/L_LI_NO,IXFLD=S_DEC_NO/S_LI_NO,$
--------------------------------------------------------------
!
! BKLG_BLD.SQL 12-20-89
! PAUL STEVENS
!
!
! DEFINE BKLG DATABASE
!
!
! CREATE DOMAINS
!
CREATE DOMAIN CODE_1_DOM CHAR (1)
EDIT STRING IS "T(1)";
!
CREATE DOMAIN CODE_2_DOM CHAR (2)
EDIT STRING IS "T(2)";
!
CREATE DOMAIN CODE_3_DOM CHAR (3)
EDIT STRING IS "T(3)";
!
CREATE DOMAIN CTR_FAC_DOM CHAR (4)
EDIT STRING IS "T(4)";
!
CREATE DOMAIN CHARG_DOM CHAR (5)
EDIT STRING IS "T(5)";
!
CREATE DOMAIN CUST_ID_DOM CHAR (7)
EDIT STRING IS "T(7)";
!
CREATE DOMAIN BADGE_DOM CHAR (7)
EDIT STRING IS "T(7)";
!
CREATE DOMAIN NUMBER_DOM CHAR (9)
EDIT STRING IS "T(9)";
!
CREATE DOMAIN PART_NUM_DOM CHAR (9)
EDIT STRING IS "T(9)";
!
CREATE DOMAIN ASSET_DOM CHAR (10)
EDIT STRING IS "T(10)";
!
CREATE DOMAIN AGREE_NO_DOM CHAR (13)
EDIT STRING IS "T(13)";
!
CREATE DOMAIN PHONE_DOM CHAR (14)
EDIT STRING IS "T(14)";
!
CREATE DOMAIN DOC_DOM CHAR (15)
EDIT STRING IS "T(15)";
!
CREATE DOMAIN PO_NUM_DOM CHAR (26)
EDIT STRING IS "T(26)";
!
CREATE DOMAIN NAME_DOM CHAR (30)
EDIT STRING IS "T(30)";
!
CREATE DOMAIN DATE_DOM DATE
EDIT STRING IS "DD-MMM-YYYY";
!
CREATE DOMAIN ITEM_DOM SMALLINT
EDIT STRING IS "999";
!
CREATE DOMAIN TIME_DOM SMALLINT
EDIT STRING IS "ZZZ9";
!
CREATE DOMAIN QTY_DOM INTEGER
EDIT STRING IS "ZZZZZZ9";
!
CREATE DOMAIN AMOUNT_DOM FLOAT (2)
EDIT STRING IS "ZZZZZZZZZZ9.99";
!
!
! CREATE TABLES
!
CREATE TABLE HEADER
( DEC_NO NUMBER_DOM
NOT NULL
DIAGNOSTIC HEADER_DEC_NO_NOT_NULL,
SEQ_NO DOC_DOM,
EMP_BADGE BADGE_DOM,
ORGNTR_BADGE BADGE_DOM,
CSA_BADGE BADGE_DOM,
BILL_CUST_ID CUST_ID_DOM,
SOLD_CUST_ID CUST_ID_DOM,
COST_CTR CTR_FAC_DOM,
CSA_FAC_CD CTR_FAC_DOM,
IEG_BK_CTR CTR_FAC_DOM,
HDR_ACTVY_CD CODE_1_DOM,
AUTHZ_TYP_CD CODE_2_DOM,
CATALG_CD CODE_3_DOM,
CORP_CD CODE_1_DOM,
HDR_SEG_CD CODE_3_DOM,
SUBS_STA_CD CODE_1_DOM,
ORD_SRC_CD CODE_2_DOM,
AGREE_TYP CODE_1_DOM,
BUS_COND_ID CODE_1_DOM,
CAP_EQP_X95 ASSET_DOM,
CD_RISK CODE_1_DOM,
PO_NO PO_NUM_DOM,
AGREE_NO AGREE_NO_DOM,
DISC_LIST_CD CODE_1_DOM,
DISC_CLAS_CD CODE_1_DOM,
IEG_CHRG_NO CHARG_DOM,
IEG_CHRG_TYP CODE_3_DOM,
IEG_GL_NO CODE_3_DOM,
INV_ONLY_CD CODE_1_DOM,
INV_ONLY_REA CODE_2_DOM,
LI_NO_RECS ITEM_DOM,
OPN_LI_NO ITEM_DOM,
PT_OF_ENTRY CODE_3_DOM,
PARTL_FLG CODE_1_DOM,
SLS_BK_CTR1 CODE_3_DOM,
SOFT_ONLY_CD CODE_1_DOM,
SHIPMENT_TYP CODE_2_DOM,
HDR_GRS AMOUNT_DOM,
HDR_CHG_AMT AMOUNT_DOM,
HDR_ALW AMOUNT_DOM,
HDR_DSC AMOUNT_DOM,
INSURE_AMT AMOUNT_DOM,
HDR_NET AMOUNT_DOM,
HDR_OPN AMOUNT_DOM,
TOT_ALW_AMT AMOUNT_DOM,
TOT_DSC_AMT AMOUNT_DOM,
ADD_INSTL AMOUNT_DOM,
PO_AUTHZ_DT DATE_DOM,
PO_RCV_DT DATE_DOM,
ORD_CERT_DT DATE_DOM,
ORD_CANCL_DT DATE_DOM,
CR_RLS_DT DATE_DOM,
CR_ENT_DT DATE_DOM,
SUSP_ENT_DT DATE_DOM,
SUSP_RLS_DT DATE_DOM,
ORD_COMP_DT DATE_DOM,
ORD_ENT_DT DATE_DOM,
FIRST_ACK_DT DATE_DOM,
LAST_ACK_DT DATE_DOM,
EDIT_SUSP_DT DATE_DOM,
EDIT_REL_DT DATE_DOM,
ORD_ENT_TI TIME_DOM,
ORD_CERT_TI TIME_DOM,
CR_RLS_TI TIME_DOM,
CR_ENT_TI TIME_DOM,
SUSP_ENT_TI TIME_DOM,
SUSP_RLS_TI TIME_DOM,
EDIT_SUSP_TI TIME_DOM,
EDIT_RLS_TI TIME_DOM,
ORD_TYP CODE_1_DOM );
!
!
!
CREATE TABLE LITEM
(
DEC_NO NUMBER_DOM,
CHECK (
DEC_NO IN (SELECT DEC_NO FROM HEADER)
)
DIAGNOSTIC LITEM_DEC_NO_NOT_NULL,
LI_NO ITEM_DOM
NOT NULL
DIAGNOSTIC LITEM_LI_NO_NOT_NULL,
LI_ACTVY_CD CODE_1_DOM,
LI_DSC_CD CODE_2_DOM,
LI_SEG_CD CODE_3_DOM,
PRC_DEV_CD CODE_2_DOM,
PR_FL_SEG_CD CODE_3_DOM,
SLS_ACTVY_CD CODE_2_DOM,
LI_DSC AMOUNT_DOM,
LI_GRS AMOUNT_DOM,
LI_ADD_INSTL AMOUNT_DOM,
LI_NET AMOUNT_DOM,
LI_NON_DSC AMOUNT_DOM,
LI_OPN_VAL AMOUNT_DOM,
LI_ALW AMOUNT_DOM,
UNIT_MLP AMOUNT_DOM,
UNIT_QPB AMOUNT_DOM,
UNIT_PRC AMOUNT_DOM,
UNIT_COST AMOUNT_DOM,
LI_SHP_QTY QTY_DOM,
RVS_LI_QTY QTY_DOM,
LI_TYP CODE_1_DOM,
LEAD_TI CODE_2_DOM,
PART_NO PART_NUM_DOM
NOT NULL
DIAGNOSTIC LITEM_PART_NO_NOT_NULL,
PROD_DSG_ID CODE_3_DOM,
SYSTEM_ID CODE_1_DOM,
CPU_ID CODE_1_DOM,
LI_CANCL_DT DATE_DOM,
LI_COMP_DT DATE_DOM,
LI_ENT_DT DATE_DOM,
LAST_SHP_DT DATE_DOM,
LI_ENT_TI TIME_DOM,
MDL_SW_LIC CODE_1_DOM,
UNIT_CLP AMOUNT_DOM,
UNIT_SLP AMOUNT_DOM,
WAS_SUP_LVL CODE_1_DOM,
SLP_PRC_IND CODE_1_DOM,
UN_SLP_AD_IN AMOUNT_DOM
);
!
!
!
CREATE TABLE SCHED
(
DEC_NO NUMBER_DOM,
CHECK (
DEC_NO IN (SELECT DEC_NO FROM HEADER)
)
DIAGNOSTIC SCHED_DEC_NO_NOT_NULL,
LI_NO ITEM_DOM
NOT NULL
DIAGNOSTIC SCHED_LI_NO_NOT_NULL,
SUB_REQST_DT DATE_DOM,
SUB_SCH_DT DATE_DOM,
SUB_SHP_QTY QTY_DOM,
SCH_SHP_QTY QTY_DOM,
SUB_ACTVY_CD CODE_1_DOM,
SUB_AVAIL_ID CODE_1_DOM,
SUB_AVAL_MSC CODE_1_DOM,
SUB_DOC_NO NUMBER_DOM,
SUB_INV_NO1 NUMBER_DOM,
SUB_INV_NO2 NUMBER_DOM,
SUB_INV_NO3 NUMBER_DOM,
HOLD_RCC CODE_2_DOM,
SUB_SBA_NO DOC_DOM,
SUB_SHP_LOC CODE_3_DOM,
SUB_INV_DT DATE_DOM,
SUB_SHP_DT DATE_DOM,
ORG_CMMT_DT DATE_DOM,
ORG_SCH_DT DATE_DOM,
SUB_BMDS_DT DATE_DOM,
RVS_SHP_DT_1 DATE_DOM,
RVS_SHP_DT_2 DATE_DOM,
RVS_SHP_DT_3 DATE_DOM,
SUB_DT_SEQ CODE_2_DOM,
SUB_ETA_DT DATE_DOM
);
!
!
!
COMMIT;
EXIT;
| T.R | Title | User | Personal
Name | Date | Lines |
|---|
| 295.1 | Change .ACX file | EN::COYLE | | Fri Jan 05 1990 15:44 | 9 |
|
Paul
Try changing your .ACX file so that TABLENAME=HEADER instead of
TABLENAME=BKLGDB.HEADER. Do this for each of the segnames.
Keep us posted!
KC
|
| 295.2 | Reply to .1, keep them coming | TOMCAT::STEVENS | | Mon Jan 08 1990 11:22 | 8 |
|
KC
My original .ACX had TABLENAME=HEADER, etc... I got the same
results. I'm changing my RDB database a little, so I'll keep everyone
updated.
Paul
|
| 295.3 | The solution: Dates format change!!! | TOMCAT::STEVENS | | Wed Jan 10 1990 09:38 | 19 |
|
Its me again! I found the solution to my problem. The dates format I
was using was incorrect. I'll try to explain what I was doing and
how I changed it to work for me.
First, what I have is a RMS file with dates represented as I6
(YYMMDD). I was converting to the RDB internal DATE format and
then setting up a FOCUS .MAS as USAGE=I4, ACTUAL=I4. This caused
the errors stated in the original problem description.
The solution I used, was to load dates to the RDB database as an I6
datatype instead of a DATE datatype. I then define dates in the
FOCUS .MAS as USAGE=I6YMD, ACTUAL=I4. With these changes all my
problems have disappeared!
Regards,
Paul
|