Button for 1977 Button for 1984 Button for 1990 Button for 1995 Button for MDC Button for notes Button for examples
☜

$%COMPARE

Draft MDC Standard

☞

1 CHARACTER Library
1.2 COMPARE

COMPARE(A,B,CHARMOD) New x,y
	; Assume current collation, i.e. ]], if no CHARMOD specified
	If $Get(CHARMOD)="" Quit $Select(A=B:0,A]]B:1,1:1)
	;
	; Otherwise need to override and do string compare
	; on collation value
	Set x=$%COLLATE^CHARACTER(A,CHARMOD)
	Set y=$%COLLATE^CHARACTER(B,CHARMOD)
	Quit $Select(x=y:0,x]y:1,1:1)
Button for 1977 Button for 1984 Button for 1990 Button for 1995 Button for MDC Button for notes Button for examples

Copyright © Standard Documents; 1977-2024 MUMPS Development Committee;
Copyright © Examples: 1995-2024 Ed de Moel;
Copyright © Annotations: 2003-2008 Jacquard Systems Research
Copyright © Annotations: 2008-2024 Ed de Moel.

Some specifications are "approved for inclusion in a future standard". Note that the MUMPS Development Committee cannot guarantee that such future standards will indeed be published.

This page most recently updated on 30-Nov-2011, 19:43:31.

For comments, contact Ed de Moel (demoel@jacquardsystems.com)