Re:I analyzed hospital price lists so you didn't have to
by peyton on Thursday July 07, 2022 @02:02AM
(#32010432)
The code looks like this:
``` I X?1.N1"H" S X=X3600,%H=$H,@("X=$P(%H,"","",2)"_Y_X),%=$S(X<0:- 1,1:0)+(X\86400),X=X#86400,%H=$P(%H,",")+%_","_X G RT D DMW G 1^%DT:'% S @("%H=$H"_Y_%),%H=%H_","_$P($H,",",2) RT D TT S %=$P(%H,",",2) D S S %=X_% I %DT'["S" S %=+$E(%,1,12) Q:'$D(%(0)) S Y=% G E^%DT PF S %H=$H D YMD S %(9)=X,X=%DT["F"2-1 I @("%I(1)*100+%I(2)"_$E("> <",X+2)_"$E(%(9),4,7)") S %I(3)=%I(3)+X ```
I mean, I can see why reimplementing could be scary even with org churn.
Re:I analyzed hospital price lists so you didn't have to
by adolph on Thursday July 07, 2022 @12:34PM
(#32016144)
That is from VA Fileman, right? I did a "lite" replatforming a few years ago.
Re:I analyzed hospital price lists so you didn't have to
by peteradio on Thursday July 07, 2022 @08:41AM
(#32013288)
Binary looks like this 010100101001010 or something, surely the task of writing a mumps parser is long done?
Re:I analyzed hospital price lists so you didn't have to
by yuretz on Thursday July 07, 2022 @03:25AM
(#32010888)
What language is it?
Re:I analyzed hospital price lists so you didn't have to
by Ndymium on Thursday July 07, 2022 @03:56AM
(#32011082)
From the context I'm guessing MUMPS, and it kinda seems to resemble it, if it had more line breaks: https://github.com/programarivm/mumps-examples/blob/f160bfb6...
Isn't this the desired outcome, that such organizations go broke? And let their assets, employees and customers go to some other organization that isn't saddled with technical debt?