Using the Caché ^%R Routine - InterSystems Documentation

More documents

Recommendations

Info

LANG^%R LANG^%R LANG^%R (rtn, namesp) Parameters rtn namesp The name of the target routine. The namespace the routine is saved in. Description This function returns the value of the language encoding for the specified routine. Parameters rtn An expression which evaluates to a string. The content of the string specifies the name of the routine to be searched for. namesp A string whose value is the namespace in which the designated routine has been saved. The parameter is optional. If unspecified, the current namespace is assumed. Remarks This function returns the integer value which encodes the language mode of the specified routine. A list of the encodings is given at the beginning of this document. If the routine extension is invalid, this function returns an empty string. If the extension is "MAC", the value returned is 0 (ObjectScript), regardless of whether the routine exists or not. Examples Here we check to see what some routines are written in. 18 Using the Caché ^%R Routine
LANGSET^%R ; set up the data Set namespace = "%CACHELIB" set languages = $LISTBUILD("ObjectScript", "DSM-11", "DTM", "", "", "DSM-VMS", "DSM-J", "DTM-J", "MSM", "Basic") ; do it for routine = "%R.OBJ", "ArbitraryName.MAC", "SomeOther.RTN" { Set code = $$LANG^%R(routine, namespace) If ($ISVALIDNUM(code)) { Set lang = $LISTGET(languages, (code + 1), "") Set:(lang = "") lang = "Unknown" Write routine, " language: ", lang, ! } Else { Write routine, ": invalid extension", ! } } LANGSET^%R LANGSET^%R (rtn, langmode) Parameters rtn langmode The name of the target routine. An indicator specifying the new language of the source. Description This function returns the value of the language encoding for the specified routine. Parameters rtn A string that specifies the name of the routine to be searched for. langmode An integer specifying the language that the statements of rtn are written in. Using the Caché ^%R Routine 19
Page 1 and 2: Using the Caché ^%R Routine Versio
Page 3: Table of Contents Using the Caché
Page 6 and 7: • under certain circumstances, th
Page 8 and 9: Note: Current users of Caché are s
Page 10 and 11: ParseRoutineName^%R Parameters rtn
Page 12 and 13: ROUTINE^%R • Retrieve saved sourc
Page 14 and 15: ROUTINE^%R WARNING! This example cr
Page 16 and 17: CHECK^%R Remarks This routine refor
Page 18 and 19: DATE^%R DATE^%R DATE^%R (rtn, forma
Page 20 and 21: DEL^%R DEL^%R DEL^%R (rtn, namesp)
Page 24 and 25: LENGTH^%R Remarks This function cha
Page 26 and 27: SIZE^%R SIZE^%R SIZE^%R (rtn, names
Page 28 and 29: LINE^%R Parameters rtn The name of
Page 30 and 31: LINESET^%R Parameters rtn A string
Page 32 and 33: LINESET^%R ; Change the namespace w
Page 34 and 35: VERMAX^%R Description This function
Page 36 and 37: VERMAX^%R ; Change the namespace we
Page 38 and 39: VERSION1^%R Remarks This function s
Page 40: VERSION^%R Examples See the example

Using the Caché ^%R Routine - InterSystems Documentation

Create successful ePaper yourself

Delete template?

Save as template?