|
| 1 | +----------------------------------------------------------------------------- |
| 2 | +-- Copyright 2022, IBM Corporation -- |
| 3 | +-- -- |
| 4 | +-- Licensed under the Apache License, Version 2.0 (the "License"); -- |
| 5 | +-- you may not use this file except in compliance with the License. -- |
| 6 | +-- You may obtain a copy of the License at -- |
| 7 | +-- -- |
| 8 | +-- http://www.apache.org/licenses/LICENSE-2.0 -- |
| 9 | +-- -- |
| 10 | +-- Unless required by applicable law or agreed to in writing, software -- |
| 11 | +-- distributed under the License is distributed on an "AS IS" BASIS, -- |
| 12 | +-- WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.-- |
| 13 | +-- See the License for the specific language governing permissions and -- |
| 14 | +-- limitations under the License. -- |
| 15 | +-- -- |
| 16 | +LOAD DATA |
| 17 | + INDDN IRRHFSU |
| 18 | + RESUME YES |
| 19 | + LOG NO |
| 20 | + INTO TABLE USER01.HFS_BD |
| 21 | + WHEN(1:4)='0900' ( |
| 22 | + HFSBD_NAME POSITION(006:1028) CHAR(1023), |
| 23 | + HFSBD_INODE POSITION(1030:1039) INTEGER EXTERNAL(10), |
| 24 | + HFSBD_FILE_TYPE POSITION(1041:1048) CHAR(8), |
| 25 | + HFSBD_OWN_UID POSITION(1050:1059) INTEGER EXTERNAL(10), |
| 26 | + HFSBD_OWN_UNAME POSITION(1061:1068) CHAR(8), |
| 27 | + HFSBD_OWN_GID POSITION(1070:1079) INTEGER EXTERNAL(10), |
| 28 | + HFSBD_OWN_GNAME POSITION(1081:1088) CHAR(8), |
| 29 | + HFSBD_S_ISUID POSITION(1090:1090) CHAR(1), |
| 30 | + HFSBD_S_ISGID POSITION(1095:1095) CHAR(1), |
| 31 | + HFSBD_S_ISVTX POSITION(1100:1100) CHAR(1), |
| 32 | + HFSBD_OWN_READ POSITION(1105:1105) CHAR(1), |
| 33 | + HFSBD_OWN_WRITE POSITION(1110:1110) CHAR(1), |
| 34 | + HFSBD_OWN_EXEC POSITION(1115:1115) CHAR(1), |
| 35 | + HFSBD_GRP_READ POSITION(1120:1120) CHAR(1), |
| 36 | + HFSBD_GRP_WRITE POSITION(1125:1125) CHAR(1), |
| 37 | + HFSBD_GRP_EXEC POSITION(1130:1130) CHAR(1), |
| 38 | + HFSBD_OTH_READ POSITION(1135:1135) CHAR(1), |
| 39 | + HFSBD_OTH_WRITE POSITION(1140:1140) CHAR(1), |
| 40 | + HFSBD_OTH_EXEC POSITION(1145:1145) CHAR(1), |
| 41 | + HFSBD_APF POSITION(1150:1150) CHAR(1), |
| 42 | + HFSBD_PROGRAM POSITION(1155:1155) CHAR(1), |
| 43 | + HFSBD_SHAREAS POSITION(1160:1160) CHAR(1), |
| 44 | + HFSBD_AAUD_READ POSITION(1165:1172) CHAR(8), |
| 45 | + HFSBD_AAUD_WRITE POSITION(1174:1181) CHAR(8), |
| 46 | + HFSBD_AAUD_EXEC POSITION(1183:1190) CHAR(8), |
| 47 | + HFSBD_UAUD_READ POSITION(1192:1199) CHAR(8), |
| 48 | + HFSBD_UAUD_WRITE POSITION(1201:1208) CHAR(8), |
| 49 | + HFSBD_UAUD_EXEC POSITION(1210:1217) CHAR(8), |
| 50 | + HFSBD_AUDITID POSITION(1219:1250) CHAR(32), |
| 51 | + HFSBD_FID POSITION(1252:1267) CHAR(16), |
| 52 | + HFSBD_CREATE_DATE POSITION(1269:1278) DATE EXTERNAL(10), |
| 53 | + HFSBD_CREATE_TIME POSITION(1280:1287) TIME EXTERNAL(8), |
| 54 | + HFSBD_LASTREF_DATE POSITION(1289:1298) DATE EXTERNAL(10), |
| 55 | + HFSBD_LASTREF_TIME POSITION(1300:1307) TIME EXTERNAL(8), |
| 56 | + HFSBD_LASTCHG_DATE POSITION(1309:1318) DATE EXTERNAL(10), |
| 57 | + HFSBD_LASTCHG_TIME POSITION(1320:1327) TIME EXTERNAL(8), |
| 58 | + HFSBD_LASTDAT_DATE POSITION(1329:1338) DATE EXTERNAL(10), |
| 59 | + HFSBD_LASTDAT_TIME POSITION(1340:1347) TIME EXTERNAL(8), |
| 60 | + HFSBD_NUMBER_LINKS POSITION(1349:1358) INTEGER EXTERNAL(10), |
| 61 | + HFSBD_SHARELIB POSITION(1360:1360) CHAR(1), |
| 62 | + HFSBD_ACCESS_ACL POSITION(1365:1365) CHAR(1), |
| 63 | + HFSBD_FILEMOD_ACL POSITION(1370:1370) CHAR(1), |
| 64 | + HFSBD_DIRMOD_ACL POSITION(1375:1375) CHAR(1), |
| 65 | + HFSBD_SECLABEL POSITION(1380:1387) CHAR(8), |
| 66 | + HFSBD_DSNAME POSITION(1389:1432) CHAR(44), |
| 67 | + HFSBD_LINK POSITION(1434:2456) CHAR(1023) |
| 68 | + ) |
| 69 | + |
| 70 | + INTO TABLE USER01.HFS_AC |
| 71 | + WHEN(1:4)='0901' ( |
| 72 | + HFACC_NAME POSITION(006:1028) CHAR(1023), |
| 73 | + HFACC_INODE POSITION(1030:1039) INTEGER EXTERNAL(10), |
| 74 | + HFACC_TYPE POSITION(1041:1048) CHAR(8), |
| 75 | + HFACC_UNIXID POSITION(1050:1059) INTEGER EXTERNAL(10), |
| 76 | + HFACC_ID_NAME POSITION(1061:1068) CHAR(8), |
| 77 | + HFACC_READ POSITION(1070:1070) CHAR(1), |
| 78 | + HFACC_WRITE POSITION(1075:1075) CHAR(1), |
| 79 | + HFACC_EXEC POSITION(1080:1080) CHAR(1) |
| 80 | + ) |
| 81 | + |
| 82 | + INTO TABLE USER01.HFS_AF |
| 83 | + WHEN(1:4)='0902' ( |
| 84 | + HFACF_NAME POSITION(006:1028) CHAR(1023), |
| 85 | + HFACF_INODE POSITION(1030:1039) INTEGER EXTERNAL(10), |
| 86 | + HFACF_TYPE POSITION(1041:1048) CHAR(8), |
| 87 | + HFACF_UNIXID POSITION(1050:1059) INTEGER EXTERNAL(10), |
| 88 | + HFACF_ID_NAME POSITION(1061:1068) CHAR(8), |
| 89 | + HFACF_READ POSITION(1070:1070) CHAR(1), |
| 90 | + HFACF_WRITE POSITION(1075:1075) CHAR(1), |
| 91 | + HFACF_EXEC POSITION(1080:1080) CHAR(1) |
| 92 | + ) |
| 93 | + |
| 94 | + INTO TABLE USER01.HFS_AD |
| 95 | + WHEN(1:4)='0903' ( |
| 96 | + HFACD_NAME POSITION(006:1028) CHAR(1023), |
| 97 | + HFACD_INODE POSITION(1030:1039) INTEGER EXTERNAL(10), |
| 98 | + HFACD_TYPE POSITION(1041:1048) CHAR(8), |
| 99 | + HFACD_UNIXID POSITION(1050:1059) INTEGER EXTERNAL(10), |
| 100 | + HFACD_ID_NAME POSITION(1061:1068) CHAR(8), |
| 101 | + HFACD_READ POSITION(1070:1070) CHAR(1), |
| 102 | + HFACD_WRITE POSITION(1075:1075) CHAR(1), |
| 103 | + HFACD_EXEC POSITION(1080:1080) CHAR(1) |
| 104 | + ) |
| 105 | + |
| 106 | + INTO TABLE USER01.HFS_FS |
| 107 | + WHEN(1:4)='0904' ( |
| 108 | + HFMFS_DSNAME POSITION(006:049) CHAR(64), |
| 109 | + HFMFS_TYPE POSITION(051:058) CHAR(8), |
| 110 | + HFMFS_MODE POSITION(060:069) CHAR(10), |
| 111 | + HFMFS_SECURITY POSITION(071:080) CHAR(10), |
| 112 | + HFMFS_SETUID POSITION(082:091) CHAR(10), |
| 113 | + HFMFS_MUID POSITION(093:102) INTEGER EXTERNAL(10), |
| 114 | + HFMFS_MUSER POSITION(104:111) CHAR(8), |
| 115 | + HFMFS_MOUNTPOINT POSITION(0113:1135) CHAR(1023) |
| 116 | + ) |
0 commit comments