Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

I want to have picture mode number for TOD format.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
View previous topic :: :: View next topic  
Author Message
Mansik Kim

New User


Joined: 15 Dec 2006
Posts: 29
Location: Korea

PostPosted: Wed Mar 21, 2012 11:29 am    Post subject: I want to have picture mode number for TOD format.
Reply with quote

I working SMF read and report programming.

I want to have picture mode format for TOD format 4 bin length data
in SMF type 78.

Please let me know that.

Thanks,
Mansik.
Back to top
View user's profile Send private message

Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1714
Location: UK

PostPosted: Wed Mar 21, 2012 12:53 pm    Post subject:
Reply with quote

PL/1 or assembler?
Back to top
View user's profile Send private message
Mansik Kim

New User


Joined: 15 Dec 2006
Posts: 29
Location: Korea

PostPosted: Thu Mar 22, 2012 9:55 am    Post subject:
Reply with quote

I don't care PL/1 or Assembler.

I working program with Assembler and REXX.

Just want to know TOD(time of day) format binary 4 length.
Back to top
View user's profile Send private message
Mansik Kim

New User


Joined: 15 Dec 2006
Posts: 29
Location: Korea

PostPosted: Thu Mar 22, 2012 10:03 am    Post subject:
Reply with quote

IBM Manual :
MVS System Management Facilities

Chapter 13. SMF Records

Record Type 78 (4E) — RMF Virtual Storage and I/O Queuing Activity
36 24 SMF78DCS 4 binary
Offset to virtual storage common storage data section.

Virtual Storage Common Storage Data Section
184 B8 R782CSAU 40 Mixed(1)
CSA usage both above and below 16 megabytes.

Table 13-3. Byte structure for data collected below 16 megabytes - Mixed(1)
4 4 VSDBNTME 4 binary
Time stamp for minimum. Format is high-order bytes of time-of-day (TOD) clock.

I want to mean 'high-order bytes of time-of-day (TOD) clock.

Thanks,
Mansik.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Thu Mar 22, 2012 10:52 am    Post subject:
Reply with quote

And why dont you just use : Transaction Analysis Workbench ?

http://publib.boulder.ibm.com/infocenter/dzichelp/v2r2/index.jsp?topic=%2Fcom.ibm.imstools.fuw.doc.ug%2Ffuwuref_batch_report_smf_78_2.htm
Back to top
View user's profile Send private message
Mansik Kim

New User


Joined: 15 Dec 2006
Posts: 29
Location: Korea

PostPosted: Thu Mar 22, 2012 11:26 am    Post subject:
Reply with quote

Thanks for your reply.

I already above link but I can't have to way get to 'time field' in program.
Back to top
View user's profile Send private message
Mansik Kim

New User


Joined: 15 Dec 2006
Posts: 29
Location: Korea

PostPosted: Thu Mar 22, 2012 12:03 pm    Post subject:
Reply with quote

How can I handle 4 byte data in time stamp field?

This data format defferent from SMF write time field, I think.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Thu Mar 22, 2012 1:55 pm    Post subject:
Reply with quote

STCKCONV — Store clock conversion routine

http://publib.boulder.ibm.com/infocenter/zos/v1r12/index.jsp?topic=%2Fcom.ibm.zos.r12.ieaa900%2Fiea2a9b01101.htm
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2502
Location: Atlanta, Georgia, USA

PostPosted: Thu Mar 22, 2012 11:12 pm    Post subject: Reply to: I want to have picture mode number for TOD format.
Reply with quote

Mansik,

Peter's suggestion to use the z/OS STCKCONV Assembler Macro is probably the best choice you have. It's much simpler than doing it yourself. icon_wink.gif

I've used it many times before and it's easy to use. Just follow the usage instructions in the Link which Peter provided.
Back to top
View user's profile Send private message
Mansik Kim

New User


Joined: 15 Dec 2006
Posts: 29
Location: Korea

PostPosted: Fri Mar 23, 2012 11:34 am    Post subject:
Reply with quote

Dear Mr. Bill,

I don't understand you yet.

I want to just that mean 4 byte bin data format.
ex) x'hhmmssth' or hundreth soconds from mid night.

Please let me have a sample code.

Tnanks,
Mansik.
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7226

PostPosted: Fri Mar 23, 2012 12:56 pm    Post subject: Reply to: I want to have picture mode number for TOD format.
Reply with quote

You said you didn't care if it was PL/1 or Assembler, and you have been pointed to an Assembler macro by Peter, and Mr Bill, who knows a very great deal about these things, thinks it is your best shot.

Quote:
Just follow the usage instructions in the Link which Peter provided.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Fri Mar 23, 2012 1:07 pm    Post subject:
Reply with quote

Look at how to obtain the TOD and the return values here :

http://publib.boulder.ibm.com/infocenter/zos/v1r12/index.jsp?topic=%2Fcom.ibm.zos.r12.ieaa600%2Fiea2a6a0224.htm

And for extensive info read the "Principles of Operation".

Since you dont know sh.t about what you want like Mr. Woodger pointedly
commented I for now will not put any more effort in this topic.
Back to top
View user's profile Send private message
Mansik Kim

New User


Joined: 15 Dec 2006
Posts: 29
Location: Korea

PostPosted: Thu Mar 29, 2012 6:32 pm    Post subject: Reply to: I want to have picture mode number for TOD format.
Reply with quote

Hi All,

I have a solution better than use STCKCONV macro.

I use IPCS BLSUXTOD service in REXX and have timestamp.

Arg TUNITS
TUNITS = X2c(TUNITS)
TIMESTAMP = Copies(0,26) /* force result length=26 */
Address linkpgm "BLSUXTOD TUNITS TIMESTAMP"
Say TIMESTAMP

Examples:
9DD86997FE000000 --> 12/30/1987 09:49:21.046528
B72F6997FE000000 --> 02/13/2002 22:30:06.632960

Thanks,
Mansik.
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2502
Location: Atlanta, Georgia, USA

PostPosted: Thu Mar 29, 2012 7:15 pm    Post subject: Reply to: I want to have picture mode number for TOD format.
Reply with quote

Glad you resolved this. At least now, based upon your examples, we now have a better idea of the results that you needed and expected, because many really didn't understand your posting.... icon_confused.gif
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7226

PostPosted: Thu Mar 29, 2012 7:26 pm    Post subject: Re: Reply to: I want to have picture mode number for TOD for
Reply with quote

Yes. We kind of relied upon the "PL/1 or Assembler" response you gave to the first question... I think DFSORT has some simple ways to deal with this, as well, but we didn't know other solutions were acceptable to you.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Thu Mar 29, 2012 8:22 pm    Post subject: Reply to: I want to have picture mode number for TOD format.
Reply with quote

Quote:
I have a solution better than use STCKCONV macro.


don' t play the smart *** with us please icon_cool.gif

the quality of the answers depends on the quality/clarity of the question

so since You asked a way to convert the TOD timestamp using PL/I or assembler
You got what You asked for.

if You are not satisfied with the quality of the answers You get for free on our time
You can, without any regret on our side, ask somewhere else or hire a paid consultant.

NUFF SAID!
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts What is the command to check MODE of ... rohanthengal CLIST & REXX 6 Fri Nov 18, 2016 1:48 pm
No new posts Match or compare two files in VB Format anatol DFSORT/ICETOOL 14 Thu Nov 03, 2016 7:41 pm
No new posts Low values Results from VARCHAR FORMAT balaji81_k DB2 10 Thu Oct 20, 2016 1:18 am
No new posts output data in CSV Format janmejay COBOL Programming 8 Sat Oct 15, 2016 2:20 pm
This topic is locked: you cannot edit posts or make replies. output data in CSV Format janmejay DFSORT/ICETOOL 3 Sat Oct 15, 2016 2:16 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us