RE: PHP-COBOL (77?)
| From: | John Parker | Date: | Tue, 02 Oct 2001 16:17:45 +0000 |
| Subject: | RE: PHP-COBOL (77?) | ||
| Groups: | php.dev | ||
| Request: | Send a blank email to php-dev+get-67081@lists.php.net to get a copy of this message | ||
> <?
> 01 a-tag
> 05 a-open-tag pic x(3) value '<a '
> 05 pic x(3) value 'href'
> 05 a-href pic x(50)
> 05 a-close-open-tag pic x(1) value '>'
> 05 a-display pic x(20)
> 05 a-close-tag pic x(4) value '</a>'
>
> PROGRAM DIVISION
> MOVE 'http://www.yahoo.com to a-href.
> MOVE 'Yahoo' to a-display.
> WRITE a-tag after advancing 2 lines;
> ?>
>
>
Dear God, no....
Hmm... thought (although it was an exceptionally long time ago), that the
data division always came above the program division.
JP.