Can someone help me with the below requirement?
I have an input file with the below format, I want to keep D1, D2, D3 records if the first 6 bytes of my data has TL03106 and to write it's corresponding H1 & T1 irrespective of what is there in first 6 bytes in H1 & T1 of the file.
TL00973 C ABCDE00018858 2020012305150000H1 0000000000000000000000
TL00973 C ABCDE00018858 2020012305150000D1ABCD4161290
TL00973 C ABCDE00018858 2020012305150000D212638609500000000100973
TL00973 C ABCDE00018858 2020012305150000D300069808600000000021000EA
TL03106 C ABCDE00018858 2020012305150000D1QQQQ8043656
TL03106 C ABCDE00018858 2020012305150000D212638606800000000103106
TL03106 C ABCDE00018858 2020012305150000D300069808600000000021000EA
TL00973 C ABCDE00018858 2020012305150000D1EEEE3223175
TL00973 C ABCDE00018858 2020012305150000D212638618700000000100973
TL00973 C ABCDE00018858 2020012305150000D300069808600000000021000EA
TL03106 C ABCDE00018858 2020012305150000D1MSKU1593605
TL03106 C ABCDE00018858 2020012305150000D212638607800000000103106
TL03106 C ABCDE00018858 2020012305150000D300069808600000000021000EA
TL03106 C ABCDE00018858 2020012305150000D1PONU8210082
TL03106 C ABCDE00018858 2020012305150000D212638608600000000103106
TL03106 C ABCDE00018858 2020012305150000D300069808600000000021000EA
TL03106 C ABCDE00018858 2020012305150000D1SUDU8575079
TL03106 C ABCDE00018858 2020012305150000D212638606500000000103106
TL03106 C ABCDE00018858 2020012305150000D300069808600000000021000EA
TL03106 C ABCDE00018858 2020012305150000D1TCKU6508788
TL03106 C ABCDE00018858 2020012305150000D212638608700000000103106
TL03106 C ABCDE00018858 2020012305150000D300069808600000000021000EA0
TL03106 C ABCDE00018858 2020012305150000D1TCNU2982303
TL03106 C ABCDE00018858 2020012305150000D212638609200000000103106
TL03106 C ABCDE00018858 2020012305150000D300069808600000000021000EA0
TL03106 C ABCDE00018858 2020012305150000D1TCNU4581758
TL03106 C ABCDE00018858 2020012305150000D212638614400000000103106
TL03106 C ABCDE00018858 2020012305150000D300069808600000000021000EA0
TL00973 C ABCDE00018858 2020012305150000D1TCNU5143083
TL00973 C ABCDE00018858 2020012305150000D212638606300000000103106
TL00973 C ABCDE00018858 2020012305150000D300069808600000000021000EA0
TL00973 C ABCDE00018858 2020012305150000T1000000001
TL00973 C ABCDE00018858 2020012305150000D1ABCD4161290
TL00973 C ABCDE00018858 2020012305150000D212638609500000000100973
TL00973 C ABCDE00018858 2020012305150000D300069808600000000021000EA
TL03106 C ABCDE00018858 2020012305150000D1QQQQ8043656
TL03106 C ABCDE00018858 2020012305150000D212638606800000000103106
TL03106 C ABCDE00018858 2020012305150000D300069808600000000021000EA
TL00973 C ABCDE00018858 2020012305150000D1EEEE3223175
TL00973 C ABCDE00018858 2020012305150000D212638618700000000100973
TL00973 C ABCDE00018858 2020012305150000D300069808600000000021000EA
TL03106 C ABCDE00018858 2020012305150000D1MSKU1593605
TL03106 C ABCDE00018858 2020012305150000D212638607800000000103106
TL03106 C ABCDE00018858 2020012305150000D300069808600000000021000EA
TL03106 C ABCDE00018858 2020012305150000D1PONU8210082
TL03106 C ABCDE00018858 2020012305150000D212638608600000000103106
TL03106 C ABCDE00018858 2020012305150000D300069808600000000021000EA
TL03106 C ABCDE00018858 2020012305150000D1SUDU8575079
TL03106 C ABCDE00018858 2020012305150000D212638606500000000103106
TL03106 C ABCDE00018858 2020012305150000D300069808600000000021000EA
TL03106 C ABCDE00018858 2020012305150000D1TCKU6508788
TL03106 C ABCDE00018858 2020012305150000D212638608700000000103106
TL03106 C ABCDE00018858 2020012305150000D300069808600000000021000EA0
TL03106 C ABCDE00018858 2020012305150000D1TCNU2982303
TL03106 C ABCDE00018858 2020012305150000D212638609200000000103106
TL03106 C ABCDE00018858 2020012305150000D300069808600000000021000EA0
TL03106 C ABCDE00018858 2020012305150000D1TCNU4581758
TL03106 C ABCDE00018858 2020012305150000D212638614400000000103106
TL03106 C ABCDE00018858 2020012305150000D300069808600000000021000EA0
TL00973 C ABCDE00018858 2020012305150000D1TCNU5143083
TL00973 C ABCDE00018858 2020012305150000D212638606300000000103106
TL00973 C ABCDE00018858 2020012305150000D300069808600000000021000EA0
TL00973 C ABCDE00018858 2020012305150000T1000000001
Regards,
Rakesh MS
topic edited to add the code tags