RE: Clearing fields in a subfile control record.

My display file was set with SFLCLR as ind N63 and SFLDSPCTL as ind 63.
I went through and reversed the way I had my indicators and changed my
program to the way most have it setup.  

My problem still exist.  The first field in my SFLCTL will blank out
(position1), the other two fields (position2 & position3) remain as
entered.  Here's the kicker, the position2 field is entered left
justified, the program changes it to right justified.  The search works
fine, but when the window is redisplayed the program2 appears left
justified just as entered.  Debugging the program shows the program2
field right justified as required as I step through the program.

 
****************************************************
Randy Gevedon
Senior Programmer Analyst                                          

Henry County                                    
   Board of Commissioners                                      
140 Henry Parkway                                
McDonough, GA  30253
Ph: (770) 954-2400
Web: www.co.henry.ga.us
 
Seek to do less and accomplish more, achieve more.  
Doing is action, achievement is successful action.
 
****************************************************
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of
T.Bryant@xxxxxxxxxxxxxx
Sent: Thursday, August 05, 2004 7:03 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: Clearing fields in a subfile control record.

The first  #sflclr = *off; 
Should be  #sflclr = *on;
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Troy Bryant 
Analyst Programmer
Patrick Autocare.
Phone: +61 03 9926 9913
Fax: +61 03 9926 9977
Mobile: +61 0408 397 333
T.Bryant@xxxxxxxxxxxxxx




"Randy Gevedon" <rgevedon@xxxxxxxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
06/08/2004 06:39 AM
Please respond to RPG programming on the AS400 / iSeries

 
        To:     <rpg400-l@xxxxxxxxxxxx>
        cc: 
        Subject:        Clearing fields in a subfile control record.


I am having a problem with clearing the fields in my subfile control
record.  The control record has 3 fields for the street name, street
number and the street type used to reposition the file.  The program has
no problem clearing the first of the fields (street name) but the other
two fields will not blank out.  All fields are character fields.  Here
is the code that I am using to clear the control record.
 
        begsr @clear;
          CRRN = *zero;
          #sflclr = *off;
          #sfldsp = *off;
          position1 = *blanks;
          position2 = *blanks;
          position3 = *blanks;
          write wnflctl;
          #sflclr = *off;
        endsr;
 
Any help would be greatly appreciated.