AS/400 vs. VMS

[Knox, Dave (Dallas CSC Citrix)]

Had this one a while ago (on MPE), but principle is the same.

The id no.s tend to get driven by the first item on the cluster, so by
tweaking the order of the items, AND the align statement, you can fool it
into displaying the id no. As in...

> >align (1,,36)(,,5)(,,47)
> >field ELEMENT3 of FILEA display
> >field D_STRING
> >field ELEMENT4 of FILEA
> 
> 
> 
> ----------
> From: 	McKenzie, David[SMTP:dmckenzie@tradepointsys.com]
> Sent: 	Tuesday, December 28, 1999 4:27 PM
> To: 	'powerh-l@lists.swau.edu'
> Subject: 	AS/400 vs. VMS
> 
> 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.
> 
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
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.