setsystemval

[Chris Sharman]

I'm guessing at what you actually want.
Is this any help ?

Qz>  choose courseyr ((nconvert(ascii(sysdate)[3:2])))

Choose accepts expressions from 7.10E onwards on OpenVMS - don't know about
other platforms.

Chris

-----Original Message-----
From: Graeme Martin [mailto:g.martin@cchs.usyd.edu.au]
Sent: 03 December 2001 02:35
To: mx% powerh-l@lists.swau.edu
Subject: re : setsystemval



Greetings ; Thanx for responses

I've discovered the problem ;

I  need initial pass to set val ;

in quiz


def yr char*2 = ascii(sysdate)[3:2]
def x  = 1 if setsystemval("YR",yr)
go

and then ....

acc rec_tran in stud
cho courseyr systemvalue"YR"
set rep lim 1
go


Environment variable used for CHOOSE : 01.

*W* The maximum number of records has been selected.

Records selected:  1


= = = = = = = = = = = = = = = = = = = = = = = = = = = =
Mailing list: powerh-l@lists.swau.edu
Subscribe: "subscribe" in message body to powerh-l-request@lists.swau.edu
Unsubscribe: "unsubscribe" in message body to
powerh-l-request@lists.swau.edu
http://lists.swau.edu/mailman/listinfo/powerh-l
This list is closed, thus to post to the list you must be a subscriber.
----------------------------------------------------------------------------
----
Date: Mon, 03 Dec 2001 13:21:22 +1100



-----------------------------------------------------------------------

Any views expressed in this message are those of the sender and not
necessarily those of CCA Group.  The unauthorized use, disclosure,
copying or alteration of this message is forbidden.  The contents of
this message may be confidential and/or privileged, copyright CCA Group
and are intended solely for the use of the individual or entity to whom
they are addressed.  Whilst this message has been scanned, CCA Group
cannot guarantee that it is virus free or compatible with your systems
and accepts no responsibility for any loss or damage arising from its
use. The recipient is advised to run their own anti-virus software. If
you receive this message in error please contact
postmaster@ccagroup.co.uk immediately, destroy any copies and delete it
from your computer systems.