× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



That makes sense.  Thank you.

Rob Berendt
-- 
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





Dave Murvin <davem@xxxxxxxx> 
Sent by: wdsci-l-bounces@xxxxxxxxxxxx
11/06/2004 01:05 PM
Please respond to
Websphere Development Studio Client for iSeries <wdsci-l@xxxxxxxxxxxx>


To
Websphere Development Studio Client for iSeries <wdsci-l@xxxxxxxxxxxx>
cc

Fax to

Subject
Re: [WDSCI-L] DDS7812-Subfile control record (SFLCTL keyword)   overlaps 
subfile record (SFL keyword).






I didn't think you could put a subfile in the middle of another record. As 

a quick test, just remove the function keys on line 20 and see if that 
helps.  The way I have always done it is to put the function keys on line 
20 into a separate "footer" record.  Then when I display the subfile I 
write the footer then exfmt the control record which overlays the function 

key footer.

At 09:38 AM 11/6/2004, you wrote:
>Been a long time since I did a screen from scratch...
>Started out with a new empty source member with CODE designer.  Subfile.
>One group.  Subfile control record and subfile record.  Pretty basic.
>Getting DDS7812 - Subfile control record (SFLCTL keyword) overlaps 
subfile
>record (SFL keyword).
>I don't see how.
>
>Source is as follows:
>      A*%%TS  DD  20041106  104818  Rob         REL-V5.0.1  WDSc
>      A*%%EC
>      A                                      DSPSIZ(24 80 *DS3)
>      A                                      REF(ROBSQLF/ORDERSVIEW
>ORDERSVIEW)
>      A          R RECORD1
>      A*%%TS  DD  20041106  104818  Rob         REL-V5.0.1  WDSc
>      A                                      SFL
>      A            NAME      R        O  6  2REFFLD(NAME)
>      A            ZIP       R        O  6 33REFFLD(ZIP)
>      A            ITEMOUT        8   O  6 44
>      A            DATEDUE   R        O  6 53REFFLD(DATEDUE)
>      A                                      DATFMT(*MDY)
>      A            QTYSHIPPED     5   O  6 62
>      A            STATE     R        B  6 68REFFLD(STATE)
>      A*%%GP SCREEN1    01
>      A          R RECORD1CTL
>DDS7812S Subfile control record (SFLCTL keyword) overlaps subfile record
>(SFL keyword).
>      A*%%TS  DD  20041106  104818  Rob         REL-V5.0.1  WDSc
>      A                                      SFLCTL(RECORD1)
>      A                                      SFLDSPCTL
>      A                                      SFLDSP
>      A                                      SFLPAG(6)
>      A                                      SFLSIZ(6)
>      A                                      CF03(03 'F3=Exit')
>      A                                      CF07(07 'F7=Name')
>      A                                      CF08(08 'F8=Zip')
>      A                                      CF09(09 'F9=Item')
>      A                                      CF10(10 'F10=Due Date')
>      A                                      CF11(11 'Qty Shipped')
>      A                                      CF13(13 'State')
>      A                                  4  2'Customer'
>      A                                  5  2'Name'
>      A                                  5 33'Zip'
>      A                                  5 44'Item'
>      A                                  4 54'Date'
>      A                                  5 54'Due'
>      A                                  4 64'Qty'
>      A                                  5 62'Shipd'
>      A                                  5 68'St'
>      A            FIELD1          L  B  1 70
>      A            FIELD2          T  B  2 70
>      A                                  1  2USER
>      A                                  2  2SYSNAME
>      A                                  2 36'Open Orders'
>      A                                 20  4'F3=Exit'
>      A                                 20 13'F7=Name'
>      A                                 20 22'F8=Zip'
>      A                                 20 39'F10=Date Due'
>      A                                 20 53'F11=Qty Shipped'
>      A                                 20 30'F9=Item'
>      A                                 20 70'F13=State'
>      A*%%GP SCREEN1    02

Dave Murvin
DRM Enterprises, Inc.


_______________________________________________
This is the Websphere Development Studio Client for iSeries  (WDSCI-L) 
mailing list
To post a message email: WDSCI-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/wdsci-l
or email: WDSCI-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/wdsci-l.


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.