AS/400 vs. VMS

[McKenzie, David]

Hi all,

I'm having a slight problem with an AS/400 / VMS discrepancy

I have the following code (sorta):

>
>screen SCREENA
>
>file FILEA primary occurs 5
>
>define D_STRING char*30 = ELEMENT1 of FILEA + ELEMENT2 of FILEA
>
>cluster occurs with FILEA
>
>align (1,,5)(,,36)(,,47)
>field D_STRING
>field ELEMENT3 of FILEA display
>field ELEMENT4 of FILEA
>
>align (,,5)(,,10)(,,24)
>field ELEMENT5 of FILEA display
>field ELEMENT6 of FILEA display
>
>cluster

The problem I'm having is that when I compile this code on the AS/400
(PH 6.07.F), I don't get any ID numbers. But when I compile the exact
same code on VMS (PH 8.10.C2),  my ID numbers reappear.  Now, I was able
to get them back on the AS/400 by changing my define to a temporary, but
I'd prefer not doing this and having to reload my temporary every time I
do a GET. 

Anyone have any ideas?

Dave McKenzie
TradePoint Systems, LLC
(603) 889-3200 x275

= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
This list is closed, thus to post to the list, you must be a subscriber.