RE: -- MIDRANGE-L

Is the field in question part of a data structure? Overlaid fields in a data 
structure will sometimes cause behavior.

-----Original Message-----
From:   Wendy Chandler [SMTP:wchandle@golden.net]
Sent:   Wednesday, March 25, 1998 2:56 PM
To:     MIDRANGE-L@midrange.com
Subject:        

We have a reoccuring problem. We use RPG/400 on V3R2.  We've been coding RPG
for > 10 years....

Using interactive debug, we see fields being populated properly. We break at
the write (to a physical file) and one of the fields is blank.  Nowhere in
the code is this field being updated between the population and the write.  

Any suggestions ??

Thanks,
wendy

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---

begin 600 WINMAIL.DAT
M>)\^(A46`0:0" `$```````!``$``0>0!@`(````Y 0```````#H``$(@ <`
M& ```$E032Y-:6-R;W-O9G0@36%I;"Y.;W1E`#$(`0V ! `"`````@`"``$$
MD 8`P $```$````0`````P``, (````+``\.``````(!_P\!````30``````
M``"!*Q^DOJ,0&9UN`-T!#U0"`````$U)1%)!3D=%+4Q ;6ED<F%N9V4N8V]M
M`%--5% `34E$4D%.1T4M3$!M:61R86YG92YC;VT`````'@`", $````%````
M4TU44 `````>``,P`0```!@```!-241204Y'12U,0&UI9')A;F=E+F-O;0`#
M`!4,`0````,`_@\&````'@`!, $````:````)TU)1%)!3D=%+4Q ;6ED<F%N
M9V4N8V]M)P````(!"S !````'0```%--5% Z34E$4D%.1T4M3$!-241204Y'
M12Y#3TT``````P``.0`````+`$ Z`0```!X`]E\!````& ```$U)1%)!3D=%
M+4Q ;6ED<F%N9V4N8V]M``(!]U\!````30````````"!*Q^DOJ,0&9UN`-T!
M#U0"`````$U)1%)!3D=%+4Q ;6ED<F%N9V4N8V]M`%--5% `34E$4D%.1T4M
M3$!M:61R86YG92YC;VT``````P#]7P$````#`/]?``````(!]@\!````! ``
M``````*Y6 $$@ $`!0```%)%.B `\0`!!8 #``X```#.!P,`&0`5`"@`$@`#
M`$,!`2" `P`.````S@<#`!D`%0`G``H``P`Z`0$)@ $`(0```# R,49$0D4V
M031#,D0Q,3$Y.# S,# X,#(Y-CDS.4-%``4'`0.0!@!T!@``(0````L``@`!
M````"P`C```````#`"8```````L`*0```````P`N```````#`#8``````$ `
M.0``O;J#8%B]`1X`< `!````!0```%)%.B ``````@%Q``$````6`````;U8
M8(-WYML?`\*D$=&8`P" *6DYS@``'@`># $````%````4TU44 `````>`!\,
M`0```!$```!W:F]H;G-O;D!D9&,N8V]M``````,`!A G9Y+>`P`'$.$"```>
M``@0`0```&4```!)4U1(149)14Q$24Y154535$E/3E!!4E1/1D%$051!4U12
M54-455)%/T]615),04E$1DE%3$1324Y!1$%405-44E5#5%5215=)3$Q33TU%
M5$E-15-#055314)%2$%624]2+2TM``````(!"1 !````:0,``&4#```/!0``
M3%I&=>O":D5W``H!`P'W( *D`^,"`&.": K <V5T," '$X<"@P!0#O9P<G$R
M#_9R?0J!=6,`4 L#"V!N(&<Q,#,S"Z8@24$$('1H92!F")!L)&0@"X @<0I0
M<W0::0(@( JQ!4!O9B!082!D80&0(!40<@420'0(<&4_($]V?P20"V$4D!13
M!" 4L17^('4#\&P#(',#< _ !W-C1&%U#[ @8F4/@'9Y%3!R+@JB"H0*@@-@
M=(4%D'00A#$V("T=`GI/!1!G"X '0 70!Y!S^&%G91T#&YP!0 L$'!8@:2TQ
M-#0!0&QI1R"C#- @HV(@1@-A.A4,@V(/X%<)\&1Y(!9##X BX&P$D"!;4V!-
M5% Z=P]Q(U) 1F<&\ $`;BYN#\!=7QLU(= &8 (P(CED)1!S.180>2P%T K 
M#W @,D(U)T Q.3DX)[ ZDC4<X%!-)5=4;R(W`$U)1%)!3D=%4"U,0&T7<'(2
MX66*+@6@;258=6)J'$&_(C8>KQ^["\4;0R+ (!K!QQ0P%? )<&]C8PAQ$O!'
M%6 #8 )@96TN(K$@X1IB4E!'+R# #^ 50;!6,U(R,5 BL2<OX?\:H GP&C $
M<#"B,>$;- (0307 /B?P#^!Y90^1+OLUD1LZ50"0,+$+@!PP*N"-%J!I+^$!
M`&)U9R= ?G<4, ^P%#4$(!J@,*-OO'!U"V <,!20' %P%S'*>3%38@EP86L8
M,!Q@&QM#%!)W!1 <," H=.)O&#%P:'D`D!I `R#[%% C<"D8,"+@,E$4,!7!
M+Q07%_$XX1+1:S+13F_^=Q0@&2$+@3MG,[% $1/RYS\!%%0Y!'5P%A$YT1J@
M_G0X(#.!%!(Y914R/:([M],RT1LZ06XC`',WX!XP4Q43!" _/QLZ5",Q:[QS
M+!LT." BX1LZ*QYWWGPI0$&"04,4,$TJQ08`NSS0'#!M)U$#$#"B3 0`W'0A
M2C<\<$9P8BJP!4#_%? E$ ?@!X$>$B= #[ ]L?YY"&%.L$R!% `\<"H/*Q3[
M&R5-HW4`@"P0!/(:H!1 ?P-A060@\!403T0Q,% /+6!53E-50E$?2F-1<Q3U
M!"!S: A@0?,6`&G_"7 6H#G1/&$4$E0#/\ E$-QR+SHB%B %L#H6`1K@7F0J
MKTG:&S02`0!=X ````,`$! ``````P`1$ `````#`( 0_____T `!S" G^]:
M8%B]`4 `"#" G^]:8%B]`0L``( (( 8``````, ```````!&``````.%````
M`````P`"@ @@!@``````P ```````$8`````$(4````````#``6 "" &````
M``# ````````1@````!2A0``MPT``!X`)8 (( 8``````, ```````!&````
M`%2%```!````! ```#@N, `#`": "" &``````# ````````1@`````!A0``
M``````L`+X (( 8``````, ```````!&``````Z%`````````P`P@ @@!@``
M````P ```````$8`````$84````````#`#* "" &``````# ````````1@``
M```8A0```````!X`08 (( 8``````, ```````!&`````#:%```!`````0``
M```````>`$* "" &``````# ````````1@`````WA0```0````$`````````
M'@!#@ @@!@``````P ```````$8`````.(4```$````!`````````!X`/0`!
9````!0```%)%.B ``````P`--/TW```N<84`
`
end

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---