This is a multi-part message in MIME format.
--
[ Picked text/plain from multipart/alternative ]
I’m having a problem verifying several members even though I’m refreshing
the cache.  Almost all programs verify without any problem.  The verify
listing picks up the display file format names but none of the fields are
included (the display file is normal).  The programs in question verify on
V5R1 WDT/400 (another machine) and compile on the V5R1 iSeries.  I’ve
cleared the CACHE directory and rebooted; no joy.  I’ve created a new
program with the display file statement as the only statement and verify on
the “program” blows up with the “communications failure” throwaway message.
Then I verifies without using the cache; it worked.  Then I verified again
with cache and it worked.  Now for the money shot: I try the original
program again, and it still can’t handle the display file.

I’m open to suggestions…the “other machine” is my laptop and it doesn’t have
a 21” monitor so I’m not using it…

Thanks,
Reeve

After the usual e-mail profile issues in posting this message, I’ve
determined MAXDEV(*FILE) is the culprit.  Comment it out and it works fine…

Environment: WDSc V5R1, current SP; Win 2K, current SP.




 000017 Fnod010    cf   e             workstn
000017
 000018 F                                     maxdev(*file)
000018
 000019 F                                     sfile(r010d80:s80rrn)
000019
 000020
000020

*---------------------------------------------------------------------------
-----------------*
         *                               RPG name         External name
*
         * File name. . . . . . . . . :  NOD010           LTL400V372/
*
         * Record format(s) . . . . . :  R010D01          R010D01
*
         *                               R010D01H         R010D01H
*
         *                               R010D02          R010D02
*
         *                               R010D02H         R010D02H
*
         *                               R010D80          R010D80
*
         *                               R010D81          R010D81
*
         *                               R010D81H         R010D81H
*
         *                               R010D82          R010D82
*
         *                               R010D83          R010D83
*
         *                               R010D98          R010D98
*
         *                               R010D99          R010D99
*

*---------------------------------------------------------------------------
-----------------*
<VB snip>
 000001=IR010D01
40000001

*---------------------------------------------------------------------------
-----------------*                    40
         * RPG record format  . . . . :  R010D01
 *                    40
         * External format  . . . . . :  R010D01 : LTL400V372/
*                    40
         * Format text  . . . . . . . :  Quotation prompt
*                    40

*---------------------------------------------------------------------------
-----------------*                    40
 000001=IR010D01H
41000001

*---------------------------------------------------------------------------
-----------------*                    41
         * RPG record format  . . . . :  R010D01H
*                    41
         * External format  . . . . . :  R010D01H : LTL400V372/
*                    41
         * Format text  . . . . . . . :  Quotation prompt help
*                    41

*---------------------------------------------------------------------------
-----------------*                    41
 000001=IR010D02
42000001

*---------------------------------------------------------------------------
-----------------*                    42
         * RPG record format  . . . . :  R010D02
*                    42
         * External format  . . . . . :  R010D02 : LTL400V372/
*                    42
         * Format text  . . . . . . . :  Freight bill basic data
*                    42

*---------------------------------------------------------------------------
-----------------*                    42
 000001=IR010D02H
43000001

*---------------------------------------------------------------------------
-----------------*                    43
         * RPG record format  . . . . :  R010D02H
*                    43
         * External format  . . . . . :  R010D02H : LTL400V372/
*                    43
         * Format text  . . . . . . . :  Quotation basic data help
*                    43

*---------------------------------------------------------------------------
-----------------*                    43
 000001=IR010D80
44000001

*---------------------------------------------------------------------------
-----------------*                    44
         * RPG record format  . . . . :  R010D80
*                    44
         * External format  . . . . . :  R010D80 : LTL400V372/
*                    44

*---------------------------------------------------------------------------
-----------------*                    44
 000001=IR010D81
45000001

*---------------------------------------------------------------------------
-----------------*                    45
         * RPG record format  . . . . :  R010D81
*                    45
         * External format  . . . . . :  R010D81 : LTL400V372/
*                    45

*---------------------------------------------------------------------------
-----------------*                    45
 000001=IR010D81H
46000001

*---------------------------------------------------------------------------
-----------------*                    46
         * RPG record format  . . . . :  R010D81H
*                    46
         * External format  . . . . . :  R010D81H : LTL400V372/
*                    46

*---------------------------------------------------------------------------
-----------------*                    46
 000001=IR010D82
47000001

*---------------------------------------------------------------------------
-----------------*                    47
         * RPG record format  . . . . :  R010D82
*                    47
         * External format  . . . . . :  R010D82 : LTL400V372/
*                    47

*---------------------------------------------------------------------------
-----------------*                    47
 000001=IR010D83
48000001

*---------------------------------------------------------------------------
-----------------*                    48
         * RPG record format  . . . . :  R010D83
*                    48
         * External format  . . . . . :  R010D83 : LTL400V372/
*                    48

*---------------------------------------------------------------------------
-----------------*                    48
 000001=IR010D98
49000001

*---------------------------------------------------------------------------
-----------------*                    49
         * RPG record format  . . . . :  R010D98
*                    49
         * External format  . . . . . :  R010D98 : LTL400V372/
*                    49
         * Format text  . . . . . . . :  Message subfile
*                    49

  Send subfile message prototype
 IBM WebSphere Development Studio Client for iSeries             NOR010
10/16/2002 02:22:02pm           41

 Line   <---------------------- Source
Specifications ----------------------------><---- Comments ----> Do  Page
Change Src Seq
 Number
....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8.
...+....9....+...10 Num Line  Date   Id  Number

*---------------------------------------------------------------------------
-----------------*                    49
--




As an Amazon Associate we earn from qualifying purchases.

This thread ...


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

This mailing list archive is Copyright 1997-2022 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.