Re: BSCA problem

Hi Jim,

    From my experience, the only way to convert it to native would include
converting it to use ICF files instead of 'BSCA'.  The ICF file is similar
to a display file and is defined as such in the rpg pgm.  Create a source
file of type 'ICF' and define both read and write formats in it and compile
using crticff.  Then use addicfdeve to add the remote name used to acquire
it in the rpg pgm.  You can then read and write to it just like your old
bsca file.  The system has some default ICF files stashed somewhere, but
it's not too hard to create your own...

Regards
Rick
----- Original Message -----
From: "Jim Matousek" <JMatousek@spotsylvania.va.us>
To: <MIDRANGE-L@midrange.com>
Cc: "Brian Scott" <BScott.Spotsy_PO.Spotsy_DM@spotsylvania.va.us>; "Jim
Pullen" <JPullen.Spotsy_PO.Spotsy_DM@spotsylvania.va.us>
Sent: Wednesday, June 07, 2000 12:44 PM
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
+---