! ******************************************************************************************************************************** ! Created: 18-JUL-2002 12:15:50 by OpenVMS SDL EV1-60 ! Source: 9-MAR-2002 19:26:39 $1$DUA1130:[LAISHEV.WORK.TESSCO]DBL_ORAGTWYDEF. ! ******************************************************************************************************************************** !*** MODULE DBL_ORAGTWYDEF IDENT DBL_ORAGTWYDEF-1-A *** !DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN ! ! *++ ! * FACILITY: DIBOL 2 ORACLE Server 7/8/9 gateway ! * ! * MODULE DESCRIPTION: ! * ! * This is an interface module contains all routins declaration, data type definitions, ! * and so on... ! * ! * AUTHORS: ! * ! * Ruslan R. Laishev ! * ! * CREATION DATE: 9-MAR-2002 ! * ! * ! * MODIFICATION HISTORY: ! * ! * {@tbs@}... ! *-- ! STRUCTURE /ora_rec/ BYTE ORAINSUP BYTE ORATYPE(1:30) BYTE ORAITEM(1:40) BYTE ORASEG2(1:40) BYTE ORASEG3(1:40) BYTE ORASHORT(1:25) BYTE ORALONG(1:160) BYTE ORAUOMWORD(1:4) INTEGER*2 ORAUOMQUANTITY BYTE ORACATEGORY(1:3) BYTE ORACLASS(1:3) BYTE ORAOLDITEM(1:40) BYTE ORACONSIGNED BYTE ORABOM BYTE ORABUILDTOORDER BYTE ORACPS BYTE ORAFORVEL BYTE ORASTATUS BYTE ORAMFG(1:5) BYTE ORAMPN(1:17) BYTE ORAMODEL(1:12) BYTE ORASERIAL INTEGER*2 ORASERLEN BYTE ORADDROP BYTE ORANEWSER BYTE ORAPRELOAD BYTE ORA2SERIAL INTEGER*2 ORA2LENGTH INTEGER*4 ORAWEIGHT BYTE ORASHIPMETH BYTE ORASELLTERR(1:2) BYTE ORASOURCE(1:4) REAL*8 ORACURA REAL*8 ORANEWA REAL*8 ORAVENCOST REAL*8 ORAFUTVEN BYTE ORABUY BYTE ORAVENDOR(1:5) BYTE ORAVPN(1:17) REAL*8 ORACASE BYTE ORASTORAGE BYTE ORAFREIGHT(1:3) INTEGER*2 ORABUNDLE BYTE ORAORIGIN(1:2) INTEGER*2 ORAHARM1 INTEGER*2 ORAHARM2 INTEGER*2 ORAHARM3 BYTE ORAPREF BYTE ORALABELED INTEGER*2 ORAHEIGHT INTEGER*2 ORAWIDTH INTEGER*2 ORALENGTH BYTE ORABARCODE(1:12) BYTE ORARENO INTEGER*2 ORAFIFODAYS BYTE ORAFIFO BYTE ORACONFIGURED BYTE ORAOWNBOX BYTE ORASTOCK03 BYTE ORASTOCK04 BYTE ORASTOCK05 BYTE ORASTOCK06 BYTE ORASTOCK07 REAL*8 ORACONSIGNFEE BYTE ORASORT1(1:10) BYTE ORASORT2(1:10) BYTE ORABGINCLUDE INTEGER*4 ORACURBG INTEGER*4 ORANEXTBG INTEGER*4 ORAPREVBG BYTE ORAGROUP(1:3) BYTE ORASUB(1:3) INTEGER*2 ORAMAXPERCUS BYTE ORACURRENCY(1:15) INTEGER*4 ORASEQ BYTE ORAUDIT(1:8) BYTE ORAVAILABLE(1:8) BYTE ORAFUTDATE(1:8) BYTE ORAINPUTDATE(1:8) BYTE ORAFORAUTOBUY INTEGER*4 ORAFORBLOWOUT03 INTEGER*4 ORAFORBLOWOUT04 INTEGER*4 ORAFORBLOWOUT05 INTEGER*4 ORAFORBLOWOUT06 INTEGER*4 ORAFORBLOWOUT07 END STRUCTURE ! ora_rec !DEC$ END OPTIONS