Insert current date in Binary format

Deepa.m · New User Joined: 28 Apr 2005 Posts: 99

Hi

I had to reformat my dataset by appending 20 bytes in front and then input fields.lrec =120

1------------------2021--[input fields]-------------120

The first 20 bytes should have following information

cnt1- 6 bytes PD
Cnt2- 2 bytes ZD
date(yyyymmdd) 4 bytes BI (binary )
Date2(yyyymmdd) 4 bytes BI
Filler 4 bytes

total 20 bytes

Can you give me the syntax to insert Current date in Binary format ?

Deepa

Frank Yaeger · Posted: Fri Feb 23, 2007 10:25 pm

What are the values for cnt1, cnt2, date2 and filler?

What does the 4-byte binary yyyymmdd date look like in hex - is it just yyyymmdd converted to binary (for example, 20070223 = X'01323F4F')?

Deepa.m · New User Joined: 28 Apr 2005 Posts: 99

Frank,

The values to hold are

Cnt1 - 6 bytes PD value 0
Cnt2 - 2 bytes ZD value 0
Date1(yyyymmdd) 4 bytes BI (binary ) -Current date
Date2(yyyymmdd) 4 bytes BI - Current date
Filler 4 bytes Value Spaces

Yes it is just the yyyymmdd format converted to binary.

I tried many combinations in outrec like DATE1Z,DATE=(MD4,TO=BI,LENGTH=4) ,date3P is also not helpful. .please give the correct syntax.

Thanks,
Deepa.

Thanks a lot!

Frank Yaeger · Posted: Sun Feb 25, 2007 9:49 pm

Deepa

Here's a DFSORT job that will do what you asked for: