declaring boolean variable in Micro Focus Net Express

From: Max Harris (harris_max_at_yahoo.com)
Date: 02/28/04

  • Next message: Tom Beckner: "Re: Discussion: rmgroup comp.software.year-2000"
    Date: 28 Feb 2004 09:07:15 -0800
    
    

    How do I declare a boolean variable in cobol?

    I'm trying to do this:

     05 BoolVar pic x(01).

     ...

     if BoolVar
        ...

    I'm in this situation: I have some known working (on Net Express) code
    (which I obviously didn't write), but one of the copybooks is gone ...
    I have the if statement, but not the variable declaration. So I know
    this can be done (at least on Net Express).


  • Next message: Tom Beckner: "Re: Discussion: rmgroup comp.software.year-2000"

    Relevant Pages

    • Re: VARCHAR columns in COBOL
      ... Unfortunately Cobol PIC Xwill always have length of 150 in all named ... will trailing spaces be removed upon INSERT ... EXEC SQL BEGIN DECLARE SECTION END-EXEC. ...
      (comp.lang.cobol)
    • Re: Productivity
      ... invoke GenAcct 'setAccount ... COBOL can support OO and support it well, and there are benefits in this, ... No more so than having to declare things in Working-Storage... ... public static string DBName ...
      (comp.lang.cobol)
    • Re: Productivity
      ... invoke GenAcct 'setAccount ... COBOL can support OO and support it well, and there are benefits in this, ... No more so than having to declare things in Working-Storage... ... And how about with TYPEDEFs? ...
      (comp.lang.cobol)
    • Re: Calling C routine from COBOL
      ... It's possible to use the return-code. ... For historical reasons, when you declare ... C/C++ compiler will not accept that the C routine returns something, ... called) to the COBOL pgm. ...
      (bit.listserv.ibm-main)
    • Re: Calling C routine from COBOL
      ... DISPLAY "PADWPD1'S RC IS " RETURN-CODE. ... Also can you please suggest some good book to learn about COBOL ... For historical reasons, when you declare ... void NSBCGDRV; ...
      (bit.listserv.ibm-main)