Summing lists in directory structure

[brickviking]

(09-15-2017 08:51 PM)Gilles59 Wrote:  Hi Brick

put this program in your grocery directory

Code:

TYear
«
 0.
 {'JAN' 'FEB' 'MAR' .... 'OCTOB' 'NOV' 'DECEM' }
 1. « EVAL TOTAL + UPDIR » DOSUBS
»

And you get the total.
But this suppose that all your directory structure (JAN FEB etc) is created and that the TOTAL object exits in each directory.

That looks like just what I wanted. I'll have to prod it and see how it works, especially DOSUBS.

(09-15-2017 08:51 PM)Gilles59 Wrote:  If the TOTAL sometimes does not exist :

Code:

«
 0.
 {'JAN' 'FEB' 'MAR'  .... }
 1. « EVAL IF TOTAL DUP TYPE 6. == THEN DROP ELSE + END UPDIR » DOSUBS
»

....
What is your MONTOT  object for ?

The MONTOT was a way to grab two lists, add them together, then push a list sum into the TOTAL file for each month, but I suspect your way is far more elegant.

(09-15-2017 08:51 PM)Gilles59 Wrote:  EDIT : I dont know how you create your RPL program, but I suggest you to use HPUserEdit with Emu48

I grabbed the latest alpha for HPUserEdit, my only problem with it is that I don't know where the current author lives, or whether he is still maintaining HPUserEdit. I did grab a English language file for the latest alpha (6.0a2). A hint to users that I worked out: to change the language in HPUserEdit, fire up RegEdit, look for HKCU\Software\HPUerEdit6\Environment\Language and change that string from Spanish to English, then save. No more having to rename the English file to Spanish.lng. I tried adding back a couple of the missing strings in the file, but I'm not entirely sure if I was successful.

(Post 83)