<?xml version="1.0"?>
<feed xmlns="http://www.w3.org/2005/Atom" xml:lang="en">
	<id>https://wiki.vmssoftware.com/index.php?action=history&amp;feed=atom&amp;title=F%24CSID%28%29</id>
	<title>F$CSID() - Revision history</title>
	<link rel="self" type="application/atom+xml" href="https://wiki.vmssoftware.com/index.php?action=history&amp;feed=atom&amp;title=F%24CSID%28%29"/>
	<link rel="alternate" type="text/html" href="https://wiki.vmssoftware.com/index.php?title=F$CSID()&amp;action=history"/>
	<updated>2026-05-02T09:23:08Z</updated>
	<subtitle>Revision history for this page on the wiki</subtitle>
	<generator>MediaWiki 1.43.3</generator>
	<entry>
		<id>https://wiki.vmssoftware.com/index.php?title=F$CSID()&amp;diff=862&amp;oldid=prev</id>
		<title>Darya.zelenina: Created page with &quot;&#039;&#039;&#039;F$CSID&#039;&#039;&#039; is a lexical function that returns an identification number from an OpenVMS Cluster system and updates the context symbol to point to the cu...&quot;</title>
		<link rel="alternate" type="text/html" href="https://wiki.vmssoftware.com/index.php?title=F$CSID()&amp;diff=862&amp;oldid=prev"/>
		<updated>2019-06-28T19:04:23Z</updated>

		<summary type="html">&lt;p&gt;Created page with &amp;quot;&amp;#039;&amp;#039;&amp;#039;F$CSID&amp;#039;&amp;#039;&amp;#039; is a &lt;a href=&quot;/Lexical_functions&quot; title=&quot;Lexical functions&quot;&gt;lexical function&lt;/a&gt; that returns an identification number from an OpenVMS Cluster system and updates the context symbol to point to the cu...&amp;quot;&lt;/p&gt;
&lt;p&gt;&lt;b&gt;New page&lt;/b&gt;&lt;/p&gt;&lt;div&gt;&amp;#039;&amp;#039;&amp;#039;F$CSID&amp;#039;&amp;#039;&amp;#039; is a [[Lexical functions|lexical function]] that returns an identification number from an OpenVMS Cluster system and updates the context symbol to point to the current position in the system&amp;#039;s cluster node list. &lt;br /&gt;
&lt;br /&gt;
=Syntax=&lt;br /&gt;
&lt;br /&gt;
F$CSID(context-symbol)&lt;br /&gt;
&lt;br /&gt;
=Return Value=&lt;br /&gt;
&lt;br /&gt;
A character string containing the system cluster identification number in the system&amp;#039;s list of clustered nodes. If the current system is not a member of a cluster, the first return value is null. After the last system cluster identification number is returned, the F$CSID function returns a null string (&amp;quot;&amp;quot;).  &lt;br /&gt;
&lt;br /&gt;
=Arguments=&lt;br /&gt;
&lt;br /&gt;
==context-symbol==&lt;br /&gt;
&lt;br /&gt;
Specifies a symbol that DCL uses to store a pointer into the system&amp;#039;s list of clustered nodes. The F$CSID function uses this pointer to return a cluster identification number. Specify the context-symbol argument by using a symbol. The first time you use the F$CSID function, use a symbol that is either undefined or equated to the null string. If the context-symbol argument is undefined or equated to a null string, the F$CSID function returns the cluster identification number of the first system in the system&amp;#039;s cluster node list. Subsequent calls to the F$CSID function will return the cluster identification number of the rest of the nodes in the cluster. &lt;br /&gt;
&lt;br /&gt;
=Examples=&lt;br /&gt;
&lt;br /&gt;
 $ IF F$GETSYI(&amp;quot;CLUSTER_MEMBER&amp;quot;) .EQS. &amp;quot;FALSE&amp;quot; THEN GOTO NOT_CLUSTER &lt;br /&gt;
 $ CONTEXT = &amp;quot;&amp;quot; $START: $   id = F$CSID (CONTEXT) &lt;br /&gt;
 $   IF id .EQS. &amp;quot;&amp;quot; THEN EXIT &lt;br /&gt;
 $   nodename = F$GETSYI (&amp;quot;NODENAME&amp;quot;,,id) &lt;br /&gt;
 $   WRITE SYS$OUTPUT nodename &lt;br /&gt;
 $   GOTO start &lt;br /&gt;
 $NOT_CLUSTER: &lt;br /&gt;
 $ WRITE SYS$OUTPUT &amp;quot;Not a member of a cluster.&amp;quot; &lt;br /&gt;
 $ EXIT &lt;br /&gt;
&lt;br /&gt;
This command procedure uses the F$CSID function to display a list of cluster system names. The assignment statement declares the symbol CONTEXT, which is used as the context- symbol argument for the F$CSID function. Because CONTEXT is equated to a null string, the F$CSID function will return the first cluster identification number in the cluster node list. If the F$CSID function returns a null value, then the command procedure either is at the end of the list, or is attempting this operation on a nonclustered node. The call to F$GETSYI checks whether the current node is a member of a cluster. The command procedure will exit on this condition. If the F$CSID function does not return a null value, then the command procedure uses the identification number as the third argument to the F$GETSYI function to obtain the name of the system. The name is then displayed using the WRITE command. &lt;br /&gt;
 &lt;br /&gt;
[[Category:Lexical Functions]]&lt;/div&gt;</summary>
		<author><name>Darya.zelenina</name></author>
	</entry>
</feed>