Customer is trying to define an ISAM file within a class program within an ASP.NET Web Application.
The compiler is flagging an error that points to the file status data-item that is defined in the select clause.
The error is as follows:
COBCH1268 : A static file cannot reference instance items …\Default.aspx.cbl
The program is shown below:
class-id mywebsite_Default is partial
inherits type System.Web.UI.Page public.
select test-file assign to "C:\TEST.DAT"
organization is indexed
access is dynamic
record key is test-refno
file status is FS.
fd test-file is external.
03 test-refno pic 9(8).
03 test-name pic x(20).
77 FS pic x(2).
method-id Page_Load protected.
procedure division using by value sender as object by value e as type EventArgs.
This error occurs because you have your file defined as EXTERNAL in your FD.
When you define a file as external then the compiler will automatically generate the file as being static so that it is accessible to all instances of the class.
This means that the file status data item defined for the file needs to also be defined as static.
You can do this as follows:
77 FS PIC X(2) STATIC.
The alternative would be to remove the external clause from the file description and then the file would belong to the instance and not to the class and you would not have to define the file status as static.