might work. but if you have whitespaces after your value this might do nothing. you would stil have to inspect the string and replace the space by loval i guess. didn't try
i ditched the columns for my example:) but i don't mind the column-specific syntax. in fact, i really like it
but IBM introduced free format RPG some time ago you can start a free block wich/free and end it with/end-free http://www.ilerpgprogramming.com/2009/01/code-examples-of-free-format-rpg-iv.html but they did a sloppy job on the implementation the definitions in the program header and some operations still have to be done in fixed format
ok, this doesn't bring us any further, but do you really think, that moving something in a right justified variable is the solution?
this doesn't only need another variable, but if your source value has trailing spaces you will need a ridiculously long INSPECT line and an index variable for a substring. since cobol is dumb, you will further need an INITIALIZE for both variables.
cobol: 01 var1 PIC X(50) 01 var2 PIC X(50) justified right 01 sub PIC 9(2) initialize var1 var2 sub move "test " to var1 initialize var1 tallying sub for trailing space if sub = 0 move var1 to var2 else move var1(1:sub) to var2 end-if
rpg: d var1 s 50a d var2 s 50a c eval var1='test ' c evalr var2=%trim(var1)
seems way more convinient:) even tough RPG is ill-reputed as an old static programming language this looks somehow like any other high level language and anyone should understand what's going on here without trying to figure out what that strange INSPECT does
I hate it.
Stupidest language of all time.
I'm trying to convert all these crap programs to nicely done RPG IV, but its a Don Quijote task.
I hate the fact, that file access can only be done in 50 lines of code.
String operations are total nonsense, ever tried to get a string rightaligned?
RPG file access via chain is done in 5-6 lines including the definition of the file and rightalign via evalr().
They should store them in small colorful plastic balls.
Each time they encounter the enemy, everyone throws their roboball into some arena.
Gogo picachu!
yep.
children should play outside or with their parents or friends.
seeing a bird outside is better, than watching a video of the same bird on a computer.
"what was the last name of his girlfriend again?"
"uum, I think he said something like jaypeck"
Slashdot Mirror
might work.
but if you have whitespaces after your value this might do nothing.
you would stil have to inspect the string and replace the space by loval
i guess.
didn't try
i ditched the columns for my example :)
but i don't mind the column-specific syntax.
in fact, i really like it
but IBM introduced free format RPG some time ago /free and end it with /end-free
you can start a free block wich
http://www.ilerpgprogramming.com/2009/01/code-examples-of-free-format-rpg-iv.html
but they did a sloppy job on the implementation
the definitions in the program header and some operations still have to be done in fixed format
ok, this doesn't bring us any further, but do you really think, that moving something in a right justified variable is the solution?
this doesn't only need another variable, but if your source value has trailing spaces you will need a ridiculously long INSPECT line and an index variable for a substring.
since cobol is dumb, you will further need an INITIALIZE for both variables.
cobol:
01 var1 PIC X(50)
01 var2 PIC X(50) justified right
01 sub PIC 9(2)
initialize var1 var2 sub
move "test " to var1
initialize var1 tallying sub for trailing space
if sub = 0
move var1 to var2
else
move var1(1:sub) to var2
end-if
rpg:
d var1 s 50a
d var2 s 50a
c eval var1='test '
c evalr var2=%trim(var1)
seems way more convinient :)
even tough RPG is ill-reputed as an old static programming language this looks somehow like any other high level language and anyone should understand what's going on here without trying to figure out what that strange INSPECT does
I hate it. Stupidest language of all time. I'm trying to convert all these crap programs to nicely done RPG IV, but its a Don Quijote task. I hate the fact, that file access can only be done in 50 lines of code. String operations are total nonsense, ever tried to get a string rightaligned? RPG file access via chain is done in 5-6 lines including the definition of the file and rightalign via evalr().
nope. me, too. maybe because "considered healthful" is not worth a story? who wrote this, cpt. obvious?
They should instead spray on biological reactants to absorb odors and/or biodegradation accelerators to speed up the process.
biodegradation of what? plastic bags?
simyo is 24c/MB so not cheap.
you can pay 9eur for 1gb in advance but you will have to use it until the end of the month
At least it's better than being a non-fucking looser.
They should store them in small colorful plastic balls. Each time they encounter the enemy, everyone throws their roboball into some arena. Gogo picachu!
Now I gotta make my own dirty sanchez flicks...
yep. children should play outside or with their parents or friends. seeing a bird outside is better, than watching a video of the same bird on a computer. "what was the last name of his girlfriend again?" "uum, I think he said something like jaypeck"