Re: Newbie Question

On 31 May 2006 08:27:26 -0700, the_tragic_hip@xxxxxxxxx wrote:

I had this small cobol routine dropped on my desk and need to convert
it into a vb app, but I am not all that familiar with most of cobol. I
can read most of it and decipher what is going on, but having trouble
with this move.

var1 pic 9 comp.
var2 pic 9(10)

If var2 had the value of 138755482 and

MOVE VAR2 TO VAR1 is executed, what is actually stored in var1.

I apologize if this is a no brainer.

Thanks in advance.

What is stored is 2, but it is stored in binary. This seems like a
weird thing to do, truncated a value but stored as binary. How is
VAR1 used?

What version of CoBOL are you using? Compiler and OS.
.

Relevant Pages

  • Re: Newbie Question
    ... var2 pic 9 ... MOVE VAR2 TO VAR1 is executed, what is actually stored in var1. ... digit integer) won't hold it either. ... has done something "cute" and if you don't know COBOL you are in for a VERY ...
    (comp.lang.cobol)
  • Re: Newbie Question
    ... but I am not all that familiar with most of cobol. ... var2 pic 9 ... MOVE VAR2 TO VAR1 is executed, what is actually stored in var1. ... loop through it digit by digit, ...
    (comp.lang.cobol)
  • Re: [PHP] string as file
    ... This is an example of $var1 and $var2. ... I think that neither you nor Greg understands what I'm looking for. ... Use regular expressions or straight string replacements - that's the best way to implement mail-merge type behaviour. ...
    (php.general)
  • Re: Newbie Question
    ... var2 pic 9 ... MOVE VAR2 TO VAR1 is executed, what is actually stored in var1. ... loop through it digit by digit, ... Converting the string into a long might get you into problems though. ...
    (comp.lang.cobol)
  • Re: Form variable in query
    ... Dim var1 As Date ... Dim var2 As Date ... Public Function MyVar1() As Date ...
    (microsoft.public.access.queries)