AIX

AIX

Connect with fellow AIX users and experts to gain knowledge, share insights, and solve problems.

 View Only

viewing file formats on AS 400 on IBM-730

  • 1.  viewing file formats on AS 400 on IBM-730

    Posted Fri July 03, 2009 09:19 AM

    Originally posted by: SystemAdmin


    Hi I am currently working on decomissioning an old AS400 system and as
    part of this need to extract some data to be loaded into an Oracle
    database.

    We need to be able to see data file definitions in the following
    format :-
    01 CA1D72.
    05 KEY72 PIC X(15).
    05 KTYP72 PIC X(2).
    05 TYPE72 PIC X(3).
    05 GRP72 PIC X(2).
    05 ADAT72 PIC 9(8) COMP-3.
    05 ATYP72 PIC X(2).
    05 NOTE72 PIC X(60).
    05 LINE72 PIC 9(3) COMP-3.
    05 DATE72 PIC 9(8) COMP-3.
    05 TIME72 PIC 9(6) COMP-3.
    05 USER72 PIC X(10).
    We have physical files held in a library i.e. file = drop08 library =
    billsys
    I have so far found the command ZDSPDDS which has given me the
    following :-
    DSPDDS2 EXPANDED DATA DESCRIPTION
    SPECIFICATIONS 6/24/09 PAGE 1
    17:32:01
    FILE NAME -
    DROP08 .BILLSYS TYPE -
    PHYSICAL
    TEXT -
    T D
    Y E
    RCD FMT FIELD LEN P C FROM TO REF
    FIELD TEXT


    • --





    DROP08 GCTELN 12 A 1 12
    CELLULAR TELEPHONE NUMBER
    GCACCT 9 A 13 21
    ACCOUNT NUMBER
    GCACTV 9 P 0 22 26
    ACTIVATION NUMBER
    GCBPRD 6 P 0 27 30
    BILLING PERIOD - YYYYMM
    GCBCYC 2 A 31 32
    BILLING CYCLE
    GCCATG 5 A 33 37
    CATEGORY CODE
    GCSCAT 2 A 38 39 SUB
    CATEGORY CODE
    GCTYP1 1 A 40 40 Type
    1 - Future use
    GCSCOD 10 A 41 50
    SERVICE CODE
    GCDESC 50 A 51 100
    CHARGE DESCRIPTION
    GCFRDT 8 P 0 101 105
    CHARGE FROM DATE
    GCTODT 8 P 0 106 110
    CHARGE TO DATE
    GCBAMT 11 P 2 111 116
    CHARGE BASE AMOUNT
    GCTMIN 5 P 1 117 119 TOTAL
    MINUTES
    GCAMT 11 P 2 120 125
    CHARGE AMOUNT
    GCGLCD 10 A 126 135 G/L
    CODE
    GCTXID 2 A 136 137 TAX
    TABLE ID
    GCTAX1 1 A 138 138 TAX 1
    FLAG
    GCT1AM 11 P 2 139 144 TAX 1
    AMOUNT
    GCTAX2 1 A 145 145 TAX 2
    FLAG
    GCT2AM 11 P 2 146 151 TAX 2
    AMOUNT
    GCTAX3 1 A 152 152 TAX 3
    FLAG
    GCT3AM 11 P 2 153 158 TAX 3
    AMOUNT
    GCTAX4 1 A 159 159 TAX 4
    FLAG
    GCT4AM 11 P 2 160 165 TAX 4
    AMOUNT
    GCTAX5 1 A 166 166 TAX 5
    FLAG
    GCT5AM 11 P 2 167 172 TAX 5
    AMOUNT
    GCTAX6 1 A 173 173 TAX 6
    FLAG
    GCT6AM 11 P 2 174 179 TAX 6
    AMOUNT
    GCFBIL 1 A 180 180 FINAL
    BILLING FLAG
    GCORDN 10 A 181 190 ORDER
    GCREFN 10 A 191 200
    CHARGE REFERENCE #
    GCSTPN 7 P 0 201 204 STP #
    GCL2AC 9 P 0 205 209 L2
    ACTIVATION #
    GCCFRQ 1 A 210 210 CHG
    FREQUENCY
    GCRPGP 3 A 211 213 RPT
    GROUP
    TSEC 15 A 214 228 digits
    (gctsec)
    SL 9 A 229 237 digits
    (gcactv)
    but I need the file definition in the 1st format show in order to use
    with the data extraction tool we have.
    Please help