Hi,
I'm coming back to this now. So, I have a CICS program which uses a sequential dataset. While I'm debugging I would like to access it locally (or remote is also an option)
Here is a simple sample:
package DEBUGT;// basic program//program DEBUGT type BasicProgram { includeReferencedFunctions = yes, allowUnqualifiedItemReferences = yes, throwNrfEofExceptions = yes, handleHardIOErrors = no, V60ExceptionCompatibility = yes, I4GLItemsNullable = no, textLiteralDefaultIsString = no, localSQLScope = yes } DEBUGTR DEBUGTR; // Use Declarations //use usePartReference; // Constant Declarations const constantName string = "literalString"; // Variable Declarations variableName string; function main() try get next DEBUGTR ; onException end endendpackage DEBUGT;// basic record//record DEBUGTR type serialRecord { fileName = "CUFILE" } 10 CUSTNO char(6) ; // custno (6) 10 NCUSNAM char(22) ; // customer abbrev name 10 TCUSADR1 char(34) ; // Address1 Name 10 TCUSADR2 char(34) ; // Address2 10 TCUSADR3 char(34) ; // Address3 10 TCUSADR4 char(34) ; // Address4 10 TCUSADR5 char(34) ; // Address5 10 TCUSADR6 char(34) ; // Address6 10 ITLCCTN char(14) ; // Telephone no 10 CCUSORG char(10) ; // Swiss special orgno 10 IMKTMBO char(3) ; // BO 10 CCUSMUC char(3) ; // MU 10 SALES_NO char(6) ; // Field sales rep no 10 SALES_SNAME char(30) ; // Sales rep Surname 10 SALES_FNAME char(30) ; // Sales rep firstname 10 LANG_CODE char(2) ; // Language code 10 CCUSISU char(3) ; // ISU Code end
I created a build descriptor and added a Resource Rssociation part:
<ResourceAssociations name="DEBUGT"> <association fileName="CUFILE"> <win> <seqws systemName="C:\SOFINTRF.CUSTIF"/> </win> </association></ResourceAssociations>
Recommended properties are also set:
resourceAssociations="DEBUGT" genProperties="GLOBAL"
But when I debug it I got an error: EGL0751E The runtime property vgj.ra.fileName.fileType cannot be found for the CUFILE file
Another issue is that I set the Default Debug Descriptor for this package, but now I can't find where to change it.
Thanks for your advices!
SzabóZoltán