IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Converting Rows to Columns.


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
samuel_Inba

New User


Joined: 03 Jan 2008
Posts: 53
Location: Chennai

PostPosted: Mon Jan 12, 2009 6:29 pm
Reply with quote

I/P - Lrecl 80 and RECFM - FB
O/P - Lrecl 80 and RECFM - FB


Sample I/P:
Code:


         C1             C2                C3            C4

R1        1               2                  3             4

R2        5                6                 7             8


Now, My requirement is, to convert the rows to column and column to rows.

O/P Sample:
Code:

        R1           R2

C1     1              5

C2      2             6

C3      3              7

C4      4              8


Pls let me know if this is possible.

Thanks,
Sam.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Mon Jan 12, 2009 9:44 pm
Reply with quote

Do the Cx and Rx constants actually appear in the input and output records?

What is the RECFM and LRECL of the input file?

What is the starting position, length and format of the C1, C2, C3 and C4 fields?

Do you always have 4 columns and 2 rows?
Back to top
View user's profile Send private message
samuel_Inba

New User


Joined: 03 Jan 2008
Posts: 53
Location: Chennai

PostPosted: Tue Jan 13, 2009 10:07 am
Reply with quote

Quote:

Do the Cx and Rx constants actually appear in the input and output records?


Yes, the C and R always appear in the file, but the No of Cx and Rx varies.

Quote:

What is the RECFM and LRECL of the input file?


I/P - Lrecl 80 and RECFM - FB
O/P - Lrecl 80 and RECFM - FB

Quote:

What is the starting position, length and format of the C1, C2, C3 and C4 fields?


starting position of Cx is 1 with length of 4 char, the Rx is of length 4 and the values of (Cx,Rx) are ZD with length of 9(4).


Quote:

Do you always have 4 columns and 2 rows?


The no of columns and rows varies. Its a two dimensional array with varying no of rows and columns.


Pls let me know if you have any more requirements.

Thanks,
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Wed Jan 14, 2009 12:25 am
Reply with quote

Quote:
The no of columns and rows varies. Its a two dimensional array with varying no of rows and columns.


Each field in your input is 4 bytes and the LRECL is 80 bytes , so is it safe to assume that you will have a max of 20 columns and 20 rows only? You can only transpose 20 rows into 20 columns.


Based on the above mentioned assumptions here is the DFSORT JOB which will give you the desired results

Code:

//STEP0100 EXEC PGM=ICEMAN                               
//SYSOUT   DD SYSOUT=*                                   
//SORTIN   DD DSN=your 80 byte input file,
//            DISP=SHR                                   
//SORTOUT  DD DSN=&&T1,DISP=(,PASS),SPACE=(CYL,(1,1),RLSE)
//SYSIN    DD *                                           
//SYSIN    DD *                           
  OPTION STOPAFT=20                       
  SORT FIELDS=COPY                         
  OUTREC OVERLAY=(81:SEQNUM,4,ZD)         
  OUTFIL BUILD=(01,4,76Z,81:81,4,/,       
                05,4,76Z,81:81,4,/,       
                09,4,76Z,81:81,4,/,       
                13,4,76Z,81:81,4,/,       
                17,4,76Z,81:81,4,/,       
                21,4,76Z,81:81,4,/,       
                25,4,76Z,81:81,4,/,       
                29,4,76Z,81:81,4,/,       
                33,4,76Z,81:81,4,/,       
                37,4,76Z,81:81,4,/,       
                41,4,76Z,81:81,4,/,       
                45,4,76Z,81:81,4,/,       
                49,4,76Z,81:81,4,/,       
                53,4,76Z,81:81,4,/,       
                57,4,76Z,81:81,4,/,       
                61,4,76Z,81:81,4,/,       
                65,4,76Z,81:81,4,/,       
                69,4,76Z,81:81,4,/,       
                73,4,76Z,81:81,4,/,       
                77,4,76Z,81:81,4)         
//*                                       
//STEP0200 EXEC PGM=ICEMAN                                         
//SYSOUT   DD SYSOUT=*                                             
//SORTIN   DD DSN=&&T1,                                           
//            DISP=SHR                                             
//SORTOUT  DD SYSOUT=*                                             
//SYSIN    DD *                                                   
  OPTION EQUALS                                                   
  INREC IFTHEN=(WHEN=INIT,OVERLAY=(85:SEQNUM,4,ZD,RESTART=(81,4))),
  IFTHEN=(WHEN=(81,4,ZD,EQ,02),OVERLAY=(05:1,4,01:04Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,03),OVERLAY=(09:1,4,01:08Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,04),OVERLAY=(13:1,4,01:12Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,05),OVERLAY=(17:1,4,01:16Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,06),OVERLAY=(21:1,4,01:20Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,07),OVERLAY=(25:1,4,01:24Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,08),OVERLAY=(29:1,4,01:28Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,09),OVERLAY=(33:1,4,01:32Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,10),OVERLAY=(37:1,4,01:36Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,11),OVERLAY=(41:1,4,01:40Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,12),OVERLAY=(45:1,4,01:44Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,13),OVERLAY=(49:1,4,01:48Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,14),OVERLAY=(53:1,4,01:52Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,15),OVERLAY=(57:1,4,01:56Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,16),OVERLAY=(61:1,4,01:60Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,17),OVERLAY=(65:1,4,01:64Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,18),OVERLAY=(69:1,4,01:68Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,19),OVERLAY=(73:1,4,01:72Z)),           
  IFTHEN=(WHEN=(81,4,ZD,EQ,20),OVERLAY=(77:1,4,01:76Z))           
                                                                   
  SORT FIELDS=(85,4,CH,A)                                         
  SUM FIELDS=(05,8,13,8,21,8,29,8,37,8,45,8,                       
              53,8,61,8,69,8,77,4),FORMAT=BI                       
  OUTREC BUILD=(1,80)                                             
//*


my sample input was

Code:

AAAA A01 A02 A03 A04 A05 A06 A07 A08 A09 A10 A11 A12 A13 A14 A15 A16 A17 A18 A19
BBBB B01 B02 B03 B04 B05 B06 B07 B08 B09 B10 B11 B12 B13 B14 B15 B16 B17 B18 B19
CCCC C01 C02 C03 C04 C05 C06 C07 C08 C09 C10 C11 C12 C13 C14 C15 C16 C17 C18 C19
DDDD D01 D02 D03 D04 D05 D06 D07 D08 D09 D10 D11 D12 D13 D14 D15 D16 D17 D18 D19
EEEE E01 E02 E03 E04 E05 E06 E07 E08 E09 E10 E11 E12 E13 E14 E15 E16 E17 E18 E19
FFFF F01 F02 F03 F04 F05 F06 F07 F08 F09 F10 F11 F12 F13 F14 F15 F16 F17 F18 F19
GGGG G01 G02 G03 G04 G05 G06 G07 G08 G09 G10 G11 G12 G13 G14 G15 G16 G17 G18 G19
HHHH H01 H02 H03 H04 H05 H06 H07 H08 H09 H10 H11 H12 H13 H14 H15 H16 H17 H18 H19
IIII I01 I02 I03 I04 I05 I06 I07 I08 I09 I10 I11 I12 I13 I14 I15 I16 I17 I18 I19
JJJJ J01 J02 J03 J04 J05 J06 J07 J08 J09 J10 J11 J12 J13 J14 J15 J16 J17 J18 J19
KKKK K01 K02 K03 K04 K05 K06 K07 K08 K09 K10 K11 K12 K13 K14 K15 K16 K17 K18 K19
LLLL L01 L02 L03 L04 L05 L06 L07 L08 L09 L10 L11 L12 L13 L14 L15 L16 L17 L18 L19
MMMM M01 M02 M03 M04 M05 M06 M07 M08 M09 M10 M11 M12 M13 M14 M15 M16 M17 M18 M19
NNNN N01 N02 N03 N04 N05 N06 N07 N08 N09 N10 N11 N12 N13 N14 N15 N16 N17 N18 N19
OOOO O01 O02 O03 O04 O05 O06 O07 O08 O09 O10 O11 O12 O13 O14 O15 O16 O17 O18 O19
PPPP P01 P02 P03 P04 P05 P06 P07 P08 P09 P10 P11 P12 P13 P14 P15 P16 P17 P18 P19
QQQQ Q01 Q02 Q03 Q04 Q05 Q06 Q07 Q08 Q09 Q10 Q11 Q12 Q13 Q14 Q15 Q16 Q17 Q18 Q19
RRRR R01 R02 R03 R04 R05 R06 R07 R08 R09 R10 R11 R12 R13 R14 R15 R16 R17 R18 R19
SSSS S01 S02 S03 S04 S05 S06 S07 S08 S09 S10 S11 S12 S13 S14 S15 S16 S17 S18 S19
TTTT T01 T02 T03 T04 T05 T06 T07 T08 T09 T10 T11 T12 T13 T14 T15 T16 T17 T18 T19


The output from the above job is

Code:

AAAABBBBCCCCDDDDEEEEFFFFGGGGHHHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTT
 A01 B01 C01 D01 E01 F01 G01 H01 I01 J01 K01 L01 M01 N01 O01 P01 Q01 R01 S01 T01
 A02 B02 C02 D02 E02 F02 G02 H02 I02 J02 K02 L02 M02 N02 O02 P02 Q02 R02 S02 T02
 A03 B03 C03 D03 E03 F03 G03 H03 I03 J03 K03 L03 M03 N03 O03 P03 Q03 R03 S03 T03
 A04 B04 C04 D04 E04 F04 G04 H04 I04 J04 K04 L04 M04 N04 O04 P04 Q04 R04 S04 T04
 A05 B05 C05 D05 E05 F05 G05 H05 I05 J05 K05 L05 M05 N05 O05 P05 Q05 R05 S05 T05
 A06 B06 C06 D06 E06 F06 G06 H06 I06 J06 K06 L06 M06 N06 O06 P06 Q06 R06 S06 T06
 A07 B07 C07 D07 E07 F07 G07 H07 I07 J07 K07 L07 M07 N07 O07 P07 Q07 R07 S07 T07
 A08 B08 C08 D08 E08 F08 G08 H08 I08 J08 K08 L08 M08 N08 O08 P08 Q08 R08 S08 T08
 A09 B09 C09 D09 E09 F09 G09 H09 I09 J09 K09 L09 M09 N09 O09 P09 Q09 R09 S09 T09
 A10 B10 C10 D10 E10 F10 G10 H10 I10 J10 K10 L10 M10 N10 O10 P10 Q10 R10 S10 T10
 A11 B11 C11 D11 E11 F11 G11 H11 I11 J11 K11 L11 M11 N11 O11 P11 Q11 R11 S11 T11
 A12 B12 C12 D12 E12 F12 G12 H12 I12 J12 K12 L12 M12 N12 O12 P12 Q12 R12 S12 T12
 A13 B13 C13 D13 E13 F13 G13 H13 I13 J13 K13 L13 M13 N13 O13 P13 Q13 R13 S13 T13
 A14 B14 C14 D14 E14 F14 G14 H14 I14 J14 K14 L14 M14 N14 O14 P14 Q14 R14 S14 T14
 A15 B15 C15 D15 E15 F15 G15 H15 I15 J15 K15 L15 M15 N15 O15 P15 Q15 R15 S15 T15
 A16 B16 C16 D16 E16 F16 G16 H16 I16 J16 K16 L16 M16 N16 O16 P16 Q16 R16 S16 T16
 A17 B17 C17 D17 E17 F17 G17 H17 I17 J17 K17 L17 M17 N17 O17 P17 Q17 R17 S17 T17
 A18 B18 C18 D18 E18 F18 G18 H18 I18 J18 K18 L18 M18 N18 O18 P18 Q18 R18 S18 T18
 A19 B19 C19 D19 E19 F19 G19 H19 I19 J19 K19 L19 M19 N19 O19 P19 Q19 R19 S19 T19
Back to top
View user's profile Send private message
Douglas Wilder

Active User


Joined: 28 Nov 2006
Posts: 305
Location: Deerfield IL

PostPosted: Wed Jan 14, 2009 4:18 am
Reply with quote

Is there a reason that the following 2 lines are duplicated?
Code:
//SYSIN    DD *
  IFTHEN=(WHEN=(81,4,ZD,EQ,02),OVERLAY=(05:1,4,01:04Z)),           
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Wed Jan 14, 2009 10:14 pm
Reply with quote

Douglas Wilder,

No specific reason. It was just an error when duplicating the control cards and I overlooked it. Sorry. Thanks for pointing out. I asked frank to edit my post to remove it.
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Thu Jan 29, 2009 3:55 am
Reply with quote

samuel_Inba,

Revisiting this thread for another application made me realize that you can get the desired results with just 1 one pass of data using new WHEN=GROUP function of DFSORT available with z/OS DFSORT V1R5 PTF UK90013 (July, 2008). If you don't have the July, 2008 PTF installed, ask your System Programmer to install it (it's free).

For complete details on the new WHEN=GROUP and the other new functions available with PTF UK90013, see:

Use [URL] BBCode for External Links


Code:

//STEP0100 EXEC PGM=ICEMAN         
//SYSOUT   DD SYSOUT=* 
//SORTIN   DD DSN=your 80 byte input file,
//            DISP=SHR             
//SORTOUT  DD SYSOUT=*   
//SYSIN    DD *   
  OPTION STOPAFT=20
  SORT FIELDS=COPY
  INREC IFTHEN=(WHEN=INIT,BUILD=(1601:1,80,SEQNUM,2,ZD)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,01),
  RECORDS=20,PUSH=(0001:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,02),
  RECORDS=19,PUSH=(0081:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,03),
  RECORDS=18,PUSH=(0161:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,04),
  RECORDS=17,PUSH=(0241:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,05),
  RECORDS=16,PUSH=(0321:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,06),
  RECORDS=15,PUSH=(0401:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,07),
  RECORDS=14,PUSH=(0481:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,08),
  RECORDS=13,PUSH=(0561:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,09),
  RECORDS=12,PUSH=(0641:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,10),
  RECORDS=11,PUSH=(0721:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,11),
  RECORDS=10,PUSH=(0801:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,12),
  RECORDS=09,PUSH=(0881:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,13),
  RECORDS=08,PUSH=(0961:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,14),
  RECORDS=07,PUSH=(1041:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,15),
  RECORDS=06,PUSH=(1121:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,16),
  RECORDS=05,PUSH=(1201:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,17),
  RECORDS=04,PUSH=(1281:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,18),
  RECORDS=03,PUSH=(1361:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,19),
  RECORDS=02,PUSH=(1441:1601,80)),
  IFTHEN=(WHEN=GROUP,BEGIN=(1681,2,ZD,EQ,20),
  RECORDS=01,PUSH=(1521:1601,80))

  OUTFIL REMOVECC,NODETAIL,BUILD=(80X),
  TRAILER1=(0001,4,0081,4,0161,4,0241,4,0321,4,
            0401,4,0481,4,0561,4,0641,4,0721,4,
            0801,4,0881,4,0961,4,1041,4,1121,4,
            1201,4,1281,4,1361,4,1441,4,1521,4,/,
            0005,4,0085,4,0165,4,0245,4,0325,4,
            0405,4,0485,4,0565,4,0645,4,0725,4,
            0805,4,0885,4,0965,4,1045,4,1125,4,
            1205,4,1285,4,1365,4,1445,4,1525,4,/,
            0009,4,0089,4,0169,4,0249,4,0329,4,   
            0409,4,0489,4,0569,4,0649,4,0729,4,   
            0809,4,0889,4,0969,4,1049,4,1129,4,   
            1209,4,1289,4,1369,4,1449,4,1529,4,/,
            0013,4,0093,4,0173,4,0253,4,0333,4,
            0413,4,0493,4,0573,4,0653,4,0733,4,
            0813,4,0893,4,0973,4,1053,4,1133,4,
            1213,4,1293,4,1373,4,1453,4,1533,4,/,
            0017,4,0097,4,0177,4,0257,4,0337,4,
            0417,4,0497,4,0577,4,0657,4,0737,4,
            0817,4,0897,4,0977,4,1057,4,1137,4,
            1217,4,1297,4,1377,4,1457,4,1537,4,/,
            0021,4,0101,4,0181,4,0261,4,0341,4,
            0421,4,0501,4,0581,4,0661,4,0741,4,
            0821,4,0901,4,0981,4,1061,4,1141,4,
            1221,4,1301,4,1381,4,1461,4,1541,4,/,
            0025,4,0105,4,0185,4,0265,4,0345,4,
            0425,4,0505,4,0585,4,0665,4,0745,4,
            0825,4,0905,4,0985,4,1065,4,1145,4,
            1225,4,1305,4,1385,4,1465,4,1545,4,/,
            0029,4,0109,4,0189,4,0269,4,0349,4,
            0429,4,0509,4,0589,4,0669,4,0749,4,
            0829,4,0909,4,0989,4,1069,4,1149,4,
            1229,4,1309,4,1389,4,1469,4,1549,4,/,
            0033,4,0113,4,0193,4,0273,4,0353,4,
            0433,4,0513,4,0593,4,0673,4,0753,4,
            0833,4,0913,4,0993,4,1073,4,1153,4,
            1233,4,1313,4,1393,4,1473,4,1553,4,/,
            0037,4,0117,4,0197,4,0277,4,0357,4,
            0437,4,0517,4,0597,4,0677,4,0757,4,
            0837,4,0917,4,0997,4,1077,4,1157,4,
            1237,4,1317,4,1397,4,1477,4,1557,4,/,
            0041,4,0121,4,0201,4,0281,4,0361,4,
            0441,4,0521,4,0601,4,0681,4,0761,4,
            0841,4,0921,4,1001,4,1081,4,1161,4,
            1241,4,1321,4,1401,4,1481,4,1561,4,/,
            0045,4,0125,4,0205,4,0285,4,0365,4,
            0445,4,0525,4,0605,4,0685,4,0765,4,
            0845,4,0925,4,1005,4,1085,4,1165,4,
            1245,4,1325,4,1405,4,1485,4,1565,4,/,
            0049,4,0129,4,0209,4,0289,4,0369,4,
            0449,4,0529,4,0609,4,0689,4,0769,4,
            0849,4,0929,4,1009,4,1089,4,1169,4,
            1249,4,1329,4,1409,4,1489,4,1569,4,/,
            0053,4,0133,4,0213,4,0293,4,0373,4,
            0453,4,0533,4,0613,4,0693,4,0773,4,
            0853,4,0933,4,1013,4,1093,4,1173,4,
            1253,4,1333,4,1413,4,1493,4,1573,4,/,
            0057,4,0137,4,0217,4,0297,4,0377,4,
            0457,4,0537,4,0617,4,0697,4,0777,4,
            0857,4,0937,4,1017,4,1097,4,1177,4,
            1257,4,1337,4,1417,4,1497,4,1577,4,/,
            0061,4,0141,4,0221,4,0301,4,0381,4,
            0461,4,0541,4,0621,4,0701,4,0781,4,
            0861,4,0941,4,1021,4,1101,4,1181,4,
            1261,4,1341,4,1421,4,1501,4,1581,4,/,
            0065,4,0145,4,0225,4,0305,4,0385,4,
            0465,4,0545,4,0625,4,0705,4,0785,4,
            0865,4,0945,4,1025,4,1105,4,1185,4,
            1265,4,1345,4,1425,4,1505,4,1585,4,/,
            0069,4,0149,4,0229,4,0309,4,0389,4,
            0469,4,0549,4,0629,4,0709,4,0789,4,
            0869,4,0949,4,1029,4,1109,4,1189,4,
            1269,4,1349,4,1429,4,1509,4,1589,4,/,
            0073,4,0153,4,0233,4,0313,4,0393,4,
            0473,4,0553,4,0633,4,0713,4,0793,4,
            0873,4,0953,4,1033,4,1113,4,1193,4,
            1273,4,1353,4,1433,4,1513,4,1593,4,/,
            0077,4,0157,4,0237,4,0317,4,0397,4,
            0477,4,0557,4,0637,4,0717,4,0797,4,
            0877,4,0957,4,1037,4,1117,4,1197,4,
            1277,4,1357,4,1437,4,1517,4,1597,4)
/*
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts To get the count of rows for every 1 ... DB2 3
No new posts Remote Unload of CLOB Columns DB2 6
No new posts Increase the number of columns in the... IBM Tools 3
No new posts Exclude rows with > than x occurre... DFSORT/ICETOOL 6
No new posts Convert single row multi cols to sing... DFSORT/ICETOOL 6
Search our Forums:

Back to Top