Mixing display sizes

JohnGalt1776

Code400 Newbie

Join Date: Jan 2015

Posts: 1
- Share
- Tweet
#1

Mixing display sizes

September 4, 2015, 11:16 AM

Why oh why does SCR002 give CPD7812, Subfile control record overlaps subfile record, while SCR001 does not? Note that both control records extend past column 80, and both subfiles for both control records are defined as beginning on the line immediately following the last line in the control record. Maddening!

PHP Code:

110 A********************************************************************** 10/05/09 120 A*%%EC 09/04/15 130 A DSPSIZ(27 132 *WIDE - 09/04/15 140 A 24 80 *NORMAL) 09/04/15 150 A REF(*LIBL/FLDREF) 09/04/15 160 A INDARA 09/04/15 170 A PRINT 09/04/15 180 A* 12/28/10 190 A R SFILE SFL 08/09/11 200 A*%%TS SD 20110809 144026 REL-V7R1M0 5770-WDS 08/09/11 210 A STATUS R H REFFLD(EMSTAT) 08/09/11 220 A SFMAKE R H REFFLD(EMMAKE) 08/09/11 230 A SFMODL R H REFFLD(EMMODL) 08/09/11 240 A CCDESC R H REFFLD(ECDESC) 08/09/11 250 A SHUPTP 1A H 08/09/11 260 A SHPSBY 10A H 08/09/11 270 A SHUPDT 6 0H 08/09/11 280 A SHUPBY 10 H 08/09/11 290 A POSTDATE 8S 0H 08/09/11 300 A* 01/17/11 310 A SFOPT 2Y 0B 10 2EDTCDE(Z) 08/09/11 320 A VALUES(0 1 2 3 4 6 7 8 9 10 19) 08/09/11 330 A SFEQP# R O 10 5REFFLD(EMEQP#) 08/09/11 340 A SFCATG R O 10 16REFFLD(EMCATG) 08/09/11 350 A SFCLAS R O 10 20REFFLD(EMCLAS) 08/09/11 360 A SFDESC 55A O 10 25 08/09/11 370 A SFMODY R O 10 81REFFLD(EMMODY) 08/09/11 380 A SFPSDT 6Y 0O 10 84EDTWRD(' / / ') 08/09/11 Data Description Source SEQNBR *...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 Date 390 A SFSTAT 12A O 10 93 08/09/11 400 A SFCLOC R O 10106REFFLD(EMCLOC) 08/09/11 410 A SFALOC R O 10110REFFLD(EMALOC) 08/09/11 420 A SFST 2A O 10114 08/09/11 430 A SFDAYS 4Y 0O 10117EDTCDE(4) 08/09/11 440 A SFLSRV 6Y 0O 10122EDTWRD(' / / ') 08/09/11 450 A* 12/28/10 460 A R SCR001 SFLCTL(SFILE) 05/09/11 470 A CHGINPDFT 05/09/11 480 A *WIDE SFLSIZ(9999) 07/11/11 490 A *NORMAL SFLSIZ(9999) 07/11/11 500 A *WIDE SFLPAG(0014) 05/09/11 510 A *NORMAL SFLPAG(0003) 05/09/11 520 A CA03 05/09/11 530 A CA06 05/09/11 540 A CF07 05/09/11 550 A CF08 05/09/11 560 A CF10 06/06/11 570 A CF12 05/09/11 580 A CF23 05/09/11 590 A OVERLAY 05/09/11 600 A RTNCSRLOC(&CURREC &CURFLD &CURPOS) 05/09/11 610 A CSRLOC(ROW COL) 05/09/11 620 A 55 SFLDSP 05/09/11 630 A N50 SFLDSPCTL 05/09/11 640 A 50 SFLCLR 05/09/11 650 A 91 SFLEND(*MORE) 05/09/11 660 A SFLCSRRRN(&CURRRN) 05/09/11 670 A SHREC# 4S 0H SFLRCDNBR 05/09/11 680 A CURRRN 5S 0H 05/09/11 690 A CURREC 10A H 05/09/11 700 A CURFLD 10A H 05/09/11 710 A CURPOS 4S 0H 05/09/11 720 A ROW 3Y 0H 05/09/11 730 A COL 3Y 0H 05/09/11 740 A 1 2DATE 05/09/11 750 A EDTCDE(Y) 05/09/11 760 A 1 12TIME 05/09/11 770 A 45 1 62' ' 05/09/11 * CPD7865-****** 780 A DSPATR(HI) 05/09/11 790 A N45 1 51' My Manually Posted' 05/09/11 800 A DSPATR(HI) 05/09/11 810 A 1116'Sys:' 05/09/11 820 A SYSTEM 8A O 1121DSPATR(HI) 05/09/11 830 A 45 STSMOD 41A O 2 46DSPATR(RI) 07/20/11 840 A 2116'Cmp:' 05/09/11 850 A SCCMP R O 2121REFFLD(CMP) 05/09/11 860 A DSPATR(HI) 05/09/11 870 A 2124'Loc:' 05/09/11 880 A SCLOC R O 2129REFFLD(LOC) 05/09/11 890 A DSPATR(HI) 05/09/11 900 A 45 3116'Mode' 07/15/11 Data Description Source SEQNBR *...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 Date 910 A 45 LOCMOD 11A O 3121DSPATR(HI) 07/15/11 920 A 5 2'Type option, press Enter to contin- 05/09/11 930 A ue.' 05/09/11 940 A SCOPTL 130A O 6 2COLOR(BLU) 05/09/11 950 A SCEQP# 10A B 8 5DSPATR(CS) 05/09/11 960 A DSPATR(UL) 05/09/11 970 A SCCATG 3Y 0B 8 16EDTCDE(4) 05/09/11 980 A DSPATR(UL) 05/09/11 990 A DSPATR(CS) 05/09/11 1000 A SCCLAS 4Y 0B 8 20EDTCDE(4) 05/09/11 1010 A DSPATR(UL) 05/09/11 1020 A DSPATR(CS) 05/09/11 1030 A SCDESC 55A B 8 25DSPATR(CS) 05/09/11 1040 A DSPATR(UL) 05/09/11 1050 A SCMODY 2D B 8 81DSPATR(UL) 05/09/11 1060 A DSPATR(CS) 05/09/11 1070 A SCTSTS 1A B 8 93DSPATR(CS) 05/09/11 1080 A DSPATR(UL) 05/09/11 1090 A SCTSTD 10A O 8 95 05/09/11 1100 A SCCLOC R B 8106REFFLD(EMCLOC) 05/09/11 1110 A DSPATR(CS) 05/09/11 1120 A DSPATR(UL) 05/09/11 1130 A SCALOC R B 8110REFFLD(EMCLOC) 05/09/11 1140 A DSPATR(UL) 05/09/11 1150 A DSPATR(CS) 05/09/11 1160 A SCST 2A B 8114DSPATR(CS) 05/09/11 1170 A DSPATR(UL) 05/09/11 1180 A SCRVDT 6Y 0B 8122EDTWRD(' / / ') 05/09/11 1190 A DSPATR(CS) 05/09/11 1200 A DSPATR(UL) 05/09/11 1210 A 9 2'Op' 05/09/11 1220 A DSPATR(HI) 05/09/11 1230 A DSPATR(UL) 05/09/11 1240 A 9 5'Equip # ' 05/09/11 1250 A DSPATR(HI) 05/09/11 1260 A DSPATR(UL) 05/09/11 1270 A 9 16'Cat' 05/09/11 1280 A DSPATR(HI) 05/09/11 1290 A DSPATR(UL) 05/09/11 1300 A 9 20'Clas' 05/09/11 1310 A DSPATR(HI) 05/09/11 1320 A DSPATR(UL) 05/09/11 1330 A 9 25'Make/Model/Description - 05/09/11 1340 A ' 05/09/11 1350 A DSPATR(UL) 05/09/11 1360 A DSPATR(HI) 05/09/11 1370 A 9 81'Yr' 05/09/11 1380 A DSPATR(HI) 05/09/11 1390 A DSPATR(UL) 05/09/11 1400 A 9 84'Post Dte' 05/09/11 1410 A DSPATR(UL) 05/09/11 1420 A DSPATR(HI) 05/09/11 1430 A 9 93'Status ' 05/09/11 Data Description Source SEQNBR *...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 Date 1440 A DSPATR(HI) 05/09/11 1450 A DSPATR(UL) 05/09/11 1460 A 9106'Cur' 05/09/11 1470 A DSPATR(HI) 05/09/11 1480 A DSPATR(UL) 05/09/11 1490 A 9110'Asn' 05/09/11 1500 A DSPATR(HI) 05/09/11 1510 A DSPATR(UL) 05/09/11 1520 A 9114'ST' 05/09/11 1530 A DSPATR(UL) 05/09/11 1540 A DSPATR(HI) 05/09/11 1550 A 9117'Days' 05/09/11 1560 A DSPATR(UL) 05/09/11 1570 A DSPATR(HI) 05/09/11 1580 A 9122'Last Rev' 05/09/11 1590 A DSPATR(HI) 05/09/11 1600 A DSPATR(UL) 05/09/11 1610 A R SFILE2 SFL 09/04/15 1620 A*%%TS SD 20150904 123908 REL-V7R1M0 5770-WDS 09/04/15 1630 A SHCLAS R H REFFLD(EMCLAS) 09/04/15 1640 A SHARGN R H REFFLD(ZLARGN) 09/04/15 1650 A SHDIST R H REFFLD(ZLDIST) 09/04/15 1660 A SHPMKC 4A H 09/04/15 1670 A SHIRGN R H REFFLD(ZLARGN) 09/04/15 1680 A SHGRP 3A H 09/04/15 1690 A* 05/10/11 1700 A SFOPT2 2Y 0B 8 2EDTCDE(Z) 09/04/15 1710 A VALUES(0 1) 09/04/15 1720 A SFEQP2 R O 8 5REFFLD(EMEQP#) 09/04/15 1730 A SFTYPE R O 8 16REFFLD(EMTYPE) 09/04/15 1740 A SFGLTY R O 8 18REFFLD(EMGLTY) 09/04/15 1750 A SFCAT2 R O 8 20REFFLD(EMCATG) 09/04/15 1760 A SFDES2 55A O 8 24 09/04/15 1770 A SFMYR2 R O 8 80REFFLD(EMMODY) 09/04/15 1780 A SFLTDT 6Y 0O 8 83EDTWRD(' / / ') 09/04/15 1790 A SFSTA2 12A O 8 92 09/04/15 1800 A SFCLC2 R O 8105REFFLD(EMCLOC) 09/04/15 1810 A SFALC2 R O 8109REFFLD(EMALOC) 09/04/15 1820 A SFST2 2A O 8113 09/04/15 1830 A SFCOMM 15A O 8116 09/04/15 1840 A* 05/10/11 1850 A R SCR002 SFLCTL(SFILE2) 05/10/11 * CPD7812-********** 1860 A CHGINPDFT 05/10/11 1870 A *WIDE SFLSIZ(9999) 07/11/11 1880 A *NORMAL SFLSIZ(9999) 07/11/11 1890 A *WIDE SFLPAG(0014) 05/10/11 1900 A *NORMAL SFLPAG(0003) 05/10/11 1910 A CA03 05/10/11 1920 A CF12 05/10/11 1930 A OVERLAY 05/10/11 1940 A RTNCSRLOC(&CURREC &CURFLD &CURPOS) 05/10/11 1950 A CSRLOC(ROW COL) 05/10/11 Data Description Source SEQNBR *...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 Date 1960 A 66 SFLDSP 05/10/11 1970 A N60 SFLDSPCTL 05/10/11 1980 A 60 SFLCLR 05/10/11 1990 A 92 SFLEND(*MORE) 05/10/11 2000 A SFLCSRRRN(&CURRRN) 05/10/11 2010 A SHREC2 4S 0H SFLRCDNBR 05/10/11 2020 A CURRRN 5S 0H 05/10/11 2030 A CURREC 10A H 05/10/11 2040 A CURFLD 10A H 05/10/11 2050 A CURPOS 4S 0H 05/10/11 2060 A ROW 3Y 0H 05/10/11 2070 A COL 3Y 0H 05/10/11 2080 A 1 2DATE 05/10/11 2090 A EDTCDE(Y) 05/10/11 2100 A 1 12TIME 05/10/11 2110 A 1 52'Manually Post Asset to ' 05/10/11 2120 A DSPATR(HI) 05/10/11 2130 A 1116'Sys:' 05/10/11 2140 A SYSTEM 8A O 1121DSPATR(HI) 05/10/11 2150 A 2116'Cmp:' 05/10/11 2160 A SCCMP R O 2121REFFLD(CMP) 05/10/11 2170 A DSPATR(HI) 05/10/11 2180 A 2124'Loc:' 05/10/11 2190 A SCLOC R O 2129REFFLD(LOC) 05/10/11 2200 A DSPATR(HI) 05/10/11 2210 A* 3116'Mode' 07/15/11 2220 A* LOCMOD 11A O 3121DSPATR(HI) 07/15/11 2230 A 4 2'Type option, press Enter to contin- 05/10/11 2240 A ue:' 05/10/11 2250 A 5 5'1=Post' 05/10/11 2260 A COLOR(BLU) 05/10/11 2270 A SCEQP2 10A B 6 5DSPATR(CS) 05/10/11 2280 A DSPATR(UL) 05/10/11 2290 A* SCTYPE 1A B 6 16DSPATR(CS) 05/10/11 2300 A* DSPATR(UL) 05/10/11 2310 A SCGLTY 1A B 6 18DSPATR(CS) 05/10/11 2320 A DSPATR(UL) 05/10/11 2330 A SCCAT2 3Y 0B 6 20EDTCDE(4) 05/10/11 2340 A DSPATR(UL) 05/10/11 2350 A DSPATR(CS) 05/10/11 2360 A SCDES2 55A B 6 24DSPATR(CS) 05/10/11 2370 A DSPATR(UL) 05/10/11 2380 A SCYER2 2D B 6 80DSPATR(UL) 05/10/11 2390 A DSPATR(CS) 05/10/11 2400 A SCLTDT 6Y 0B 6 83EDTWRD(' / / ') 05/10/11 2410 A DSPATR(CS) 05/10/11 2420 A DSPATR(UL) 05/10/11 2430 A SCTST2 1A B 6 92DSPATR(CS) 05/10/11 2440 A DSPATR(UL) 05/10/11 2450 A SCTSTD2 10A O 6 94 05/10/11 2460 A* SCCLC2 R B 6105REFFLD(EMCLOC) 05/10/11 2470 A* DSPATR(CS) 05/10/11 2480 A* DSPATR(UL) 05/10/11 Data Description Source SEQNBR *...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 Date 2490 A SCALC2 R B 6109REFFLD(EMCLOC) 05/10/11 2500 A DSPATR(UL) 05/10/11 2510 A DSPATR(CS) 05/10/11 2520 A SCST2 2A B 6113DSPATR(CS) 05/10/11 2530 A DSPATR(UL) 05/10/11 2540 A SCCOMM 15A B 6116DSPATR(CS) 05/10/11 2550 A DSPATR(UL) 05/10/11 2560 A 7 2'Op' 05/10/11 * CPD7866-****** 2570 A DSPATR(HI) 05/10/11 2580 A DSPATR(UL) 05/10/11 2590 A 7 5'Equip # ' 05/10/11 2600 A DSPATR(HI) 05/10/11 2610 A DSPATR(UL) 05/10/11 2620 A 7 16'Typ' 05/10/11 2630 A DSPATR(UL) 05/10/11 2640 A DSPATR(HI) 05/10/11 2650 A 7 20'Cat' 05/10/11 2660 A DSPATR(HI) 05/10/11 2670 A DSPATR(UL) 05/10/11 2680 A 7 24'Make/Model/Description - 05/10/11 2690 A ' 05/10/11 2700 A DSPATR(UL) 05/10/11 2710 A DSPATR(HI) 05/10/11 2720 A 7 80'Yr' 05/10/11 2730 A DSPATR(HI) 05/10/11 2740 A DSPATR(UL) 05/10/11 2750 A 7 83'Lst/ Est' 05/10/11 2760 A DSPATR(UL) 05/10/11 2770 A DSPATR(HI) 05/10/11 2780 A 7 92'Status ' 05/10/11 2790 A DSPATR(HI) 05/10/11 2800 A DSPATR(UL) 05/10/11 2810 A 7105'Cur' 05/10/11 2820 A DSPATR(HI) 05/10/11 2830 A DSPATR(UL) 05/10/11 2840 A 7109'Asn' 05/10/11 2850 A DSPATR(HI) 05/10/11 2860 A DSPATR(UL) 05/10/11 2870 A 7113'ST' 05/10/11 2880 A DSPATR(UL) 05/10/11 2890 A DSPATR(HI) 05/10/11 2900 A 7116'Equip Comment ' 05/10/11 2910 A DSPATR(HI) 05/10/11 2920 A DSPATR(UL) 05/10/11 2930 A* 05/13/11 2940 A R DSP80 01/21/11 2950 A DSPMOD(*NORMAL) 12/28/10 * * * * * E N D O F S O U R C E * * * * * Messages ID Severity Number * CPD7812 30 1 Message . . . . : Subfile control record overlaps subfile record. * CPD7865 10 1 Message . . . . : Field overlaps one or more fields in record. * CPD7866 10 1 Message . . . . : Field overlaps another field with no conditions specified. Message Summary Total Informational Warning Error Severe (0-9) (10-19) (20-29) (30-99) 3 0 2 0 1 * CPF7302 40 Message . . . . : File DSPFILTST not created in library XXXXXX. * * * * * E N D O F C O M P I L A T I O N * * * * *
Tags: None

Previous template Next

Announcement

Mixing display sizes