1
- import ztarfruit as zfruit
1
+ #This module defines all of the records and fields that can exist in IRRDBU00 output
2
+
3
+ import record_definition as definition
2
4
3
5
#0100
4
6
group_basic_data_record_fields = [
5
- zfruit .Field (name = "GPBD_NAME" ,data_type = zfruit . DataType .Char ,start = 6 ,end = 13 ),
6
- zfruit .Field (name = "GPBD_SUPGRP_ID" ,data_type = zfruit . DataType .Char ,start = 15 ,end = 22 ),
7
- zfruit .Field (name = "GPBD_CREATE_DATE" ,data_type = zfruit . DataType .Char ,start = 24 ,end = 33 ),
8
- zfruit .Field (name = "GPBD_OWNER_ID" ,data_type = zfruit . DataType .Char ,start = 35 ,end = 42 ),
9
- zfruit .Field (name = "GPBD_UACC" ,data_type = zfruit . DataType .Char ,start = 44 ,end = 51 ),
10
- zfruit .Field (name = "GPBD_NOTERMUACC" ,data_type = zfruit . DataType .Char ,start = 53 ,end = 56 ),
11
- zfruit .Field (name = "GPBD_INSTALL_DATA" ,data_type = zfruit . DataType .Char ,start = 58 ,end = 312 ),
12
- zfruit .Field (name = "GPBD_MODEL" ,data_type = zfruit . DataType .Char ,start = 314 ,end = 357 ),
13
- zfruit .Field (name = "GPBD_UNIVERSAL" ,data_type = zfruit . DataType .Char ,start = 359 ,end = 362 )
7
+ definition .Field (name = "GPBD_NAME" ,data_type = DataType .Char ,start = 6 ,end = 13 ),
8
+ definition .Field (name = "GPBD_SUPGRP_ID" ,data_type = DataType .Char ,start = 15 ,end = 22 ),
9
+ definition .Field (name = "GPBD_CREATE_DATE" ,data_type = DataType .Char ,start = 24 ,end = 33 ),
10
+ definition .Field (name = "GPBD_OWNER_ID" ,data_type = DataType .Char ,start = 35 ,end = 42 ),
11
+ definition .Field (name = "GPBD_UACC" ,data_type = DataType .Char ,start = 44 ,end = 51 ),
12
+ definition .Field (name = "GPBD_NOTERMUACC" ,data_type = DataType .Char ,start = 53 ,end = 56 ),
13
+ definition .Field (name = "GPBD_INSTALL_DATA" ,data_type = DataType .Char ,start = 58 ,end = 312 ),
14
+ definition .Field (name = "GPBD_MODEL" ,data_type = DataType .Char ,start = 314 ,end = 357 ),
15
+ definition .Field (name = "GPBD_UNIVERSAL" ,data_type = DataType .Char ,start = 359 ,end = 362 )
14
16
]
15
17
16
18
#0101
17
19
group_subgroups_data_record_fields = [
18
- zfruit .Field (name = "GPSGRP_NAME" ,data_type = zfruit . DataType .Char ,start = 6 ,end = 13 ),
19
- zfruit .Field (name = "GPSGRP_SUBGRP_ID" ,data_type = zfruit . DataType .Char ,start = 15 ,end = 22 ),
20
+ definition .Field (name = "GPSGRP_NAME" ,data_type = DataType .Char ,start = 6 ,end = 13 ),
21
+ definition .Field (name = "GPSGRP_SUBGRP_ID" ,data_type = DataType .Char ,start = 15 ,end = 22 ),
20
22
]
21
23
22
- records = [
23
- zfruit .Record (name = "Group basic data record" ,identifier = "0100" ,fields = group_basic_data_record_fields ),
24
- zfruit .Record (name = "Group subgroups record" ,identifier = "0101" ,fields = group_subgroups_data_record_fields )
24
+ #Records
25
+ database_records = [
26
+ definition .Record (name = "Group basic data record" ,identifier = "0100" ,fields = group_basic_data_record_fields ),
27
+ definition .Record (name = "Group subgroups record" ,identifier = "0101" ,fields = group_subgroups_data_record_fields )
25
28
]
0 commit comments