RE: BSCA problem

A T in column 6 is a telecommunications record format that is not supported
in RPG III.  According to the S36 Migration Assistant book, communication
definitions are not transferred directly to RPGIII.  You must re-write the
application.  I suggest you look into the communications and see how you can
convert to ICF and write a whole new program.  I hope you don't need this
any time soon.  You might look into the finance programming books in the
softcopy library.

Good Luck,

Christopher K. Bipes     mailto:ChrisB@Cross-Check.com
Sr. Programmer/Analyst   mailto:Chris_Bipes@Yahoo.com
CrossCheck, Inc.         http://www.cross-check.com
6119 State Farm Drive    Phone: 707 586-0551 x 1102
Rohnert Park CA  94928 Fax: 707 586-1884

If consistency is the hobgoblin of little minds, only geniuses work here.
Karen Herbelin - Readers Digest 3/2000


-----Original Message-----
From: Jim Matousek [mailto:JMatousek@spotsylvania.va.us]
Sent: Wednesday, June 07, 2000 10:45 AM
To: MIDRANGE-L@midrange.com
Cc: Brian Scott; Jim Pullen
Subject: BSCA problem


I have an RPG36 program for bank direct deposit whose 'F' specs look like
the following and also contains a 'T' spec.   
        
     FDIRTAPE IPE F 940  94            DISK                  
  FDIRLINE O   F  94  94            BSCA                  
  FPRINTER O     132 132            PRINTER               
  TDIRLINE ST ENA                                10       
  IDIRTAPE NS  01                                         

How do I "convert" this to RPG/400? If I change the source type to RPG and
compile, I get the following fatal errors.

                        M e s s a g e   S u m m a r y

 QRG2001 Severity:  30   Number:    1

         Message . . . . :   Form-Type entry invalid or out of sequence.

           Specification ignored.

 QRG2006 Severity:  20   Number:    1

         Message . . . . :   The File-Format entry is not F or E. Defaults

           to F.

 QRG2013 Severity:  10   Number:    1

         Message . . . . :   The Device-Type entry is not PRINTER, DISK,

           WORKSTN, SPECIAL, or SEQ.

 QRG2016 Severity:  10   Number:    3

         Message . . . . :   Positions 20-23, 47-52, 60-65, 67-70, or 73-74

           of an F specification are not blank. Default to blank.



Any help would be greatly appreciated.

Jim Matousek
Information Services
(540) 582-7055 ext 273
(540) 582-6304 fax
E-Mail:  jmatousek@spotsylvania.va.us


+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@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
+---