Searching and producing report from SDSF



TSO Programming, ISPF, SDF, SDSF and PDF, FTP, TCP/IP Concepts, SNA & SNA/IP etc...

Re: Searching and producing report from SDSF

Postby willy jensen » Tue Mar 09, 2021 10:10 pm

You need to look at the chapter 'Browsing the system log with ISFLOG' in the 'SDSF Users Guide' manual. The way to go depends on whether you are using SYSLOG or OPERLOG.
The sample I have is for SYSLOG so will not output data if you are using OPERLOG.
Address TSO                                        
rc=isfcalls('ON')                                  
parse value '0 0' with isfmsg2.0 isfline.0          
Address SDSF "ISFLOG ALLOC TYPE(OPERLOG) (VERBOSE)"
if rc<>0 then do                                    
  say '  ' ISFMSG                                  
  do i=1 to ISFMSG2.0                              
    say '  ' ISFMSG2.i                              
  end                                              
  call close 8                                      
end                                                
logindd=ISFDDNAME.1                                
/* process log records */                          
Do forever                                          
  "execio 1000 diskr" logindd "(stem logi.)"    
  if logi.0=0 then leave   
  do li=1 to logi.0                                
    say logi.li                                    
  end                                              
End                                                
"execio 0 diskr" logindd "(finis)"                  
"Free dd("logindd")"      
willy jensen
 
Posts: 327
Joined: Thu Mar 10, 2016 5:03 pm
Has thanked: 0 time
Been thanked: 44 times

Re: Searching and producing report from SDSF

Postby Misha786 » Wed Mar 10, 2021 11:56 pm

Thanks Willy !! It worked . I made some changes as per my requirement.
Thanks once again !!
Misha786
 
Posts: 12
Joined: Fri Nov 27, 2020 12:28 am
Has thanked: 0 time
Been thanked: 0 time

Previous

Return to TSO & ISPF

 


  • Related topics
    Replies
    Views
    Last post