Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations IamaSherpa on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

No invites outstanding for file XXX

Status
Not open for further replies.

ndevriendt

Programmer
Jan 8, 2002
74
BE
Hello,

I get the error 'No invites outstanding for file VBL400FM in library ZKHPGM. (C I) '
when I use the page down button on my subfile.
Is there somebody that can tell me how I can fix this.
I'm using the invite keyword in my DDS.

See here some code of my screen and RPGLE program

A DSPSIZ(24 80 *DS3
A 27 132 *DS4)
A N89 ROLLUP(96 'Rollup')
A R S01A SFL
A 94 SFLNXTCHG
A FLD01 2A B 11 2
.....
A R C01A SFLCTL(S01A)
A SFLSIZ(0006)
A SFLPAG(0004)
A 91 SFLDSP
A 90 SFLDSPCTL
A 92 SFLCLR
A N92 INVITE
A 93 SFLEND(*MORE)
A N91 ERASE(S01A)
A SFLMODE(&#1SFMD)
A R S01B SFL
A 94 SFLNXTCHG
A FLD01 2A B 11 2
.....
A R C01B SFLCTL(S01B)
A SFLSIZ(0009)
A SFLPAG(0008)
A 91 SFLDSP
A 90 SFLDSPCTL
A 92 SFLCLR
A N92 INVITE
A 93 SFLEND(*MORE)
A N91 ERASE(S01B)
A SFLMODE(&#1SFMD)


RPG program:

FVBL400FM CF E WORKSTN MAXDEV(*FILE)
F SFILE(S01A:#1RRNS)
F SFILE(S01B:#1RRNS)
F INFDS($IDSPF)


Write C01A
Read(E) VBL400FM 50
 


Why are you using the INVITE keyword? Does your application require it??


 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top