Joined: 07 Feb 2009 Posts: 1306 Location: Vilnius, Lithuania
I'll check the version of DFSORT later, but, unless you want to figure out if this conversion is actually possible, I'd suggest you don't spend too much more time on it, as I've managed to find a way, adding just two statements
Code:
/*----------------------------------------------------------+
| Save the "departure" time of the idle-time split |
+----------------------------------------------------------*/
if substr(owner -> list.cday, 3, 1) ^= '#' &
substr(list.type, 2, 1) = '^' then
pp_ntime = list.dtime;
and
Code:
/*------------------------------------------------------------+
| Use starting time of idle-time as end-of-ride time! |
+------------------------------------------------------------*/
if pp_ntime ^= -1 then
split_ruler(1).time(1) = pp_ntime;
else
to the program, to ignore 321 out of 420 of the "!^" idle pseudo-intervals, and I'm sure the other 99 will also follow RSN...
Removing the intervals, with all changes involved, from the input file turns out to lead to other problems that I'm still trying to figure out.
Anyway, I also applied the changes to two other versions of the program, written in Virtual Pascal, and in Virtual Pascal with more in-line assembler than actual Pascal, and the results match. A few quick manual checks also show that the new version is correct.
Joined: 07 Feb 2009 Posts: 1306 Location: Vilnius, Lithuania
Way behind on DFSORT maintenance,
Quote:
If you see:
ICE201I F RECORD TYPE ...
the F indicates you have the July, 2008 DFSORT functions (FINDREP, WHEN=GROUP, DATASORT, SUBSET, etc) and all of the earlier functions.
This function level corresponds to z/OS DFSORT V1R5 PTF UK90013 and z/OS DFSORT V1R10 PTF UK90014. You are behind on DFSORT functional PTFs. Ask your System Programmer to install z/OS DFSORT V1R10 PTF UK90025 or z/OS DFSORT V1R12 PTF UK90026.
And that's where I am, z/OS 1.10 forever...
Anyway, 417 out of 420 "!^" cases solved on-the-fly, will do the last three manually, and see if that has any influence.
Joined: 07 Feb 2009 Posts: 1306 Location: Vilnius, Lithuania
My final(?) post in this thread
The to-be-backed-out change in the input file format that is now not ever going to happen, was introduced in August 2009, and possibly even earlier.
I do know that at some stage there have been backports of minor changes to older versions of the program, just to allow the regression testing framework to run after minor positional changes in the format of the input file, and it may well have been that some of these changes masked out the introduction of the "idle time" pseudo splits. It would require restoring very old saved-as-xmit file versions (I've got about 220 of them, yes, really) to get to the bottom of this, but life's just way to short to indulge in this kind of "fun and games".