Re: DSPF with lots of record formats

[Booth Martin <booth@xxxxxxxxxxxx>]

I'd be thinking along the lines of an additional counter field in each 
record format that is output with the default next-record format number, 
and can be changed by the user when there can be more than one 
next-format choice.

  dow wEOJ = *off;
  select;
  when lastfmt = 1;
   exsr step1;
  when lastfmt = 2;
   exsr step2;
   ...
  other;
   exsr ???;
  endsl;

each exsr would process the format, then update "lastfmt" with "nextfmt" 
and then finally exfmt the desired next format.  The counter field could 
serve other purposes I suppose?  Counter = 99 could be eoj, Counter = 90 
could be "start over" Counter = 911 could be "This item needs clean-up" 
or, or, and or?


On 12/11/2012 4:17 PM, JackTucky wrote:
> I'm writing an application for RF scanners with 5250 emulation on the
> warehouse floor.  It  will be used for recording physical inventory.
>
>
>
> Most of the record formats have one field.  The user progresses through the
> record formats by scanning, some keyboard input, and I finally write a row
> to the DB.
>
>
>
> Some of the record formats will have an option to go back several screens,
> for instance they are done scanning upc's, and need to go back and scan a
> new location.  CF03 will always be available  to let them exit.
>
>
>
> In the past, I've done the screen progression with multiple DOW, like this:
>
>
>
> Dow *inkc = *off
>
> Exfmt scn01
>
>
>
> If physical#  > 0
>
> Dow *inkc = *off
>
> Exfmt scn02
>
> Enddo
>
> Enddo
>
>
>
> But with over 10 record formats, that many nested loops gets crappy.  And I
> don't have an easy way to drop back a certain# of screens.
>
>
>
> I need an easy way to move forward and back.  WDYT?
>
>
>
> Thanks, Jack