I am trying to use more than one MSGSFL for one display file.  One is for a WINDOW (which works).  I then added one for the initial screen.  When I go to initially write it (WRITEMSGCT1) I get a permanent I/O error.  Is it possible to have more than on MSGSFL per display file? See the following Display file.

700 A DSPSIZ(27 132 *DS4) 10/22/10

800 A CHGINPDFT

900 A PRINT

1000 A* ERRSFL 10/25/10

1100 A HELP(01) 10/22/10

1200 A CF02(02 'Update Non cancel Info')

1300 A CF06(06 'Get Scan')

1400 A CF08(08 'Inquiry')

1500 A CF10(10 'Upadte')

1600 A CF12(12 'Fold')

1700 A CF22(22 'Cancel')

1800 A CF23(23 'Udate main info')

1900 A*

2000 A R SFZIPW

2100 A WINDOW(2 1 23 80 *NOMSGLIN) 10/25/10

2200 A WDWBORDER((*COLOR WHT) (*DSPATR RI))

2300 A WDWTITLE((*TEXT '* Paylink Contract-

2400 A Entry *') *CENTER)

2500 A WDWTITLE((*TEXT 'F6=Get Scan F8=Inq-

2600 A iry,F12=Exit,F22=Enter CancelAmts')-

2700 A *CENTER *BOTTOM)

2800 A OVERLAY

2900 A 1 2'CONTRACT #:'

3000 A XXCONT 15A O 1 14

3100 A XXNAME 30A O 1 31

3200 A VHACCP 4S 0O 2 4

3300 A VHACCS 3S 0O 2 9

3400 A XXACNM 30A O 2 15

3500 A 3 2'Price(before tax):'

3600 A XXTTLF 7Y 2B 3 22DSPATR(HI)

3700 A EDTCDE(K)

3800 A CHECK(RB)

3900 A 79 DSPATR(PR)

4000 A 4 35'KBill Amt:'

4100 A VHKAMT 9Y 2B 4 54DSPATR(HI)

4200 A EDTCDE(K)

4300 A CHECK(RB)

4400 A 79 DSPATR(PR)

4500 A 4 2'Taxes on Sale:'

4600 A XXTAX 7Y 2B 4 22DSPATR(HI)

4700 A EDTCDE(K)

4800 A CHECK(RB)

4900 A 79 DSPATR(PR)

5000 A 3 35'Dealer Cost:'

5100 A VHTTLC 9Y 2B 3 54DSPATR(HI)

5200 A EDTCDE(K)

5300 A CHECK(RB) 10/22/10

5400 A 79 DSPATR(PR) 10/22/10

5500 A 5 2'Total Sale Price:' 10/22/10

5600 A XXCHRG 7Y 2B 5 22DSPATR(HI) 10/22/10

5700 A EDTCDE(K) 10/22/10

5800 A CHECK(RB) 10/22/10

5900 A 79 DSPATR(PR) 10/22/10

6000 A* 10/22/10

6100 A 5 35'Cancellation Date:' 10/22/10

6200 A XXCAND 6Y 0B 5 58EDTWRD(' / / ') 10/22/10

6300 A 85 DSPATR(PC) 10/22/10

6400 A 79 DSPATR(PR) 10/22/10

6500 A DSPATR(HI) 10/22/10

6600 A 6 2'Down Payment:' 10/22/10

6700 A XXDWPY 7Y 2B 6 22DSPATR(HI) 10/22/10

6800 A EDTCDE(K) 10/22/10

6900 A CHECK(RB) 10/22/10

7000 A 79 DSPATR(PR) 10/22/10

7100 A 7 2'Amount Financed:' 10/22/10

7200 A XXUPBL 7Y 2B 7 22DSPATR(HI) 10/22/10

7300 A EDTCDE(K) 10/22/10

7400 A CHECK(RB) 10/22/10

7500 A 79 DSPATR(PR) 10/22/10

7600 A 7 35'Payments Made :' 10/22/10

7700 A XXPAYM 2A B 7 54DSPATR(HI) 10/22/10

7800 A CHECK(RZ) 10/22/10

7900 A DSPATR(UL) 10/22/10

8000 A 89 DSPATR(PR) 10/22/10

8100 A 71 DSPATR(PC) 10/22/10

8200 A* 10/22/10

8300 A XXSCHD 1A B 8 54DSPATR(HI) 10/22/10

8400 A VALUES('A' 'B') 10/22/10

8500 A DSPATR(UL) 10/22/10

8600 A 99 DSPATR(PR) 10/22/10

8700 A 8 2'Number of Payments:' 10/22/10

8800 A XXNOPY 3S 0B 8 26DSPATR(HI) 10/22/10

8900 A 79 DSPATR(PR) 10/22/10

9000 A DSPATR(UL) 10/22/10

9100 A* 10/22/10

5722SS1 V5R4M0 060210 Data Description PIPIQAP/ZP0001FM 10/26/10 9:14:24 Page 3

Data Description Source

SEQNBR *...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 Date

9200 A XXPERC 3Y 2O 8 64DSPATR(HI) 10/22/10

9300 A EDTCDE(3) 10/22/10

9400 A DSPATR(UL) 10/22/10

9500 A* 10/22/10

9600 A 9 2'Payment Amount:' 10/22/10

9700 A XXAMTP 7Y 2B 9 22DSPATR(HI) 10/22/10

9800 A EDTCDE(K) 10/22/10

9900 A CHECK(RB) 10/22/10

10000 A 79 DSPATR(PR) 10/22/10

10100 A* 10/22/10

10200 A 10 2'Payment Due Date:' 10/22/10

10300 A XXDUED 6Y 0B 10 22EDTCDE(Y) 10/22/10

10400 A DSPATR(HI) 10/22/10

10500 A 79 DSPATR(PR) 10/22/10

10600 A* 10/22/10

10700 A 12 2'Payment Method:' 10/22/10

10800 A XXMETH 1A B 12 22DSPATR(HI) 10/22/10

10900 A 79 DSPATR(PR) 10/22/10

11000 A VALUES('C' 'D' 'I') 10/22/10

11100 A 12 25'C=Credit Card' 10/22/10

11200 A 12 39'D=Debit' 10/22/10

11300 A 12 48'I=Inv.' 10/22/10

11400 A 13 27'(MMDDYY)' 10/22/10

11500 A DSPATR(UL) 10/22/10

11600 A 13 46'PAYLINK AMOUNTS' 10/22/10

11700 A DSPATR(UL) 10/22/10

11800 A 13 66'CANCEL AMOUNTS' 10/22/10

11900 A DSPATR(UL) 10/22/10

12000 A 14 2'Dt Scanned :' 10/22/10

12100 A XXSCND 6Y 0B 14 27EDTWRD(' / / ') 10/22/10

12200 A DSPATR(HI) 10/22/10

12300 A DSPATR(UL) 10/22/10

12400 A 80 DSPATR(PC) 10/22/10

12500 A FLDCSRPRG(XXTRND) 10/22/10

12600 A 14 40'Amt Financed:' 10/22/10

12700 A XXTAMT 7Y 2B 14 54DSPATR(HI) 10/22/10

12800 A EDTCDE(K) 10/22/10

12900 A CHECK(RB) 10/22/10

13000 A DSPATR(UL) 10/22/10

13100 A FLDCSRPRG(XXTFEE) 10/22/10

13200 A XXCAMT 7Y 2B 14 68DSPATR(HI) 10/22/10

13300 A EDTCDE(K) 10/22/10

13400 A CHECK(RB) 10/22/10

13500 A DSPATR(UL) 10/22/10

13600 A 89 DSPATR(PR) 10/22/10

13700 A FLDCSRPRG(XXCFEE) 10/22/10

13800 A 15 2'Dt Transferred :' 10/22/10

13900 A XXTRND 6Y 0B 15 27EDTWRD(' / / ') 10/22/10

14000 A DSPATR(HI) 10/22/10

14100 A DSPATR(UL) 10/22/10

14200 A 81 DSPATR(PC) 10/22/10

14300 A FLDCSRPRG(XXPAYD) 10/22/10

14400 A 15 41'PAYLINK Fee:' 10/22/10

14500 A XXTFEE 7Y 2B 15 54DSPATR(HI) 10/22/10

14600 A EDTCDE(K) 10/22/10

14700 A CHECK(RB) 10/22/10

14800 A FLDCSRPRG(XXTPIP) 10/22/10

14900 A DSPATR(UL) 10/22/10

15000 A XXCFEE 7Y 2B 15 68DSPATR(HI) 10/22/10

15100 A EDTCDE(K) 10/22/10

15200 A CHECK(RB) 10/22/10

15300 A 89 DSPATR(PR) 10/22/10

15400 A DSPATR(UL) 10/22/10

15500 A FLDCSRPRG(XXCPIP) 10/22/10

15600 A 17 2'Dt PIPI Paid by Paylink:' 10/22/10

15700 A XXPAYD 6Y 0B 17 29EDTWRD(' / / ') 10/22/10

15800 A DSPATR(HI) 10/22/10

15900 A DSPATR(UL) 10/22/10

16000 A 82 DSPATR(PC) 10/22/10

16100 A FLDCSRPRG(XXPAY) 10/22/10

16200 A 17 41'Dealer Cost:' 10/22/10

16300 A XXTPIP 7Y 2B 17 54DSPATR(HI) 10/22/10

16400 A EDTCDE(K) 10/22/10

16500 A CHECK(RB) 10/22/10

16600 A FLDCSRPRG(XXKBL) 10/22/10

16700 A DSPATR(UL) 10/22/10

16800 A XXCPIP 7Y 2B 17 68DSPATR(HI) 10/22/10

16900 A EDTCDE(K) 10/22/10

17000 A CHECK(RB) 10/22/10

17100 A 89 DSPATR(PR) 10/22/10

17200 A DSPATR(UL) 10/22/10

17300 A FLDCSRPRG(XXCKBL) 10/22/10

17400 A 18 2'Dt Dealer Paid by Paylink:' 10/22/10

17500 A XXPAY 6Y 0B 18 29EDTWRD(' / / ') 10/22/10

17600 A DSPATR(HI) 10/22/10

17700 A DSPATR(UL) 10/22/10

17800 A 83 DSPATR(PC) 10/22/10

17900 A FLDCSRPRG(XXPAYC) 10/22/10

18000 A 18 41'KBill' 10/22/10

18100 A 18 47'Cost' 10/22/10

18200 A 18 52':' 10/22/10

18300 A XXKBL 7Y 2B 18 54DSPATR(HI) 10/22/10

18400 A EDTCDE(K) 10/22/10

18500 A CHECK(RB) 10/22/10

18600 A FLDCSRPRG(XXTDLR) 10/22/10

18700 A DSPATR(UL) 10/22/10

18800 A XXCKBL 7Y 2B 18 68DSPATR(HI) 10/22/10

18900 A EDTCDE(K) 10/22/10

19000 A CHECK(RB) 10/22/10

19100 A 89 DSPATR(PR) 10/22/10

19200 A DSPATR(UL) 10/22/10

19300 A FLDCSRPRG(XXCDLR) 10/22/10

19400 A 19 2'Dt Can by Paylink :' 10/22/10

19500 A XXPAYC 6Y 0B 19 29EDTWRD(' / / ') 10/22/10

19600 A DSPATR(HI) 10/22/10

19700 A DSPATR(UL) 10/22/10

19800 A 86 DSPATR(PC) 10/22/10

19900 A 89 DSPATR(PR) 10/22/10

20000 A FLDCSRPRG(XXTAMT) 10/22/10

20100 A 19 41'Dealer Prof:' 10/22/10

20200 A XXTDLR 7Y 2B 19 54DSPATR(HI) 10/22/10

20300 A EDTCDE(K) 10/22/10

20400 A CHECK(RB) 10/22/10

20500 A DSPATR(UL) 10/22/10

20600 A FLDCSRPRG(XXCAMT) 10/22/10

20700 A XXCDLR 7Y 2B 19 68DSPATR(HI) 10/22/10

20800 A EDTCDE(K) 10/22/10

20900 A CHECK(RB) 10/22/10

21000 A 89 DSPATR(PR) 10/22/10

21100 A DSPATR(UL) 10/22/10

21200 A ERMSG 59A O 22 1DSPATR(HI) 10/22/10

21300 A N60 DSPATR(ND) 10/22/10

21400 A 93 COLOR(RED) 10/22/10

21500 A 12 57'Delinquent(Y/N)' 10/22/10

21600 A XXDELQ 1A B 12 74DSPATR(HI) 10/22/10

21700 A 78 DSPATR(PC) 10/22/10

21800 A* 93 10 37'Enter TO Update' 10/22/10

21900 A* COLOR(RED) 10/22/10

22000 A* 93 10 55'F10 To Not Update' 10/22/10

22100 A* COLOR(RED) 10/22/10

22600 A 8 35'Fee Schedule :' 10/22/10

22700 A 8 69'Earned' 10/22/10

22900 A R MSGSFL SFL 10/19/10

23000 A SFLMSGRCD(23) 10/25/10

23100 A ERR# SFLMSGKEY 10/19/10

23200 A ERRQUE SFLPGMQ 10/19/10

23400 A R MSGCTL SFLCTL(MSGSFL) 10/19/10

23500 A WINDOW(SFZIPW) 10/25/10

23600 A OVERLAY 10/19/10

23700 A 98 SFLDSP 10/25/10

23800 A SFLDSPCTL 10/19/10

23900 A 59 SFLINZ 10/19/10

24000 A 59 SFLEND 10/19/10

24100 A SFLSIZ(0002) 10/25/10

24200 A SFLPAG(0001) 10/25/10

24300 A ERRQUE SFLPGMQ 10/22/10

24500 A R S1SF SFL 07/19/10

24700 A SFSEQ 3S 0H 07/19/10

24800 A SFSEL 1A B 9 2 07/19/10

24900 A N31 DSPATR(HI) 07/19/10

25000 A N31 DSPATR(UL) 07/19/10

25100 A 31 DSPATR(PR) 07/19/10

25300 A SFCNMM 2A H 07/19/10

25400 A SFCNDD 2A H 07/19/10

25500 A SFCNYY 2A H 07/19/10

25600 A SFPCDM 1A H 07/19/10

25700 A SFSCND 8Y 0H 07/19/10

25800 A SFTRND 8Y 0H 07/19/10

25900 A SFAPRI 4A O 9 4 07/19/10

26000 A 32 COLOR(RED) 07/19/10

26100 A N31 DSPATR(HI) 07/19/10

26200 A SFASUB 3A O 9 9 07/19/10

26300 A N31 DSPATR(HI) 07/19/10

26400 A 32 COLOR(RED) 07/19/10

26500 A SFSTAT 1A H 07/19/10

26600 A*N31 DSPATR(HI) 04/07/10

26700 A* 32 COLOR(RED) 04/07/10

26800 A* 10/06/00

26900 A SFPCDS 5A O 9 15 07/19/10

27000 A N31 DSPATR(HI) 07/19/10

27100 A 32 COLOR(RED) 07/19/10

27200 A SFALT 2A O 9 22 07/19/10

27300 A N31 DSPATR(HI) 07/19/10

27400 A 32 COLOR(RED) 07/19/10

27500 A SFCONT 15A O 9 25 07/19/10

27600 A N31 DSPATR(HI) 07/19/10

27700 A 32 COLOR(RED) 07/19/10

27800 A SFLAST 20A O 9 43 07/19/10

27900 A N31 DSPATR(HI) 07/19/10

28000 A 32 COLOR(RED) 07/19/10

28100 A SFDELQ 1A O 9 66 07/19/10

28200 A N31 DSPATR(HI) 07/19/10

28300 A ISDATE 6Y 0O 9 71EDTWRD(' / / ') 07/19/10

28400 A N31 DSPATR(HI) 07/19/10

28600 A SFBIDT 6Y 0O 9 84EDTWRD(' / / ') 07/19/10

28700 A N31 DSPATR(HI) 07/19/10

28800 A SFCDAT 6Y 0O 9 95EDTWRD(' / / ') 07/19/10

28900 A N31 DSPATR(HI) 07/19/10

29000 A SFPAYD 6Y 0O 9108EDTWRD(' / / ') 07/19/10

29100 A N31 DSPATR(HI) 07/19/10

29200 A*

29300 A R S1 SFLCTL(S1SF) 07/19/10

29500 A SFLSIZ(0013) 07/19/10

29600 A SFLPAG(0012) 07/19/10

29700 A KEEP 07/19/10

29800 A OVERLAY 07/19/10

29900 A 25 SFLCLR 07/19/10

30000 A 26 SFLDSP 07/19/10

30100 A 27 SFLDSPCTL 07/19/10

30200 A CF03(03 'program exit key - F3') 07/19/10

30400 A 1 2'ZP0001' 07/19/10

30500 A USR 10A O 1 10 07/19/10

30600 A 1 40'PAYLINK INQUIRY' 07/19/10

30700 A TIME 4Y 0O 1 85EDTWRD(' : ') 07/19/10

30800 A 1 92DATE 07/19/10

30900 A EDTCDE(Y) 07/19/10

31000 A COLOR(GRN) 07/19/10

31100 A* ----- 10/06/00

31200 A 2 2'S1' 07/19/10

31300 A* ----- 10/06/00

31400 A* 3 2'Last Name:' 03/23/10

31500 A 3 2'last name:' 07/19/10

31600 A NAME 20A B 3 13 07/19/10

31700 A N61 DSPATR(HI) 07/19/10

31800 A N61 DSPATR(UL) 07/19/10

31900 A 61 DSPATR(PC) 07/19/10

32000 A 61 DSPATR(RI) 07/19/10

32100 A 3 37'Ctr#:' 07/19/10

32200 A PCM 15A B 3 43DSPATR(HI) 07/19/10

32300 A DSPATR(UL) 07/19/10

32400 A 3 60'Delq.(Y)' 07/19/10

32500 A DFDELI 1A B 3 70DSPATR(UL) 07/19/10

32600 A 3 73'Paid(Y)' 07/19/10

32700 A DFPAYI 1A B 3 82DSPATR(UL) 07/19/10

32800 A 3 86'Not Paid(Y)' 07/19/10

32900 A DFNPYI 1A B 3 99DSPATR(UL) 07/19/10

33000 A* ----- 10/06/00

33100 A LINE 75A O 5 2 07/19/10

33200 A 6 2'OPTION(' 07/19/10

33300 A 6 10'2=Edit ' 07/19/10

33400 A 6 19'7=Make Delinquent ' 07/19/10

33500 A 6 38'8=Remove Delinquent' 07/19/10

33600 A 6 58'9=Transfer)' 07/19/10

33700 A* ----- 10/06/00

33800 A 7 2'Op ' 07/19/10

33900 A* 7 11'P/C' 02/05/10

34000 A 7 22'Contract No.' 07/19/10

34100 A DSPATR(UL) 07/19/10

34200 A 7 65'Delq' 07/19/10

34300 A 7 84'Bill Date' 07/19/10

34400 A DSPATR(UL) 07/19/10

34500 A 7 95'Canc Date' 07/19/10

34600 A DSPATR(UL) 07/19/10

34700 A 8 64'(Y/N)' 07/19/10

34800 A DSPATR(UL) 07/19/10

34900 A 7 71'Eff. Date' 07/19/10

35000 A DSPATR(UL) 07/19/10

35100 A 7 43'Last Name' 07/19/10

35200 A DSPATR(UL) 07/19/10

35300 A 7 6'Dealer' 07/19/10

35400 A DSPATR(UL) 07/19/10

35500 A 7 15'Prod' 07/19/10

35600 A DSPATR(UL) 07/19/10

35700 A 7108'Pipi Paid Dt.' 07/19/10

35800 A DSPATR(UL) 07/19/10

35900 A R S1M

36000 A 23 2'F3=Exit, F10=Fold'

36100 A COLOR(BLU)

36200 A DSPATR(HI)

36300 A MSG3 70 24 2

36400 A COLOR(WHT)

36500 A DSPATR(HI)

36600 A*---------------------------------------------------------------- 10/26/10

36700 A R MSGSF1 SFL 10/26/10

36800 A SFLMSGRCD(25) 10/26/10

36900 A ERR# SFLMSGKEY 10/26/10

37000 A ERRQU1 SFLPGMQ 10/26/10

37100 A*---------------------------------------------------------------- 10/26/10

37200 A R MSGCT1 SFLCTL(MSGSF1) 10/26/10

37300 A* WINDOW(SFZIPW) 10/26/10

37400 A OVERLAY 10/26/10

37500 A 98 SFLDSP 10/26/10

37600 A SFLDSPCTL 10/26/10

37700 A 59 SFLINZ 10/26/10

37800 A 59 SFLEND 10/26/10

37900 A SFLSIZ(0002) 10/26/10

38000 A SFLPAG(0001) 10/26/10

38100 A ERRQU1 SFLPGMQ 10/26/10

38200 A*---------------------------------------------------------------- 10/26/10

* * * * * E N D O F S O U R C E * * * * *



Software/Hardware used:
ISERIES RPG400