Button for 1977 Button for 1984 Button for 1990 Button for 1995 Button for MDC Button for notes Button for examples
Left Hand Pointer

$JUSTIFY

1995 Version of ANSI (Equivalent to Current ISO Version) of Standard

Right Hand Pointer

7.1.5.8 $Justify

$J[USTIFY] ( expr , intexpr )

This form returns the value of expr right-justified in a field of intexpr spaces. Let m be $Length(expr) and n be the value of intexpr. The following cases are defined:

  1. m '< n.
    Then the value returned is expr.
  2. Otherwise, the value returned is S(nm) concatenated with expr1, where S(x) is a string of x spaces.

$J[USTIFY] ( numexpr , intexpr1 , intexpr2 )

This form returns an edited form of the number numexpr. Let r be the value of numexpr after rounding to intexpr2 fraction digits, including possible trailing zeros. (If intexpr2 is the value 0, r contains no decimal point.) The value returned is $Justify(r, intexpr1). Note that if –1 < numexpr < 1, the result of $Justify does have a zero to the left of the decimal point. Negative values of intexpr2 are reserved for future extensions of the $Justify function.

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-2018 MUMPS Development Committee;
Copyright © Examples: 1995-2018 Ed de Moel;
Copyright © Annotations: 2003-2008 Jacquard Systems Research
Copyright © Annotations: 2008-2018 Ed de Moel.

This page most recently updated on 13-Sep-2014, 11:10:46 .

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