| Name | Value |
|---|---|
| NAME | WIDTH |
| MUMPS CODE | S:'$D(DIWF) DIWF="" S %Y=1,%=$F(DIWF,"C") X:% "F %Y=%:1 Q:$E(DIWF,%Y)'?1N" S DIWF=$E(DIWF,1,%-2)_$E(DIWF,%Y,999)_"C"_(X\1),X="" |
| EXPLANATION | DISPLAY FOLLOWING TEXT (ARG) COLUMNS ACROSS |
| WORD-PROCESSING | MEANINGFUL ONLY FOR W-P |