RE: Techniques for variable field types in a subfile

["Schlemme, Michael C." <mschlemme@xxxxxxxxxxx>]

Title: RE: Techniques for variable field types in a subfile

Correction

I forgot the fillers to space out the line, sorry !!!!

Subfile line layout

Name                              Number           Department                                           Date
John Doe                         123-4567         Whatever                                            01/01/99
XXXXXXXXXXXXXXXXXXXX&&9999999999&&XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX&&XXXXXXXXXX   
Jane Doe                          987-6543         Whereever                                          12/31/00

Data structure in program

SFLLineDS           DS
  SFLName                    20     (or Name)
  SFLFiller1                     2
  SFLNumber                 10
  SFLFiller2                     2     
  SFLDepartment            30     (or Department)
  SFLFiller3                      2 
  SFLDate                      10

                  Clear                    SFLLine
                  Eval   SFLName = Name
                  Eval   SFLNumber = %EditW(Number:'   -    0')
                  Eval   SFLDepartment = Department
                  Eval   SFLDate = %Char(Date)
                  Eval   SFLLine = SFLLineDS
                  Write SFL001