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

$JUSTIFY

1990 Version of ANSI Standard

2.2.7.8 $Justify

$J[USTIFY] ( expr , intexpr )

See 2.3 for the definition of expr. See 2.2.4.1 for the definition of intexpr.

This form returns the value of expr right-justified in a field of intexpr spaces. Let m be $L(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(n-m) concatenated with expr1, where S(x) is a string of x spaces.

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

See 2.2.4 for the definition of numexpr. See 2.2.4.1 for the definition of intexpr.

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 $J(r, intexpr1). Note that if –1 < numexpr < 1, the result of $J 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-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.

This page most recently updated on 15-Nov-2023, 13:09:46.

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