Author Topic: ODSSGET in Anystore Exit stuck on first DDNAME  (Read 18 times)

Nolan

  • Global Moderator
  • Full Member
  • *****
  • Posts: 137
    • View Profile
ODSSGET in Anystore Exit stuck on first DDNAME
« on: October 28, 2019, 08:16:48 AM »
Hello folks, we have upgraded our test system to 10.1.0.4 and in testing the Anystore exit via ARSLOAD it fails on a 2nd file being processed.  The ODSSGET module is stuck pointing to the EOF of the inital DDNAME loaded.

@rjchavez said years ago

"The ODSSGET routine is called to OPEN, READ, and CLOSE files including the actual report files.  These traditional MVS services were causing the issue (still not sure why).  I changed the exit to use FOPEN, FREAD, and FCLOSE instead.  This corrected the problem."  - http://www.odusergroup.org/forums/index.php?topic=1777.0

I don't have any documentation on ODSSGET as like others, Lab Services provided it without source code. :(

Q1. FOPEN/FREAD/FCLOSE?  Is that part of ODSSGET or something written in C?
Q2. Does anyone know how to reset the ODSSGET (initialize it).  I have tried ODSSGET-CLOSE and ODSSGET-OPEN but the results are the same.  Remains pointing to the EOF on initial DDNAME.

Initial Load
Init Call ODSSGET           
Set ODSSGET-OPEN to True
ODSSGET-DDNAME     :SYS00001
ODSSGET-RETURN-CODE:00000   
ODSSGET-REASON-CODE:00000   
ODSSGET-DDNAME     :SYS00001
ODSSGET-ACTION     :OPEN   
...
Terminate Anyssotre Exit with ODSSGET-CLOSE
Set ODSSGET-CLOSE to True
Perform CALL-ODSSGET.   
ODSSGET-DDNAME     :SYS00001
ODSSGET-RETURN-CODE:00001   
ODSSGET-REASON-CODE:01001   
...
2nd file
Init Call ODSSGET             
Set ODSSGET-OPEN to True
CEE3201S The system detected an operation exception (System Completion Code=0C1)


Any suggestions are welcome.

Thanks



J.

#zOS #AIX #Windows #Multiplatforms
#DB2 #TSM #ODF #zODF #ODWEK
#CapacityPlanning #AFP #ReportDistribution
#Finance #ICN