[Bulk] question on display of last entry field before calling subprogrm

[Ken Langendock]

Helen

 

This is because the field is not refreshed until after the Process procedure
is complete.

To force it before the subscreen is called, try

 

procedure process xservname

  begin

    display xservname 

      get strelatdsrv viaindex fyear_date using &

         xfyear, student_num of strelatdsrv, xfund_service

       run screen stgetabsence   mode f  passing strelatdsrv

  end

 

or you could define a silent field that calls the subscreen

 

temp t-silentfield

 

field xservname

field t-silentfield SILENT

 

procedure process xservname

  begin

      get strelatdsrv viaindex fyear_date using &

         xfyear, student_num of strelatdsrv, xfund_service

  end

 

procedure process t-silentfield

  begin

    run screen stgetabsence   mode f  passing strelatdsrv

  end

 

Ken

 

 

From: powerh-l-bounces+ken.langendock=rogers.com at lists.sowder.com
[mailto:powerh-l-bounces+ken.langendock=rogers.com at lists.sowder.com] On
Behalf Of Helen Wellcome
Sent: Friday, September 07, 2012 11:11 AM
To: powerh-l at lists.sowder.com
Subject: [Bulk] question on display of last entry field before calling
subprogrm

 

Last entry field of main screen not displaying right.

 

black is main screen, blue is subscreen

Field 05, if I key in art it shows but doesn't upshift to ART before
displaying subscreen.

Field 05, if I key in H for help, I get a subscreen of possible courses, I
select one and get the subscreen as below, 

        But field 05 is showing a blank instead of ART

 

The last thing I do after entering serv name is get the main record and call
the subscreen that will get the absences

 

procedure process xservname

  begin

      get strelatdsrv viaindex fyear_date using &

         xfyear, student_num of strelatdsrv, xfund_service

       run screen stgetabsence   mode f  passing strelatdsrv

  end

 

 

MODE:E ACTION:           * Student Related Services Attendance *

 

01 School Year       2012/13

02 Student#            1302311 SHIPP

03 Fund              A

04 Service           101

05 Related Serv Name art 

 

MODE:F ACTION:           * STUDENT SUPPLEMENTAL ATTENDANCE *

     Date      Day   Code      Date      Day   Code      Date      Day
Code

lqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq
qqqk

x01 09/10/12   MON   A     07                        13
x

x02 09/06/12   THU   A     08                        14
x

x03                        09                        15
x

x04                        10                        16
x

x05                        11                        17
x

x06                        12                        18
x

mqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq
qqqj

Option: D-n to delete line number n.

 

 

Helen Wellcome

 

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.sowder.com/pipermail/powerh-l/attachments/20120907/27a8e714/attachment-0001.htm>