Focal Point
[CLOSED] unable to access mainframe directory using WebFOCUS Dev-studio

This topic can be found at:
https://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/4747021676

May 12, 2015, 09:37 AM
Kalyan
[CLOSED] unable to access mainframe directory using WebFOCUS Dev-studio
I am trying to access source data set from WebFOCUS dev studio. The DDNAME ‘CITIDMAP’ is not getting recognized. Please Share your comments

Code:
-SET ECHO=ALL;
-SET &DATASET='$1051.TPP.SAVE.INSPNA.PERM.D0504';

DYNAM FREE FI CITIDMAP
-RUN

DYNAM ALLOC FI CITIDMAP DA &DATASET SHR REUSE
-RUN

TABLE FILE CITIDMAP
PRINT
ITRANSCODE
WHERE RECORDLIMIT EQ 10
END

Error:
-SET &DATASET='$1051.TPP.SAVE.INSPNA.PERM.D0504';
DYNAM FREE FI CITIDMAP
-RUN
0 ERROR AT OR NEAR LINE 4 IN PROCEDURE ttk FOCEXEC *
(FOC913) UNABLE TO FIND DDNAME CITIDMAP
DYNAM ALLOC FI CITIDMAP DA $1051.TPP.SAVE.INSPNA.PERM.D0504 SHR REUSE
-RUN
TABLE FILE CITIDMAP
PRINT
ITRANSCODE
WHERE RECORDLIMIT EQ 10
END
0 ERROR AT OR NEAR LINE 14 IN PROCEDURE ttk FOCEXEC *
(FOC036) NO DATA FOUND FOR THE FOCUS FILE NAMED: CITIDMAP

This message has been edited. Last edited by: <Kathryn Henning>,
May 12, 2015, 09:57 AM
GavinL
Only 2 things I can think to ask..

Is the Data Server setup correctly under EDASERVE?
Is the folder properties have the correct app path?



- FOCUS Man, just FOCUS!
-----------------------------
Product: WebFOCUS
Version: 8.1.04
Server: Windows 2008 Server
May 13, 2015, 08:33 AM
Diptesh Patel
It seems the first error (FOC913) is for the line trying to do a FREE. Since the file is probably not allocated at the time of executing that line, it causes an error. If, instead of CITIDMAP, you use a wildcard, as in CITIDMA*, it will not cause an error if the file is not already allocated. However, make sure that there is no other file that you inadvertently FREE because it meets the wildcard pattern.
Not sure whet5her the second error is related to the first one or not.


Diptesh
WF 7.1.7 - AIX, MVS
May 13, 2015, 12:21 PM
j.gross
Are you certain that dataset $1051.TPP.SAVE.INSPNA.PERM.D0504 exists and contains a valid FOCUS file?
See if the following sequence makes TABLE succeed (or reveals the problem):

-SET &DATASET='$1051.TPP.SAVE.INSPNA.PERM.D0504';
? TSO DSNAME &DATASET
DYNAM ALLOC FI CITIDMAP DA &DATASET SHR REUSE
? TSO DDNAME CITIDMAP
CHECK FILE CITIDMAP
USE
CITIDMAP
END
TABLE ...

(Since you allocate with REU option, FREE should be unnecessary.)


- Jack Gross
WF through 8.1.05