zOs/TX/WK923CDL

SQLID     SET CURRENT SQLID = 'S100447' ;
DROP      ALTER TABLE OA1P.TDG127A1
DROP        ADD
DROP          DG127180             CHAR(4) FOR SBCS DATA NOT NULL
DROP            WITH DEFAULT ;
DROP      ALTER TABLE OA1P.TDG127A1
DROP        ADD
DROP          DG127181             CHAR(4) FOR SBCS DATA NOT NULL
DROP            WITH DEFAULT ;
CREATE    LABEL ON OA1P.TDG127A1
CREATE     (DG127181 IS 'LOCAL BU CURRENCY',
CREATE      DG127180 IS 'FUNCTIONAL CURRENCY');
DROP      ALTER TABLE OA1P.TDG128A1
DROP        ADD
DROP          DG128090             CHAR(4) FOR SBCS DATA NOT NULL
DROP            WITH DEFAULT ;
DROP      ALTER TABLE OA1P.TDG128A1
DROP        ADD
DROP          DG128091             CHAR(4) FOR SBCS DATA NOT NULL
DROP            WITH DEFAULT ;
CREATE    LABEL ON OA1P.TDG128A1
CREATE     (DG128091 IS 'LOCAL BU CURRENCY',
CREATE      DG128090 IS 'FUNCTIONAL CURRENCY');
DROP      ALTER TABLE OA1P.TDG129A1
DROP        ADD
DROP          DG129067             CHAR(4) FOR SBCS DATA NOT NULL
DROP            WITH DEFAULT ;
DROP      ALTER TABLE OA1P.TDG129A1
DROP        ADD
DROP          DG129068             CHAR(4) FOR SBCS DATA NOT NULL
DROP            WITH DEFAULT ;
CREATE    LABEL ON OA1P.TDG129A1
CREATE     (DG129068 IS 'LOCAL BU CURRENCY',
CREATE      DG129067 IS 'FUNCTIONAL CURRENCY');
DROP      ALTER TABLE OA1P.TDG129K1
DROP        ADD
DROP          DG129K067            CHAR(4) FOR SBCS DATA NOT NULL
DROP            WITH DEFAULT ;
DROP      ALTER TABLE OA1P.TDG129K1
DROP        ADD
DROP          DG129K068            CHAR(4) FOR SBCS DATA NOT NULL
DROP            WITH DEFAULT ;
CREATE    LABEL ON OA1P.TDG129K1
CREATE     (DG129K068 IS 'LOCAL BU CURRENCY',
CREATE      DG129K067 IS 'FUNCTIONAL CURRENCY');
DROP      ALTER TABLE OA1P.TDG130A1
DROP        ADD
DROP          DG130071             CHAR(4) FOR SBCS DATA NOT NULL
DROP            WITH DEFAULT ;
CREATE    LABEL ON COLUMN OA1P.TDG130A1.DG130071 IS 'LOCAL BU CURRENCY';
DROP      ALTER TABLE OA1P.TDG130K1
DROP        ADD
DROP          DG130K071            CHAR(4) FOR SBCS DATA NOT NULL
DROP            WITH DEFAULT ;
CREATE    LABEL ON COLUMN OA1P.TDG130K1.DG130K071 IS 'LOCAL BU CURRENCY';
CREATE    ALTER INDEX OA1P.IDG127A3
CREATE      CLOSE YES ;
CREATE    ALTER INDEX OA1P.IDG128A4
CREATE      CLOSE YES ;
CREATE    SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
DROP      ADMIN DROP VIEW OA1P.VDG127A1A ;
CREATE    CREATE VIEW OA1P.VDG127A1A(DG127001, DG127002, DG127003, DG127004,
CREATE        DG127005, DG127006, DG127007, DG127008, DG127009, DG127010,
CREATE        DG127011, DG127012, DG127013, DG127014, DG127015, DG127016,
CREATE        DG127017, DG127018, DG127019, DG127020, DG127021, DG127022,
CREATE        DG127023, DG127024, DG127025, DG127026, DG127027, DG127028,
CREATE        DG127029, DG127030, DG127031, DG127032, DG127033, DG127034,
CREATE        DG127035, DG127036, DG127037, DG127038, DG127039, DG127040,
CREATE        DG127041, DG127042, DG127043, DG127044, DG127045, DG127046,
CREATE        DG127047, DG127048, DG127049, DG127050, DG127051, DG127052,
CREATE        DG127053, DG127054, DG127055, DG127056, DG127057, DG127058,
CREATE        DG127059, DG127060, DG127061, DG127062, DG127063, DG127064,
CREATE        DG127065, DG127066, DG127067, DG127068, DG127069, DG127070,
CREATE        DG127071, DG127072, DG127073, DG127074, DG127075, DG127076,
CREATE        DG127077, DG127078, DG127079, DG127080, DG127081, DG127082,
CREATE        DG127083, DG127084, DG127085, DG127086, DG127087, DG127088,
CREATE        DG127089, DG127090, DG127091, DG127092, DG127093, DG127094,
CREATE        DG127095, DG127096, DG127097, DG127098, DG127099, DG127100,
CREATE        DG127101, DG127102, DG127103, DG127104, DG127105, DG127106,
CREATE        DG127107, DG127108, DG127109, DG127110, DG127111, DG127112,
CREATE        DG127113, DG127114, DG127115, DG127116, DG127117, DG127118,
CREATE        DG127119, DG127120, DG127121, DG127122, DG127123, DG127124,
CREATE        DG127125, DG127126, DG127127, DG127128, DG127129, DG127130,
CREATE        DG127131, DG127132, DG127133, DG127134, DG127135, DG127136,
CREATE        DG127137, DG127138, DG127139, DG127140, DG127141, DG127142,
CREATE        DG127143, DG127144, DG127145, DG127146, DG127147, DG127148,
CREATE        DG127149, DG127150, DG127151, DG127152, DG127153, DG127154,
CREATE        DG127155, DG127156, DG127157, DG127158, DG127159, DG127160,
CREATE        DG127161, DG127162, DG127163, DG127164, DG127165, DG127166,
CREATE        DG127167, DG127168, DG127169, DG127170, DG127171, DG127172,
CREATE        DG127173, DG127174, DG127175, DG127176, DG127177, DG127178,
CREATE        DG127179, DG127180, DG127181) AS
CREATE      SELECT DG127001, DG127002, DG127003, DG127004, DG127005, DG127006,
CREATE             DG127007, DG127008, DG127009, DG127010, DG127011, DG127012,
CREATE             DG127013, DG127014, DG127015, DG127016, DG127017, DG127018,
CREATE             DG127019, DG127020, DG127021, DG127022, DG127023, DG127024,
CREATE             DG127025, DG127026, DG127027, DG127028, DG127029, DG127030,
CREATE             DG127031, DG127032, DG127033, DG127034, DG127035, DG127036,
CREATE             DG127037, DG127038, DG127039, DG127040, DG127041, DG127042,
CREATE             DG127043, DG127044, DG127045, DG127046, DG127047, DG127048,
CREATE             DG127049, DG127050, DG127051, DG127052, DG127053, DG127054,
CREATE             DG127055, DG127056, DG127057, DG127058, DG127059, DG127060,
CREATE             DG127061, DG127062, DG127063, DG127064, DG127065, DG127066,
CREATE             DG127067, DG127068, DG127069, DG127070, DG127071, DG127072,
CREATE             DG127073, DG127074, DG127075, DG127076, DG127077, DG127078,
CREATE             DG127079, DG127080, DG127081, DG127082, DG127083, DG127084,
CREATE             DG127085, DG127086, DG127087, DG127088, DG127089, DG127090,
CREATE             DG127091, DG127092, DG127093, DG127094, DG127095, DG127096,
CREATE             DG127097, DG127098, DG127099, DG127100, DG127101, DG127102,
CREATE             DG127103, DG127104, DG127105, DG127106, DG127107, DG127108,
CREATE             DG127109, DG127110, DG127111, DG127112, DG127113, DG127114,
CREATE             DG127115, DG127116, DG127117, DG127118, DG127119, DG127120,
CREATE             DG127121, DG127122, DG127123, DG127124, DG127125, DG127126,
CREATE             DG127127, DG127128, DG127129, DG127130, DG127131, DG127132,
CREATE             DG127133, DG127134, DG127135, DG127136, DG127137, DG127138,
CREATE             DG127139, DG127140, DG127141, DG127142, DG127143, DG127144,
CREATE             DG127145, DG127146, DG127147, DG127148, DG127149, DG127150,
CREATE             DG127151, DG127152, DG127153, DG127154, DG127155, DG127156,
CREATE             DG127157, DG127158, DG127159, DG127160, DG127161, DG127162,
CREATE             DG127163, DG127164, DG127165, DG127166, DG127167, DG127168,
CREATE             DG127169, DG127170, DG127171, DG127172, DG127173, DG127174,
CREATE             DG127175, DG127176, DG127177, DG127178, DG127179, DG127180,
CREATE             DG127181
CREATE        FROM OA1P.TDG127A1 ;
CREATE    LABEL ON OA1P.VDG127A1A
CREATE     (DG127181 IS 'LOCAL BU CURRENCY',
CREATE      DG127180 IS 'FUNCTIONAL CURRENCY',
CREATE      DG127179 IS 'REBAT 80 - DG0336',
CREATE      DG127178 IS 'REBAT 70 - DG0335',
CREATE      DG127177 IS 'REBAT 60 - DG0334',
CREATE      DG127176 IS 'REBAT 50 - DG0333',
CREATE      DG127175 IS 'REBAT 40 - DG0332',
CREATE      DG127174 IS 'REBAT 30 - DG0331',
CREATE      DG127173 IS 'REBAT 20 - DG0330',
CREATE      DG127172 IS 'RESERVE',
CREATE      DG127171 IS 'RESERVE',
CREATE      DG127170 IS 'RESERVE',
CREATE      DG127169 IS 'RESERVE',
CREATE      DG127168 IS 'RESERVE',
CREATE      DG127167 IS 'VIEW FOR DG0349',
CREATE      DG127166 IS 'VIEW FOR DG0325A',
CREATE      DG127165 IS 'VIEW FOR DG0324A',
CREATE      DG127164 IS 'RESERVE',
CREATE      DG127163 IS 'RESERVE',
CREATE      DG127162 IS 'RESERVE',
CREATE      DG127161 IS 'RESERVE',
CREATE      DG127160 IS 'VIEW FOR DG0353',
CREATE      DG127159 IS 'RESERVE',
CREATE      DG127158 IS 'RESERVE',
CREATE      DG127157 IS 'RESERVE',
CREATE      DG127156 IS 'RESERVE',
CREATE      DG127155 IS 'RESERVE',
CREATE      DG127154 IS 'RESERVE',
CREATE      DG127153 IS 'RESERVE',
CREATE      DG127152 IS 'RESERVE',
CREATE      DG127151 IS 'DG0343 - I S F K A C N',
CREATE      DG127150 IS 'DG0338 - DST RUBRIC',
CREATE      DG127149 IS 'RESERVE',
CREATE      DG127148 IS 'RESERVE',
CREATE      DG127147 IS 'RESERVE',
CREATE      DG127146 IS 'VIEW FOR DG0311',
CREATE      DG127145 IS 'VIEW FOR DG0310',
CREATE      DG127144 IS 'AVG OF EXCLUDING',
CREATE      DG127143 IS 'TARIFF FOR CATEGROIES',
CREATE      DG127142 IS 'CATEGORIE AMOUNT',
CREATE      DG127141 IS 'CALCULATED FEES CATEGORY',
CREATE      DG127140 IS 'ACCNT BAL EXCL FRM AUM',
CREATE      DG127139 IS 'KEY CLOSURE RUNNING NO',
CREATE      DG127138 IS 'IDENTIFY GC OR ADM',
CREATE      DG127137 IS 'DATE OF STOCKS PER GC',
CREATE      DG127136 IS 'ACCOUNT TYPE (SHORT TXT)',
CREATE      DG127135 IS 'MUTATION DATE (DG31023A)',
CREATE      DG127134 IS 'CALCULATION STATUS',
CREATE      DG127133 IS 'HOFMANN BANK AUM2',
CREATE      DG127132 IS 'HOFMANN BANK AUM1',
CREATE      DG127131 IS 'AIS-ANLAGEWERT',
CREATE      DG127130 IS 'CLEANED DEPOSIT VALUE',
CREATE      DG127129 IS 'DG DEPOSIT VALUE',
CREATE      DG127128 IS 'INFORMATION TXT-LINE2',
CREATE      DG127127 IS 'INFORMATION TXT-LINE1',
CREATE      DG127126 IS 'TIMESTAMP (DEBIT)',
CREATE      DG127125 IS 'TIMESTAMP (REBATT)',
CREATE      DG127124 IS 'TIMESTAMP (SURCHARGE)',
CREATE      DG127123 IS 'TIMESTAMP (CANCEL)',
CREATE      DG127122 IS 'TIMESTAMP (INSERT)',
CREATE      DG127121 IS 'PID NO. (DEBIT)',
CREATE      DG127120 IS 'PID NO. (REBATT)',
CREATE      DG127119 IS 'PID NO. (SURCHARGE)',
CREATE      DG127118 IS 'PID NO. (CANCEL)',
CREATE      DG127117 IS 'PID NO. (INSERT)',
CREATE      DG127116 IS 'EAM MODEL',
CREATE      DG127115 IS 'DGCODE (MIH/K/V,MAX,PAU)',
CREATE      DG127114 IS 'CONTRIBUTOR DOMICILE',
CREATE      DG127113 IS 'CUSTOMER TYPE',
CREATE      DG127112 IS 'CUSTOMER SEGMENT',
CREATE      DG127111 IS 'DAS',
CREATE      DG127110 IS 'DG CODE 16',
CREATE      DG127109 IS 'DEBITING FREQ OF GC',
CREATE      DG127108 IS 'CALCULATION FREQ OF GC',
CREATE      DG127107 IS 'CURRENCY TEXT FLAT RATE',
CREATE      DG127106 IS 'CURRENCY CODE FLAT RATE',
CREATE      DG127105 IS 'ALLIN CUST(DS4030(6))',
CREATE      DG127104 IS 'DEBIT PERIOD UP TO',
CREATE      DG127103 IS 'DEBIT PERIOD FROM',
CREATE      DG127102 IS 'CLOSURE/TRANFER CODE',
CREATE      DG127101 IS 'CANCELLATION CODE',
CREATE      DG127100 IS 'VALUE DATE YYYY-MM-DD',
CREATE      DG127099 IS 'CALCULATION STATUS',
CREATE      DG127098 IS 'ORDER NO. OF DEBIT',
CREATE      DG127097 IS 'DEPOT OFFICE RUBRIC MIN',
CREATE      DG127096 IS 'PF FEES IND PRICE',
CREATE      DG127095 IS 'PF FEES EAM',
CREATE      DG127094 IS 'PF FEES VWG',
CREATE      DG127093 IS 'PF FEES DEFAULT',
CREATE      DG127092 IS 'PF FEES IND PRICE-FLAT',
CREATE      DG127091 IS 'PF FEES EAM',
CREATE      DG127090 IS 'PF FEES VWG',
CREATE      DG127089 IS 'PF FEES DEFAULT',
CREATE      DG127088 IS 'PF FEES IND PRICE-MIN',
CREATE      DG127087 IS 'PF FEES EAM',
CREATE      DG127086 IS 'PF FEES VWG',
CREATE      DG127085 IS 'PF FEES DEFAULT',
CREATE      DG127084 IS 'PF FEES IND PRICE-SPL',
CREATE      DG127083 IS 'PF FEES EAM',
CREATE      DG127082 IS 'PF FEES VWG',
CREATE      DG127081 IS 'PF FEES DEFAULT',
CREATE      DG127080 IS 'VHG FEES IND PRICE',
CREATE      DG127079 IS 'VHG FEES EAM',
CREATE      DG127078 IS 'VHG FEES VWG',
CREATE      DG127077 IS 'VHG FEES DEFAULT',
CREATE      DG127076 IS 'ADG FEES IND PRICE',
CREATE      DG127075 IS 'ADG FEES EAM',
CREATE      DG127074 IS 'ADG FEES VWG',
CREATE      DG127073 IS 'ADG FEES DEFAULT',
CREATE      DG127072 IS 'EDG FEES IND PRICE',
CREATE      DG127071 IS 'EDG FEES EAM',
CREATE      DG127070 IS 'EDG FEES VWG',
CREATE      DG127069 IS 'EDG FEES DEFAULT',
CREATE      DG127068 IS 'TECH DISCOUNT IND PRICE',
CREATE      DG127067 IS 'TECH DISCOUNT EAM',
CREATE      DG127066 IS 'TECH DISCOUNT VWG',
CREATE      DG127065 IS 'TECH DISCOUNT DEFAULT',
CREATE      DG127064 IS 'TECH SURCHARGE IND PRICE',
CREATE      DG127063 IS 'TECH SURCHARGE EAM',
CREATE      DG127062 IS 'TECH SURCHARGE VWG',
CREATE      DG127061 IS 'TECH SURCHARGE DEFAULT',
CREATE      DG127060 IS 'DISCOUNT %AGE IND PRICE',
CREATE      DG127059 IS 'DISCOUNT %AGE EAM',
CREATE      DG127058 IS 'DISCOUNT %AGE VWG',
CREATE      DG127057 IS 'DISCOUNT %AGE DEFAULT',
CREATE      DG127056 IS 'VHG DISCOUNT IND PRICE',
CREATE      DG127055 IS 'VHG DISCOUNT EAM',
CREATE      DG127054 IS 'VHG DISCOUNT MANDATE',
CREATE      DG127053 IS 'VHG DISCOUNT DEFAULT',
CREATE      DG127052 IS 'ADG DISCOUNT IND PRICE',
CREATE      DG127051 IS 'ADG DISCOUNT EAM',
CREATE      DG127050 IS 'ADG DISCOUNT MANDATE',
CREATE      DG127049 IS 'ADG DISCOUNT DEFAULT',
CREATE      DG127048 IS 'EDG DISCOUNT IND PRICE',
CREATE      DG127047 IS 'EDG DISCOUNT EAM',
CREATE      DG127046 IS 'EDG DISCOUNT MANDATE',
CREATE      DG127045 IS 'EDG DISCOUNT DEFAULT',
CREATE      DG127044 IS 'VHG SURCHARGE IND PRICE',
CREATE      DG127043 IS 'VHG SURCHARGE EAM',
CREATE      DG127042 IS 'VHG SURCHARGE MANDATE',
CREATE      DG127041 IS 'VHG SURCHARGE DEFAULT',
CREATE      DG127040 IS 'ADG SURCHARGE IND PRICE',
CREATE      DG127039 IS 'ADG SURCHARGE EAM',
CREATE      DG127038 IS 'ADG SURCHARGE MANDATE',
CREATE      DG127037 IS 'ADG SURCHARGE DEFAULT',
CREATE      DG127036 IS 'EDG SURCHARGE IND PRICE',
CREATE      DG127035 IS 'EDG SURCHARGE EAM',
CREATE      DG127034 IS 'EDG SURCHARGE MANDATE',
CREATE      DG127033 IS 'EDG SURCHARGE DEFAULT',
CREATE      DG127032 IS 'ACCRUED INTEREST',
CREATE      DG127031 IS 'ORIGINAL AUM',
CREATE      DG127030 IS 'CALCULATION BASE VHG',
CREATE      DG127029 IS 'CALCULATION BASE ADG',
CREATE      DG127028 IS 'CALCULATION BASE EDG',
CREATE      DG127027 IS 'TOTAL FLAT RATE',
CREATE      DG127026 IS 'VHTARIFF VWG IND PRICE',
CREATE      DG127025 IS 'VHTARIFF EAM',
CREATE      DG127024 IS 'VHTARIFF VWG STD PRICE',
CREATE      DG127023 IS 'VHTARIFF DEFAULT',
CREATE      DG127022 IS 'ADG TARIFF IND PRICE',
CREATE      DG127021 IS 'ADG TARIFF EAM',
CREATE      DG127020 IS 'ADG TARIFF VWG',
CREATE      DG127019 IS 'ADG TARIFF DEFAULT',
CREATE      DG127018 IS 'EDG TARIFF IND PRICE',
CREATE      DG127017 IS 'EDG TARIFF EAM',
CREATE      DG127016 IS 'EDG TARIFF VWG',
CREATE      DG127015 IS 'EDG TARIFF DEFAULT',
CREATE      DG127014 IS 'CASH ACCOUNT CURRENCY',
CREATE      DG127013 IS 'CASH ACCOUNT TYPE',
CREATE      DG127012 IS 'CASH ACCOUNT NBR',
CREATE      DG127011 IS 'CIF-NUMBER',
CREATE      DG127010 IS 'CUSTOMER OFFICE',
CREATE      DG127009 IS 'YDGMOD MODEL',
CREATE      DG127008 IS 'BUID',
CREATE      DG127007 IS 'TECH MUTATION DATE',
CREATE      DG127006 IS 'KEY CLOSURE RUNNING NBR',
CREATE      DG127005 IS 'KEY DUE DATE',
CREATE      DG127004 IS 'KEY POSITION AS DATE',
CREATE      DG127003 IS 'KEY SAFEKEEPING A/C NBR',
CREATE      DG127002 IS 'KEY CALCULATION YEAR',
CREATE      DG127001 IS 'KEY LAST DIGIT OF YEAR');
CREATE    GRANT SELECT ON TABLE OA1P.VDG127A1A TO OA1P;
CREATE    SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
DROP      ADMIN DROP VIEW OA1P.VDG128A1A ;
CREATE    CREATE VIEW OA1P.VDG128A1A(DG128001, DG128002, DG128003, DG128004,
CREATE        DG128005, DG128006, DG128007, DG128008, DG128009, DG128010,
CREATE        DG128011, DG128012, DG128013, DG128014, DG128015, DG128016,
CREATE        DG128017, DG128018, DG128019, DG128020, DG128021, DG128022,
CREATE        DG128023, DG128024, DG128025, DG128026, DG128027, DG128028,
CREATE        DG128029, DG128030, DG128031, DG128032, DG128033, DG128034,
CREATE        DG128035, DG128036, DG128037, DG128038, DG128039, DG128040,
CREATE        DG128041, DG128042, DG128043, DG128044, DG128045, DG128046,
CREATE        DG128047, DG128048, DG128049, DG128050, DG128051, DG128052,
CREATE        DG128053, DG128054, DG128055, DG128056, DG128057, DG128058,
CREATE        DG128059, DG128060, DG128061, DG128062, DG128063, DG128064,
CREATE        DG128065, DG128066, DG128067, DG128068, DG128069, DG128070,
CREATE        DG128071, DG128072, DG128073, DG128074, DG128075, DG128076,
CREATE        DG128077, DG128078, DG128079, DG128080, DG128081, DG128082,
CREATE        DG128083, DG128084, DG128085, DG128086, DG128087, DG128088,
CREATE        DG128089, DG128090, DG128091) AS
CREATE      SELECT DG128001, DG128002, DG128003, DG128004, DG128005, DG128006,
CREATE             DG128007, DG128008, DG128009, DG128010, DG128011, DG128012,
CREATE             DG128013, DG128014, DG128015, DG128016, DG128017, DG128018,
CREATE             DG128019, DG128020, DG128021, DG128022, DG128023, DG128024,
CREATE             DG128025, DG128026, DG128027, DG128028, DG128029, DG128030,
CREATE             DG128031, DG128032, DG128033, DG128034, DG128035, DG128036,
CREATE             DG128037, DG128038, DG128039, DG128040, DG128041, DG128042,
CREATE             DG128043, DG128044, DG128045, DG128046, DG128047, DG128048,
CREATE             DG128049, DG128050, DG128051, DG128052, DG128053, DG128054,
CREATE             DG128055, DG128056, DG128057, DG128058, DG128059, DG128060,
CREATE             DG128061, DG128062, DG128063, DG128064, DG128065, DG128066,
CREATE             DG128067, DG128068, DG128069, DG128070, DG128071, DG128072,
CREATE             DG128073, DG128074, DG128075, DG128076, DG128077, DG128078,
CREATE             DG128079, DG128080, DG128081, DG128082, DG128083, DG128084,
CREATE             DG128085, DG128086, DG128087, DG128088, DG128089, DG128090,
CREATE             DG128091
CREATE        FROM OA1P.TDG128A1 ;
CREATE    LABEL   ON TABLE OA1P.VDG128A1A IS 'DG-MANDATE TABLE' ;
CREATE    LABEL ON OA1P.VDG128A1A
CREATE     (DG128091 IS 'LOCAL BU CURRENCY',
CREATE      DG128090 IS 'FUNCTIONAL CURRENCY',
CREATE      DG128089 IS 'RESERVE',
CREATE      DG128088 IS 'RESERVE',
CREATE      DG128087 IS 'RESERVE',
CREATE      DG128086 IS 'RESERVE',
CREATE      DG128085 IS 'SFA VALUE',
CREATE      DG128084 IS 'ASSET UNDER MANAGEMENT',
CREATE      DG128083 IS 'RESERVE',
CREATE      DG128082 IS 'RESERVE',
CREATE      DG128081 IS 'RESERVE',
CREATE      DG128080 IS 'RESERVE',
CREATE      DG128079 IS 'RESERVE',
CREATE      DG128078 IS 'RESERVE',
CREATE      DG128077 IS 'RESERVE',
CREATE      DG128076 IS 'RESERVE',
CREATE      DG128075 IS 'RESERVE',
CREATE      DG128074 IS 'RESERVE',
CREATE      DG128073 IS 'RESERVE',
CREATE      DG128072 IS 'RESERVE',
CREATE      DG128071 IS 'RESERVE',
CREATE      DG128070 IS 'RESERVE',
CREATE      DG128069 IS 'RES VIEW FOR DG21036',
CREATE      DG128068 IS 'RES VIEW FOR DG21050',
CREATE      DG128067 IS 'RES VIEW FOR DG21049',
CREATE      DG128066 IS 'RES VIEW FOR DG21034',
CREATE      DG128065 IS 'RES VIEW FOR DG21033',
CREATE      DG128064 IS 'RES VIEW FOR DG21032',
CREATE      DG128063 IS 'RES VIEW FOR DG21022',
CREATE      DG128062 IS 'RES VIEW FOR DG21021',
CREATE      DG128061 IS 'RES VIEW FOR DG21015',
CREATE      DG128060 IS 'VWG TARIFF 0/00 NETTO',
CREATE      DG128059 IS 'VWG TARIFF 0/00 BRUTTO',
CREATE      DG128058 IS 'INFORMATION TXT (LNIE2)',
CREATE      DG128057 IS 'INFORMATION TXT (LINE1)',
CREATE      DG128056 IS 'CALCULATION STATUS',
CREATE      DG128055 IS 'RUNNING NO',
CREATE      DG128054 IS 'TIMESTAMP DEBIT',
CREATE      DG128053 IS 'TIMESTAMP DISCOUNT',
CREATE      DG128052 IS 'TIMESTAMP SURCHARGE',
CREATE      DG128051 IS 'TIMESTAMP CANCEL',
CREATE      DG128050 IS 'TIMESTAMP INSERT',
CREATE      DG128049 IS 'PID DEBIT',
CREATE      DG128048 IS 'PID DISCOUNT',
CREATE      DG128047 IS 'PID SURCHARGE',
CREATE      DG128046 IS 'PID CACNEL',
CREATE      DG128045 IS 'PID INSERT',
CREATE      DG128044 IS 'VWG CODE 17',
CREATE      DG128043 IS 'INVESTMENT PROFIE',
CREATE      DG128042 IS 'DAS',
CREATE      DG128041 IS 'CUSTOMER SEGMENT',
CREATE      DG128040 IS 'CUSTOMER DOMICILE',
CREATE      DG128039 IS 'CUSTOMER TYPE',
CREATE      DG128038 IS 'CONTRACT TYPE',
CREATE      DG128037 IS 'ALLIN CUST(DS4030(6))',
CREATE      DG128036 IS 'VWG CODE (MIN/FLAT)',
CREATE      DG128035 IS 'CLOSURE REASON',
CREATE      DG128034 IS 'CANCELLATION CODE',
CREATE      DG128033 IS 'VALUE DATE VWG',
CREATE      DG128032 IS 'CALCULATION STATUS',
CREATE      DG128031 IS 'ORDER NO. OF DEBIT',
CREATE      DG128030 IS 'DEBIT PERIOD TO',
CREATE      DG128029 IS 'DEBIT PERIOD FROM',
CREATE      DG128028 IS 'VWG FEES - IND PRICE',
CREATE      DG128027 IS 'VWG FEES - STD PRICE',
CREATE      DG128026 IS 'FLAT RATE CURRENCY',
CREATE      DG128025 IS 'FLAT RATE',
CREATE      DG128024 IS 'TECHNICAL DISCOUNT',
CREATE      DG128023 IS 'DISCOUNT AMOUNT IND PRICE',
CREATE      DG128022 IS 'DISCOUNT AMOUNT STANDARD',
CREATE      DG128021 IS 'DISCOUNT % IND PRICE',
CREATE      DG128020 IS 'DISCOUNT % STANDARD',
CREATE      DG128019 IS 'TECHNICAL SURCHARGE',
CREATE      DG128018 IS 'SURCHARGE IND PRICE',
CREATE      DG128017 IS 'SURCHARGE STANDARD',
CREATE      DG128016 IS 'VWG TARIFF % IND PRICE',
CREATE      DG128015 IS 'VWG TARIFF % STANDARD',
CREATE      DG128014 IS 'ACCRUED INTEREST',
CREATE      DG128013 IS 'AMOUNT FOR CALCULATION',
CREATE      DG128012 IS 'CASH ACCOUNT CURRENCY',
CREATE      DG128011 IS 'CASH ACCOUNT TYPE',
CREATE      DG128010 IS 'CASH ACCOUNT NBR',
CREATE      DG128009 IS 'BUID',
CREATE      DG128008 IS 'TECHN. MUTATION DATE',
CREATE      DG128007 IS 'VWG SEARCH KEY',
CREATE      DG128006 IS 'KEY RUNNING NO',
CREATE      DG128005 IS 'KEY DUE DATE',
CREATE      DG128004 IS 'KEY POSITION AS DATE',
CREATE      DG128003 IS 'KEY SFA NUMBER',
CREATE      DG128002 IS 'KEY CALCULATION YEAR',
CREATE      DG128001 IS 'KEY LAST DIGIT OF YEAR');
CREATE    GRANT SELECT ON TABLE OA1P.VDG128A1A TO OA1P;
CREATE    SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
DROP      ADMIN DROP VIEW OA1P.VDG129A1A ;
CREATE    CREATE VIEW OA1P.VDG129A1A(DG129001, DG129002, DG129003, DG129004,
CREATE        DG129005, DG129006, DG129007, DG129008, DG129009, DG129010,
CREATE        DG129011, DG129012, DG129013, DG129014, DG129015, DG129016,
CREATE        DG129017, DG129018, DG129019, DG129020, DG129021, DG129022,
CREATE        DG129023, DG129024, DG129025, DG129026, DG129027, DG129028,
CREATE        DG129029, DG129030, DG129031, DG129032, DG129033, DG129034,
CREATE        DG129035, DG129036, DG129037, DG129038, DG129039, DG129040,
CREATE        DG129041, DG129042, DG129043, DG129044, DG129045, DG129046,
CREATE        DG129047, DG129048, DG129049, DG129050, DG129051, DG129052,
CREATE        DG129053, DG129054, DG129055, DG129056, DG129057, DG129058,
CREATE        DG129059, DG129060, DG129061, DG129062, DG129063, DG129064,
CREATE        DG129065, DG129066, DG129067, DG129068) AS
CREATE      SELECT DG129001, DG129002, DG129003, DG129004, DG129005, DG129006,
CREATE             DG129007, DG129008, DG129009, DG129010, DG129011, DG129012,
CREATE             DG129013, DG129014, DG129015, DG129016, DG129017, DG129018,
CREATE             DG129019, DG129020, DG129021, DG129022, DG129023, DG129024,
CREATE             DG129025, DG129026, DG129027, DG129028, DG129029, DG129030,
CREATE             DG129031, DG129032, DG129033, DG129034, DG129035, DG129036,
CREATE             DG129037, DG129038, DG129039, DG129040, DG129041, DG129042,
CREATE             DG129043, DG129044, DG129045, DG129046, DG129047, DG129048,
CREATE             DG129049, DG129050, DG129051, DG129052, DG129053, DG129054,
CREATE             DG129055, DG129056, DG129057, DG129058, DG129059, DG129060,
CREATE             DG129061, DG129062, DG129063, DG129064, DG129065, DG129066,
CREATE             DG129067, DG129068
CREATE        FROM OA1P.TDG129A1 ;
CREATE    LABEL ON OA1P.VDG129A1A
CREATE     (DG129068 IS 'LOCAL BU CURRENCY',
CREATE      DG129067 IS 'FUNCTIONAL CURRENCY',
CREATE      DG129066 IS 'RESERVE',
CREATE      DG129065 IS 'RESERVE',
CREATE      DG129064 IS 'RESERVE',
CREATE      DG129063 IS 'RESERVE',
CREATE      DG129062 IS 'RESERVE',
CREATE      DG129061 IS 'RESERVE',
CREATE      DG129060 IS 'RESERVE',
CREATE      DG129059 IS 'RESERVE',
CREATE      DG129058 IS 'RESERVE',
CREATE      DG129057 IS 'MODEL',
CREATE      DG129056 IS 'RESERVE',
CREATE      DG129055 IS 'RESERVE',
CREATE      DG129054 IS 'RESERVE',
CREATE      DG129053 IS 'RESERVE',
CREATE      DG129052 IS 'RESERVE',
CREATE      DG129051 IS 'TS  - RECALCULATED',
CREATE      DG129050 IS 'TS  - DEBIT',
CREATE      DG129049 IS 'TS  - SURCHRGE',
CREATE      DG129048 IS 'TS  - DISCOUNT',
CREATE      DG129047 IS 'TS  - CANCEL',
CREATE      DG129046 IS 'TS  - INSERT',
CREATE      DG129045 IS 'PID - RECALCULATED',
CREATE      DG129044 IS 'PID - DEBIT',
CREATE      DG129043 IS 'PID - SURCHRGE',
CREATE      DG129042 IS 'PID - DISCOUNT',
CREATE      DG129041 IS 'PID - CANCEL',
CREATE      DG129040 IS 'PID - INSERT',
CREATE      DG129039 IS 'DEBIT INTERNAL TEXT',
CREATE      DG129038 IS 'DEBIT INTERNAL TEXT',
CREATE      DG129037 IS 'DEBIT FREQUENCY',
CREATE      DG129036 IS 'CALCULATION FREQUENCY',
CREATE      DG129035 IS 'DEBIT PERIOD TO',
CREATE      DG129034 IS 'DEBIT PERIOD FROM',
CREATE      DG129033 IS 'DEBIT DATE',
CREATE      DG129032 IS 'CALCULATION PERIOD TO',
CREATE      DG129031 IS 'CALCULATION PERIOD FROM',
CREATE      DG129030 IS 'CALCULATION DATE',
CREATE      DG129029 IS 'CLOSURE TRANSFER CODE',
CREATE      DG129028 IS 'CANCELLATION CODE',
CREATE      DG129027 IS 'VALUE DATE',
CREATE      DG129026 IS 'NAC CODE 1 (Y/N)',
CREATE      DG129025 IS 'CALCULATION STATUS',
CREATE      DG129024 IS 'ORDER NUMBER',
CREATE      DG129023 IS 'NAC - NETTO',
CREATE      DG129022 IS 'NAC - BRUTTO',
CREATE      DG129021 IS 'TECHNICAL DISCOUNT',
CREATE      DG129020 IS 'TECHNICAL SURCHARGE',
CREATE      DG129019 IS 'ADHOC DISCOUNT',
CREATE      DG129018 IS 'ADHOC SURCHARGE',
CREATE      DG129017 IS 'SC DISCOUNT AMOUNT',
CREATE      DG129016 IS 'SC DISCOUNT %',
CREATE      DG129015 IS 'NAC FLAT AMOUNT',
CREATE      DG129014 IS 'NAC DEFAULT AMOUNT',
CREATE      DG129013 IS 'ACCOUNT CURRENCY',
CREATE      DG129012 IS 'ACCOUNT TYPE',
CREATE      DG129011 IS 'ACCOUNT NUMBER',
CREATE      DG129010 IS 'DOMICILE',
CREATE      DG129009 IS 'CUSTOMER TYPE',
CREATE      DG129008 IS 'BUID',
CREATE      DG129007 IS 'TECH MUTATION DATE',
CREATE      DG129006 IS 'KEY RUNNING NUMBER',
CREATE      DG129005 IS 'KEY DUE DATE',
CREATE      DG129004 IS 'KEY POSITION AS DATE',
CREATE      DG129003 IS 'KEY CIF NUMBER',
CREATE      DG129002 IS 'KEY CALCULATION YEAR',
CREATE      DG129001 IS 'KEY PARTITION');
CREATE    GRANT SELECT ON TABLE OA1P.VDG129A1A TO OA1P;
CREATE    SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
DROP      ADMIN DROP VIEW OA1P.VDG129K1A ;
CREATE    CREATE VIEW OA1P.VDG129K1A(DG129K001, DG129K002, DG129K003,
CREATE        DG129K004, DG129K005, DG129K006, DG129K007, DG129K008,
CREATE        DG129K009, DG129K010, DG129K011, DG129K012, DG129K013,
CREATE        DG129K014, DG129K015, DG129K016, DG129K017, DG129K018,
CREATE        DG129K019, DG129K020, DG129K021, DG129K022, DG129K023,
CREATE        DG129K024, DG129K025, DG129K026, DG129K027, DG129K028,
CREATE        DG129K029, DG129K030, DG129K031, DG129K032, DG129K033,
CREATE        DG129K034, DG129K035, DG129K036, DG129K037, DG129K038,
CREATE        DG129K039, DG129K040, DG129K041, DG129K042, DG129K043,
CREATE        DG129K044, DG129K045, DG129K046, DG129K047, DG129K048,
CREATE        DG129K049, DG129K050, DG129K051, DG129K052, DG129K053,
CREATE        DG129K054, DG129K055, DG129K056, DG129K057, DG129K058,
CREATE        DG129K059, DG129K060, DG129K061, DG129K062, DG129K063,
CREATE        DG129K064, DG129K065, DG129K066, DG129K067, DG129K068) AS
CREATE      SELECT DG129K001, DG129K002, DG129K003, DG129K004, DG129K005,
CREATE             DG129K006, DG129K007, DG129K008, DG129K009, DG129K010,
CREATE             DG129K011, DG129K012, DG129K013, DG129K014, DG129K015,
CREATE             DG129K016, DG129K017, DG129K018, DG129K019, DG129K020,
CREATE             DG129K021, DG129K022, DG129K023, DG129K024, DG129K025,
CREATE             DG129K026, DG129K027, DG129K028, DG129K029, DG129K030,
CREATE             DG129K031, DG129K032, DG129K033, DG129K034, DG129K035,
CREATE             DG129K036, DG129K037, DG129K038, DG129K039, DG129K040,
CREATE             DG129K041, DG129K042, DG129K043, DG129K044, DG129K045,
CREATE             DG129K046, DG129K047, DG129K048, DG129K049, DG129K050,
CREATE             DG129K051, DG129K052, DG129K053, DG129K054, DG129K055,
CREATE             DG129K056, DG129K057, DG129K058, DG129K059, DG129K060,
CREATE             DG129K061, DG129K062, DG129K063, DG129K064, DG129K065,
CREATE             DG129K066, DG129K067, DG129K068
CREATE        FROM OA1P.TDG129K1 ;
CREATE    LABEL ON OA1P.VDG129K1A
CREATE     (DG129K068 IS 'LOCAL BU CURRENCY',
CREATE      DG129K067 IS 'FUNCTIONAL CURRENCY',
CREATE      DG129K066 IS 'RESERVE',
CREATE      DG129K065 IS 'RESERVE',
CREATE      DG129K064 IS 'RESERVE',
CREATE      DG129K063 IS 'RESERVE',
CREATE      DG129K062 IS 'RESERVE',
CREATE      DG129K061 IS 'RESERVE',
CREATE      DG129K060 IS 'RESERVE',
CREATE      DG129K059 IS 'RESERVE',
CREATE      DG129K058 IS 'RESERVE',
CREATE      DG129K057 IS 'RESERVE',
CREATE      DG129K056 IS 'RESERVE',
CREATE      DG129K055 IS 'RESERVE',
CREATE      DG129K054 IS 'RESERVE',
CREATE      DG129K053 IS 'RESERVE',
CREATE      DG129K052 IS 'RESERVE',
CREATE      DG129K051 IS 'TS  - RECALCULATED',
CREATE      DG129K050 IS 'TS  - DEBIT',
CREATE      DG129K049 IS 'TS  - SURCHRGE',
CREATE      DG129K048 IS 'TS  - DISCOUNT',
CREATE      DG129K047 IS 'TS  - CANCEL',
CREATE      DG129K046 IS 'TS  - INSERT',
CREATE      DG129K045 IS 'PID - RECALCULATED',
CREATE      DG129K044 IS 'PID - DEBIT',
CREATE      DG129K043 IS 'PID - SURCHRGE',
CREATE      DG129K042 IS 'PID - DISCOUNT',
CREATE      DG129K041 IS 'PID - CANCEL',
CREATE      DG129K040 IS 'PID - INSERT',
CREATE      DG129K039 IS 'DEBIT INTERNAL TEXT',
CREATE      DG129K038 IS 'DEBIT INTERNAL TEXT',
CREATE      DG129K037 IS 'DEBIT FREQUENCY',
CREATE      DG129K036 IS 'CALCULATION FREQUENCY',
CREATE      DG129K035 IS 'DEBIT PERIOD TO',
CREATE      DG129K034 IS 'DEBIT PERIOD FROM',
CREATE      DG129K033 IS 'DEBIT DATE',
CREATE      DG129K032 IS 'CALCULATION PERIOD TO',
CREATE      DG129K031 IS 'CALCULATION PERIOD FROM',
CREATE      DG129K030 IS 'CALCULATION DATE',
CREATE      DG129K029 IS 'CLOSURE TRANSFER CODE',
CREATE      DG129K028 IS 'CANCELLATION CODE',
CREATE      DG129K027 IS 'VALUE DATE',
CREATE      DG129K026 IS 'RECALCULATED',
CREATE      DG129K025 IS 'CALCULATION STATUS',
CREATE      DG129K024 IS 'ORDER NUMBER',
CREATE      DG129K023 IS 'NAC - NETTO',
CREATE      DG129K022 IS 'NAC - BRUTTO',
CREATE      DG129K021 IS 'TECHNICAL DISCOUNT',
CREATE      DG129K020 IS 'TECHNICAL SURCHARGE',
CREATE      DG129K019 IS 'ADHOC DISCOUNT',
CREATE      DG129K018 IS 'ADHOC SURCHARGE',
CREATE      DG129K017 IS 'SC DISCOUNT AMOUNT',
CREATE      DG129K016 IS 'SC DISCOUNT %',
CREATE      DG129K015 IS 'NAC FLAT AMOUNT',
CREATE      DG129K014 IS 'NAC DEFAULT AMOUNT',
CREATE      DG129K013 IS 'ACCOUNT CURRENCY',
CREATE      DG129K012 IS 'ACCOUNT TYPE',
CREATE      DG129K011 IS 'ACCOUNT NUMBER',
CREATE      DG129K010 IS 'DOMICILE',
CREATE      DG129K009 IS 'CUSTOMER TYPE',
CREATE      DG129K008 IS 'BUID',
CREATE      DG129K007 IS 'TECH MUTATION DATE',
CREATE      DG129K006 IS 'KEY RUNNING NUMBER',
CREATE      DG129K005 IS 'KEY DUE DATE',
CREATE      DG129K004 IS 'KEY POSITION AS DATE',
CREATE      DG129K003 IS 'KEY CIF NUMBER',
CREATE      DG129K002 IS 'KEY CALCULATION YEAR',
CREATE      DG129K001 IS 'KEY PARTITION');
CREATE    GRANT SELECT ON TABLE OA1P.VDG129K1A TO OA1P;
CREATE    SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
DROP      ADMIN DROP VIEW OA1P.VDG130A1A ;
CREATE    CREATE VIEW OA1P.VDG130A1A(DG130001, DG130002, DG130003, DG130004,
CREATE        DG130005, DG130006, DG130007, DG130008, DG130009, DG130010,
CREATE        DG130011, DG130012, DG130013, DG130014, DG130015, DG130016,
CREATE        DG130017, DG130018, DG130019, DG130020, DG130021, DG130022,
CREATE        DG130023, DG130024, DG130025, DG130026, DG130027, DG130028,
CREATE        DG130029, DG130030, DG130031, DG130032, DG130033, DG130034,
CREATE        DG130035, DG130036, DG130037, DG130038, DG130039, DG130040,
CREATE        DG130041, DG130042, DG130043, DG130044, DG130045, DG130046,
CREATE        DG130047, DG130048, DG130049, DG130050, DG130051, DG130052,
CREATE        DG130053, DG130054, DG130055, DG130056, DG130057, DG130058,
CREATE        DG130059, DG130060, DG130061, DG130062, DG130063, DG130064,
CREATE        DG130065, DG130066, DG130067, DG130068, DG130069, DG130070,
CREATE        DG130071) AS
CREATE      SELECT DG130001, DG130002, DG130003, DG130004, DG130005, DG130006,
CREATE             DG130007, DG130008, DG130009, DG130010, DG130011, DG130012,
CREATE             DG130013, DG130014, DG130015, DG130016, DG130017, DG130018,
CREATE             DG130019, DG130020, DG130021, DG130022, DG130023, DG130024,
CREATE             DG130025, DG130026, DG130027, DG130028, DG130029, DG130030,
CREATE             DG130031, DG130032, DG130033, DG130034, DG130035, DG130036,
CREATE             DG130037, DG130038, DG130039, DG130040, DG130041, DG130042,
CREATE             DG130043, DG130044, DG130045, DG130046, DG130047, DG130048,
CREATE             DG130049, DG130050, DG130051, DG130052, DG130053, DG130054,
CREATE             DG130055, DG130056, DG130057, DG130058, DG130059, DG130060,
CREATE             DG130061, DG130062, DG130063, DG130064, DG130065, DG130066,
CREATE             DG130067, DG130068, DG130069, DG130070, DG130071
CREATE        FROM OA1P.TDG130A1 ;
CREATE    LABEL   ON TABLE OA1P.VDG130A1A IS 'RET FEE TABLE' ;
CREATE    LABEL ON OA1P.VDG130A1A
CREATE     (DG130071 IS 'LOCAL BU CURRENCY',
CREATE      DG130070 IS 'RESERVE',
CREATE      DG130069 IS 'RESERVE',
CREATE      DG130068 IS 'RESERVE',
CREATE      DG130067 IS 'RESERVE',
CREATE      DG130066 IS 'RESERVE',
CREATE      DG130065 IS 'RESERVE',
CREATE      DG130064 IS 'RESERVE',
CREATE      DG130063 IS 'RESERVE',
CREATE      DG130062 IS 'RESERVE',
CREATE      DG130061 IS 'RESERVE',
CREATE      DG130060 IS 'RESERVE',
CREATE      DG130059 IS 'RESERVE',
CREATE      DG130058 IS 'RESERVE',
CREATE      DG130057 IS 'RESERVE',
CREATE      DG130056 IS 'RESERVE',
CREATE      DG130055 IS 'RESERVE',
CREATE      DG130054 IS 'RESERVE',
CREATE      DG130053 IS 'TS  - RECALCULATED',
CREATE      DG130052 IS 'TS  - DEBIT',
CREATE      DG130051 IS 'TS  - SURCHRGE',
CREATE      DG130050 IS 'TS  - DISCOUNT',
CREATE      DG130049 IS 'TS  - CANCEL',
CREATE      DG130048 IS 'TS  - INSERT',
CREATE      DG130047 IS 'PID - RECALCULATED',
CREATE      DG130046 IS 'PID - DEBIT',
CREATE      DG130045 IS 'PID - SURCHRGE',
CREATE      DG130044 IS 'PID - DISCOUNT',
CREATE      DG130043 IS 'PID - CANCEL',
CREATE      DG130042 IS 'PID - INSERT',
CREATE      DG130041 IS 'DEBIT INTERNAL TEXT',
CREATE      DG130040 IS 'DEBIT INTERNAL TEXT',
CREATE      DG130039 IS 'DEBIT FREQUENCY',
CREATE      DG130038 IS 'CALCULATION FREQUENCY',
CREATE      DG130037 IS 'DEBIT DATE',
CREATE      DG130036 IS 'CALCULATION PERIOD TO',
CREATE      DG130035 IS 'CALCULATION PERIOD FROM',
CREATE      DG130034 IS 'CALCULATION DATE',
CREATE      DG130033 IS 'CLOSURE TRANSFER CODE',
CREATE      DG130032 IS 'CANCELLATION CODE',
CREATE      DG130031 IS 'VALUE DATE',
CREATE      DG130030 IS 'NAC CODE 1 (Y/N)',
CREATE      DG130029 IS 'CALCULATION STATUS',
CREATE      DG130028 IS 'ORDER NUMBER',
CREATE      DG130027 IS 'NAC - NETTO',
CREATE      DG130026 IS 'NAC - BRUTTO',
CREATE      DG130025 IS 'TECHNICAL DISCOUNT',
CREATE      DG130024 IS 'TECHNICAL SURCHARGE',
CREATE      DG130023 IS 'ADHOC DISCOUNT',
CREATE      DG130022 IS 'ADHOC SURCHARGE',
CREATE      DG130021 IS 'SC DISCOUNT AMOUNT',
CREATE      DG130020 IS 'SC DISCOUNT %',
CREATE      DG130019 IS 'RET FLAT AMOUNT CURRENCY',
CREATE      DG130018 IS 'RET FLAT AMOUNT',
CREATE      DG130017 IS 'RET DEF AMOUNT CURRENCY',
CREATE      DG130016 IS 'RET DEFAULT AMOUNT',
CREATE      DG130015 IS 'ACCOUNT CURRENCY',
CREATE      DG130014 IS 'ACCOUNT TYPE',
CREATE      DG130013 IS 'ACCOUNT NUMBER',
CREATE      DG130012 IS 'DOMICILE',
CREATE      DG130011 IS 'CUSTOMER TYPE',
CREATE      DG130010 IS 'RET ROUTING CODE',
CREATE      DG130009 IS 'MODEL',
CREATE      DG130008 IS 'BUID',
CREATE      DG130007 IS 'TECH MUTATION DATE',
CREATE      DG130006 IS 'KEY RUNNING NUMBER',
CREATE      DG130005 IS 'KEY DUE DATE',
CREATE      DG130004 IS 'KEY POSITION AS DATE',
CREATE      DG130003 IS 'KEY CIF NUMBER',
CREATE      DG130002 IS 'KEY CALCULATION YEAR',
CREATE      DG130001 IS 'KEY PARTITION');
CREATE    GRANT SELECT ON TABLE OA1P.VDG130A1A TO OA1P;
CREATE    SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
DROP      ADMIN DROP VIEW OA1P.VDG130K1A ;
CREATE    CREATE VIEW OA1P.VDG130K1A(DG130K001, DG130K002, DG130K003,
CREATE        DG130K004, DG130K005, DG130K006, DG130K007, DG130K008,
CREATE        DG130K009, DG130K010, DG130K011, DG130K012, DG130K013,
CREATE        DG130K014, DG130K015, DG130K016, DG130K017, DG130K018,
CREATE        DG130K019, DG130K020, DG130K021, DG130K022, DG130K023,
CREATE        DG130K024, DG130K025, DG130K026, DG130K027, DG130K028,
CREATE        DG130K029, DG130K030, DG130K031, DG130K032, DG130K033,
CREATE        DG130K034, DG130K035, DG130K036, DG130K037, DG130K038,
CREATE        DG130K039, DG130K040, DG130K041, DG130K042, DG130K043,
CREATE        DG130K044, DG130K045, DG130K046, DG130K047, DG130K048,
CREATE        DG130K049, DG130K050, DG130K051, DG130K052, DG130K053,
CREATE        DG130K054, DG130K055, DG130K056, DG130K057, DG130K058,
CREATE        DG130K059, DG130K060, DG130K061, DG130K062, DG130K063,
CREATE        DG130K064, DG130K065, DG130K066, DG130K067, DG130K068,
CREATE        DG130K069, DG130K070, DG130K071) AS
CREATE      SELECT DG130K001, DG130K002, DG130K003, DG130K004, DG130K005,
CREATE             DG130K006, DG130K007, DG130K008, DG130K009, DG130K010,
CREATE             DG130K011, DG130K012, DG130K013, DG130K014, DG130K015,
CREATE             DG130K016, DG130K017, DG130K018, DG130K019, DG130K020,
CREATE             DG130K021, DG130K022, DG130K023, DG130K024, DG130K025,
CREATE             DG130K026, DG130K027, DG130K028, DG130K029, DG130K030,
CREATE             DG130K031, DG130K032, DG130K033, DG130K034, DG130K035,
CREATE             DG130K036, DG130K037, DG130K038, DG130K039, DG130K040,
CREATE             DG130K041, DG130K042, DG130K043, DG130K044, DG130K045,
CREATE             DG130K046, DG130K047, DG130K048, DG130K049, DG130K050,
CREATE             DG130K051, DG130K052, DG130K053, DG130K054, DG130K055,
CREATE             DG130K056, DG130K057, DG130K058, DG130K059, DG130K060,
CREATE             DG130K061, DG130K062, DG130K063, DG130K064, DG130K065,
CREATE             DG130K066, DG130K067, DG130K068, DG130K069, DG130K070,
CREATE             DG130K071
CREATE        FROM OA1P.TDG130K1 ;
CREATE    LABEL   ON TABLE OA1P.VDG130K1A IS 'RET FEE SHDW TABLE' ;
CREATE    LABEL ON OA1P.VDG130K1A
CREATE     (DG130K071 IS 'LOCAL BU CURRENCY',
CREATE      DG130K070 IS 'RESERVE',
CREATE      DG130K069 IS 'RESERVE',
CREATE      DG130K068 IS 'RESERVE',
CREATE      DG130K067 IS 'RESERVE',
CREATE      DG130K066 IS 'RESERVE',
CREATE      DG130K065 IS 'RESERVE',
CREATE      DG130K064 IS 'RESERVE',
CREATE      DG130K063 IS 'RESERVE',
CREATE      DG130K062 IS 'RESERVE',
CREATE      DG130K061 IS 'RESERVE',
CREATE      DG130K060 IS 'RESERVE',
CREATE      DG130K059 IS 'RESERVE',
CREATE      DG130K058 IS 'RESERVE',
CREATE      DG130K057 IS 'RESERVE',
CREATE      DG130K056 IS 'RESERVE',
CREATE      DG130K055 IS 'RESERVE',
CREATE      DG130K054 IS 'RESERVE',
CREATE      DG130K053 IS 'TS  - RECALCULATED',
CREATE      DG130K052 IS 'TS  - DEBIT',
CREATE      DG130K051 IS 'TS  - SURCHRGE',
CREATE      DG130K050 IS 'TS  - DISCOUNT',
CREATE      DG130K049 IS 'TS  - CANCEL',
CREATE      DG130K048 IS 'TS  - INSERT',
CREATE      DG130K047 IS 'PID - RECALCULATED',
CREATE      DG130K046 IS 'PID - DEBIT',
CREATE      DG130K045 IS 'PID - SURCHRGE',
CREATE      DG130K044 IS 'PID - DISCOUNT',
CREATE      DG130K043 IS 'PID - CANCEL',
CREATE      DG130K042 IS 'PID - INSERT',
CREATE      DG130K041 IS 'DEBIT INTERNAL TEXT',
CREATE      DG130K040 IS 'DEBIT INTERNAL TEXT',
CREATE      DG130K039 IS 'DEBIT FREQUENCY',
CREATE      DG130K038 IS 'CALCULATION FREQUENCY',
CREATE      DG130K037 IS 'DEBIT DATE',
CREATE      DG130K036 IS 'CALCULATION PERIOD TO',
CREATE      DG130K035 IS 'CALCULATION PERIOD FROM',
CREATE      DG130K034 IS 'CALCULATION DATE',
CREATE      DG130K033 IS 'CLOSURE TRANSFER CODE',
CREATE      DG130K032 IS 'CANCELLATION CODE',
CREATE      DG130K031 IS 'VALUE DATE',
CREATE      DG130K030 IS 'NAC CODE 1 (Y/N)',
CREATE      DG130K029 IS 'CALCULATION STATUS',
CREATE      DG130K028 IS 'ORDER NUMBER',
CREATE      DG130K027 IS 'NAC - NETTO',
CREATE      DG130K026 IS 'NAC - BRUTTO',
CREATE      DG130K025 IS 'TECHNICAL DISCOUNT',
CREATE      DG130K024 IS 'TECHNICAL SURCHARGE',
CREATE      DG130K023 IS 'ADHOC DISCOUNT',
CREATE      DG130K022 IS 'ADHOC SURCHARGE',
CREATE      DG130K021 IS 'SC DISCOUNT AMOUNT',
CREATE      DG130K020 IS 'SC DISCOUNT %',
CREATE      DG130K019 IS 'RET FLAT AMOUNT CURRENCY',
CREATE      DG130K018 IS 'RET FLAT AMOUNT',
CREATE      DG130K017 IS 'RET DEF AMOUNT CURRENCY',
CREATE      DG130K016 IS 'RET DEFAULT AMOUNT',
CREATE      DG130K015 IS 'ACCOUNT CURRENCY',
CREATE      DG130K014 IS 'ACCOUNT TYPE',
CREATE      DG130K013 IS 'ACCOUNT NUMBER',
CREATE      DG130K012 IS 'DOMICILE',
CREATE      DG130K011 IS 'CUSTOMER TYPE',
CREATE      DG130K010 IS 'RET ROUTING CODE',
CREATE      DG130K009 IS 'MODEL',
CREATE      DG130K008 IS 'BUID',
CREATE      DG130K007 IS 'TECH MUTATION DATE',
CREATE      DG130K006 IS 'KEY RUNNING NUMBER',
CREATE      DG130K005 IS 'KEY DUE DATE',
CREATE      DG130K004 IS 'KEY POSITION AS DATE',
CREATE      DG130K003 IS 'KEY CIF NUMBER',
CREATE      DG130K002 IS 'KEY CALCULATION YEAR',
CREATE      DG130K001 IS 'KEY PARTITION');
CREATE    GRANT SELECT ON TABLE OA1P.VDG130K1A TO OA1P;
CREATE    SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
DROP      ADMIN DROP VIEW OA1P.VDG215A0A ;
CREATE    CREATE VIEW OA1P.VDG215A0A(DG0201, DG0201Y, DG0201J, DG0201I,
CREATE        DG0201B, DG0201S, DG0201P, DG0201G, DG0201L, DG0202, DG0203,
CREATE        DG0204, DG0205, DG0206, DG0207, DG0208, DG0209, DG0210, DG0211,
CREATE        DG0212, DG0213, DG0214, DG0215, DG0216, DG0217, DG0218, DG0219,
CREATE        DG0220, DG0221, DG02221, DG02222, DG0223, DG0224, DG0225,
CREATE        DG0226N, DG0226C, DG0226X, DG0226W, DG0227V, DG0227B, DG0228,
CREATE        DG0229, DG0230, DG0231, DG0232, DG0233, DG0234, DG0235, DG0236,
CREATE        DG0237, DG0238, DG0239, DG0240, DG0241, DG0242, DG0243, DG0244,
CREATE        DG0245, DG0246, DG0247, DG0248, DG0249, DG0250, DG0251, DG0252)
CREATE        AS
CREATE      SELECT OA1P.TDG128A1.DG128001, SMALLINT(OA1P.TDG128A1.DG128002),
CREATE             OA1P.TDG128A1.DG128002,
CREATE             SUBSTR(OA1P.TDG128A1.DG128003, 1, 1),
CREATE             SUBSTR(OA1P.TDG128A1.DG128003, 2, 3),
CREATE             SUBSTR(OA1P.TDG128A1.DG128003, 5, 7),
CREATE             SUBSTR(OA1P.TDG128A1.DG128003, 12, 1),
CREATE             SUBSTR(OA1P.TDG128A1.DG128003, 13, 1),
CREATE             SUBSTR(OA1P.TDG128A1.DG128003, 14, 3),
CREATE             SUBSTR(OA1P.TDG128A1.DG128005, 2, 2),
CREATE             OA1P.TDG128A1.DG128055,
CREATE             SUBSTR(CHAR(OA1P.TDG128A1.DG128008), 1, 4) || SUBSTR(CHAR(
CREATE             OA1P.TDG128A1.DG128008), 6, 2) || SUBSTR(CHAR(OA1P.
CREATE             TDG128A1.DG128008), 9, 2),
CREATE             SUBSTR(CHAR(OA1P.TDG128A1.DG128004), 7, 4) || SUBSTR(CHAR(
CREATE             OA1P.TDG128A1.DG128004), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE             TDG128A1.DG128004), 1, 2),
CREATE             DECIMAL(OA1P.TDG128A1.DG128013, 15, 0),
CREATE             DECIMAL(OA1P.TDG128A1.DG128028, 15, 3),
CREATE             SUBSTR(OA1P.TDG128A1.DG128007, 3, 4),
CREATE             OA1P.TDG128A1.DG128083,
CREATE             CASE(OA1P.TDG128A1.DG128033) WHEN '01.01.0001' THEN
CREATE             '00000000' ELSE SUBSTR(CHAR(OA1P.TDG128A1.DG128033), 7, 4)
CREATE             || SUBSTR(CHAR(OA1P.TDG128A1.DG128033), 4, 2) || SUBSTR(
CREATE             CHAR(OA1P.TDG128A1.DG128033), 1, 2) END,
CREATE             SUBSTR(OA1P.TDG128A1.DG128049, 1, 7),
CREATE             SUBSTR(CHAR(OA1P.TDG128A1.DG128054), 1, 4) || SUBSTR(CHAR(
CREATE             OA1P.TDG128A1.DG128054), 6, 2) || SUBSTR(CHAR(OA1P.
CREATE             TDG128A1.DG128054), 9, 2), OA1P.TDG128A1.DG128031,
CREATE             DECIMAL(OA1P.TDG128A1.DG128059, 5, 3),
CREATE             DECIMAL(OA1P.TDG128A1.DG128061, 15, 0),
CREATE             OA1P.TDG128A1.DG128035,
CREATE             SUBSTR(OA1P.TDG128A1.DG128045, 1, 7),
CREATE             SUBSTR(CHAR(OA1P.TDG128A1.DG128050), 1, 4) || SUBSTR(CHAR(
CREATE             OA1P.TDG128A1.DG128050), 6, 2) || SUBSTR(CHAR(OA1P.
CREATE             TDG128A1.DG128050), 9, 2),
CREATE             DECIMAL(OA1P.TDG128A1.DG128018, 15, 3),
CREATE             SUBSTR(OA1P.TDG128A1.DG128047, 1, 7),
CREATE             SUBSTR(CHAR(OA1P.TDG128A1.DG128052), 1, 4) || SUBSTR(CHAR(
CREATE             OA1P.TDG128A1.DG128052), 6, 2) || SUBSTR(CHAR(OA1P.
CREATE             TDG128A1.DG128052), 9, 2),
CREATE             DECIMAL(OA1P.TDG128A1.DG128062, 15, 0),
CREATE             DECIMAL(OA1P.TDG128A1.DG128063, 15, 0),
CREATE             OA1P.TDG128A1.DG128026,
CREATE             DECIMAL(OA1P.TDG128A1.DG128021, 15, 3),
CREATE             DECIMAL(OA1P.TDG128A1.DG128023, 15, 3),
CREATE             SUBSTR(OA1P.TDG128A1.DG128010, 1, 16),
CREATE             OA1P.TDG128A1.DG128036, OA1P.TDG128A1.DG128011,
CREATE             OA1P.TDG128A1.DG128012,
CREATE             SUBSTR(CHAR(OA1P.TDG128A1.DG128029), 7, 4) || SUBSTR(CHAR(
CREATE             OA1P.TDG128A1.DG128029), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE             TDG128A1.DG128029), 1, 2),
CREATE             SUBSTR(CHAR(OA1P.TDG128A1.DG128030), 7, 4) || SUBSTR(CHAR(
CREATE             OA1P.TDG128A1.DG128030), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE             TDG128A1.DG128030), 1, 2), OA1P.TDG128A1.DG128009,
CREATE             OA1P.TDG128A1.DG128034, OA1P.TDG128A1.DG128036,
CREATE             DECIMAL(OA1P.TDG128A1.DG128019, 15, 3),
CREATE             DECIMAL(OA1P.TDG128A1.DG128064, 15, 3),
CREATE             DECIMAL(OA1P.TDG128A1.DG128065, 15, 3),
CREATE             DECIMAL(OA1P.TDG128A1.DG128066, 15, 3),
CREATE             OA1P.TDG128A1.DG128044 !! '     ', OA1P.TDG128A1.DG128069,
CREATE             OA1P.TDG128A1.DG128073, OA1P.TDG128A1.DG128043 !! '    ',
CREATE             OA1P.TDG128A1.DG128037, OA1P.TDG128A1.DG128038 !! ' ',
CREATE             OA1P.TDG128A1.DG128007,
CREATE             DECIMAL(OA1P.TDG128A1.DG128016, 15, 7),
CREATE             OA1P.TDG128A1.DG128039, OA1P.TDG128A1.DG128040,
CREATE             OA1P.TDG128A1.DG128041, OA1P.TDG128A1.DG128042,
CREATE             OA1P.TDG128A1.DG128043, OA1P.TDG128A1.DG128044,
CREATE             OA1P.TDG128A1.DG128067, OA1P.TDG128A1.DG128068,
CREATE             OA1P.TDG128A1.DG128057, OA1P.TDG128A1.DG128058
CREATE        FROM OA1P.TDG128A1 ;
CREATE    GRANT SELECT ON TABLE OA1P.VDG215A0A TO OA1P;
CREATE    SET CURRENT PATH = "SYSIBM","SYSFUN","SYSPROC","OA1A" ;
DROP      ADMIN DROP VIEW OA1P.VDG314A0A ;
CREATE    CREATE VIEW OA1P.VDG314A0A(DG0301, DG0301Y, DG0301J, DG0301I,
CREATE        DG0301B, DG0301S, DG0301P, DG0301G, DG0301L, DG0302, DG0303,
CREATE        DG0304, DG0305, DG0306I, DG0306B, DG0306N, DG0306P, DG0307,
CREATE        DG0308A, DG0308B, DG0308C, DG0309, DG0310, DG0311, DG0312,
CREATE        DG0313, DG0314, DG0315A, DG0315B, DG0315C, DG0315D, DG0316,
CREATE        DG0317, DG0318, DG0319, DG0320, DG0321, DG0322, DG0323A,
CREATE        DG0323B, DG0324A, DG0324B, DG0325A, DG0325B, DG0326A, DG0326B,
CREATE        DG0327, DG0328, DG0329, DG0330, DG0331, DG0332, DG0333, DG0334,
CREATE        DG0335, DG0336, DG0337, DG0338, DG0339, DG0340, DG0341C,
CREATE        DG0341X, DG0342, DG0343, DG0344, DG0345, DG0346, DG0347, DG0348,
CREATE        DG0349, DG0350, DG0351, DG0352, DG0353, DG0354, DG0355, DG0356,
CREATE        DG0357, DG0358, DG0359, DG0360, DG0361, DG0362, DG0363, DG0364,
CREATE        DG0365, DG0366, DG0367, DG0368, DG0369, DG0370, DG0371, DG0372,
CREATE        DG0373, DG0374, DG0375, DG0376, DG0377) AS
CREATE      SELECT OA1P.TDG127A1.DG127001, SMALLINT(OA1P.TDG127A1.DG127002),
CREATE             OA1P.TDG127A1.DG127002,
CREATE             SUBSTR(OA1P.TDG127A1.DG127003, 1, 1),
CREATE             SUBSTR(OA1P.TDG127A1.DG127003, 2, 3),
CREATE             SUBSTR(OA1P.TDG127A1.DG127003, 5, 7),
CREATE             SUBSTR(OA1P.TDG127A1.DG127003, 12, 1),
CREATE             SUBSTR(OA1P.TDG127A1.DG127003, 13, 1),
CREATE             SUBSTR(OA1P.TDG127A1.DG127003, 14, 3),
CREATE             OA1P.TDG127A1.DG127139,
CREATE             SUBSTR(CHAR(OA1P.TDG127A1.DG127007), 1, 4) || SUBSTR(CHAR(
CREATE             OA1P.TDG127A1.DG127007), 6, 2) || SUBSTR(CHAR(OA1P.
CREATE             TDG127A1.DG127007), 9, 2),
CREATE             SUBSTR(CHAR(OA1P.TDG127A1.DG127004), 7, 4) || SUBSTR(CHAR(
CREATE             OA1P.TDG127A1.DG127004), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE             TDG127A1.DG127004), 1, 2),
CREATE             SUBSTR(OA1P.TDG127A1.DG127010, 1, 7),
CREATE             SUBSTR(OA1P.TDG127A1.DG127011, 1, 1),
CREATE             SUBSTR(OA1P.TDG127A1.DG127011, 2, 3),
CREATE             SUBSTR(OA1P.TDG127A1.DG127011, 5, 7),
CREATE             SUBSTR(OA1P.TDG127A1.DG127011, 12, 1),
CREATE             OA1P.TDG127A1.DG127114,
CREATE             DECIMAL(OA1P.TDG127A1.DG127129, 15, 0),
CREATE             DECIMAL(OA1P.TDG127A1.DG127130, 15, 0),
CREATE             DECIMAL(OA1P.TDG127A1.DG127131, 15, 0),
CREATE             DECIMAL(OA1P.TDG127A1.DG127072, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127145, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127146, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127036, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127048, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127076, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127080, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127056, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127147, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127132, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127060, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127133, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127064, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127068, 15, 3),
CREATE             OA1P.TDG127A1.DG127134, OA1P.TDG127A1.DG127102,
CREATE             SUBSTR(CHAR(OA1P.TDG127A1.DG127123), 7, 4) || SUBSTR(CHAR(
CREATE             OA1P.TDG127A1.DG127123), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE             TDG127A1.DG127123), 1, 2),
CREATE             SUBSTR(OA1P.TDG127A1.DG127117, 1, 7),
CREATE             SUBSTR(CHAR(OA1P.TDG127A1.DG127135), 7, 4) || SUBSTR(CHAR(
CREATE             OA1P.TDG127A1.DG127135), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE             TDG127A1.DG127135), 1, 2),
CREATE             SUBSTR(OA1P.TDG127A1.DG127165, 1, 7),
CREATE             SUBSTR(CHAR(OA1P.TDG127A1.DG127103), 7, 4) || SUBSTR(CHAR(
CREATE             OA1P.TDG127A1.DG127103), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE             TDG127A1.DG127103), 1, 2),
CREATE             SUBSTR(OA1P.TDG127A1.DG127166, 1, 7),
CREATE             SUBSTR(CHAR(OA1P.TDG127A1.DG127104), 7, 4) || SUBSTR(CHAR(
CREATE             OA1P.TDG127A1.DG127104), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE             TDG127A1.DG127104), 1, 2),
CREATE             CHAR(OA1P.TDG127A1.DG127106 || '   '),
CREATE             CHAR(OA1P.TDG127A1.DG127008 || '    '),
CREATE             CASE(OA1P.TDG127A1.DG127100) WHEN '01.01.0001' THEN
CREATE             '00000000' ELSE SUBSTR(CHAR(OA1P.TDG127A1.DG127100), 7, 4)
CREATE             || SUBSTR(CHAR(OA1P.TDG127A1.DG127100), 4, 2) || SUBSTR(
CREATE             CHAR(OA1P.TDG127A1.DG127100), 1, 2) END,
CREATE             DECIMAL(OA1P.TDG127A1.DG127140, 15, 3),
CREATE             OA1P.TDG127A1.DG127115,
CREATE             DECIMAL(OA1P.TDG127A1.DG127173, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127174, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127175, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127176, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127177, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127178, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127179, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127018, 5, 3),
CREATE             CHAR(OA1P.TDG127A1.DG127150 || '  '),
CREATE             DECIMAL(OA1P.TDG127A1.DG127097, 15, 3),
CREATE             SUBSTR(OA1P.TDG127A1.DG127012, 1, 16),
CREATE             OA1P.TDG127A1.DG127136, OA1P.TDG127A1.DG127013,
CREATE             OA1P.TDG127A1.DG127014, OA1P.TDG127A1.DG127151,
CREATE             OA1P.TDG127A1.DG127127, OA1P.TDG127A1.DG127128,
CREATE             OA1P.TDG127A1.DG127098,
CREATE             DECIMAL(OA1P.TDG127A1.DG127026, 5, 3),
CREATE             SUBSTR(OA1P.TDG127A1.DG127009, 1, 7),
CREATE             OA1P.TDG127A1.DG127167, OA1P.TDG127A1.DG127101,
CREATE             CASE(OA1P.TDG127A1.DG127137) WHEN '01.01.0001' THEN ''
CREATE             ELSE SUBSTR(CHAR(OA1P.TDG127A1.DG127137), 7, 4) || SUBSTR(
CREATE             CHAR(OA1P.TDG127A1.DG127137), 4, 2) || SUBSTR(CHAR(OA1P.
CREATE             TDG127A1.DG127137), 1, 2) END, OA1P.TDG127A1.DG127105,
CREATE             SUBSTR(OA1P.TDG127A1.DG127160, 1, 5),
CREATE             DECIMAL(OA1P.TDG127A1.DG127132, 15, 0),
CREATE             DECIMAL(OA1P.TDG127A1.DG127133, 15, 0),
CREATE             OA1P.TDG127A1.DG127106, OA1P.TDG127A1.DG127107,
CREATE             OA1P.TDG127A1.DG127008,
CREATE             DECIMAL(OA1P.TDG127A1.DG127018, 15, 7),
CREATE             DECIMAL(OA1P.TDG127A1.DG127026, 15, 7),
CREATE             DECIMAL(OA1P.TDG127A1.DG127022, 15, 7),
CREATE             SUBSTR(OA1P.TDG127A1.DG127009, 1, 4),
CREATE             OA1P.TDG127A1.DG127108, OA1P.TDG127A1.DG127109,
CREATE             OA1P.TDG127A1.DG127110, OA1P.TDG127A1.DG127111,
CREATE             OA1P.TDG127A1.DG127112, OA1P.TDG127A1.DG127113,
CREATE             OA1P.TDG127A1.DG127115,
CREATE             DECIMAL(OA1P.TDG127A1.DG127032, 15, 0),
CREATE             DECIMAL(OA1P.TDG127A1.DG127027, 15, 3),
CREATE             OA1P.TDG127A1.DG127116,
CREATE             DECIMAL(OA1P.TDG127A1.DG127084, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127088, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127092, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127096, 15, 3),
CREATE             DECIMAL(OA1P.TDG127A1.DG127028, 15, 3)
CREATE        FROM OA1P.TDG127A1 ;
CREATE    GRANT SELECT ON TABLE OA1P.VDG314A0A TO OA1P;