Michael Ogi's changes in patch 169 to improve browser printing
NO.: 14614                              VERSION: 22.2
  TAG: WP+1                             ROUTINE NAME OR GLOBAL REF: DID1
  REPORTER: SMH                         DATE CHANGED: JAN 23,2013
  PROGRAMMER: GEORGE TIMSON
  CHANGE: Word processing fields will now say whether they are audited in Standa
rd Listing                              DOCUMENTATION NEEDED: NO
  NEW VERSION: <22.2>
 LONG DESCRIPTION:
 < WP    I X,$D(^DD(+X,.01,0)) S W=$P(^(0),U,2) I W["W" D
 <       .S X="WORD-PROCESSING #"_+X D  S X="(NOWRAP)" D:W["L"  S
 X="(IGNORE ""|"")" D:W["X"!(W["x")  S X="(UNEDITABLE)" D:W["I"  S X=""
 ---
 > WP I X,$D(^DD(+X,.01,0)) S W=$P(^(0),U,2) I W["W" D  S X=""
 >  .S X="WORD-PROCESSING #"_+X D  S X="(NOWRAP)" D:W["L"  S X="(IGNORE
 ""|"")" D:W["X"!(W["x")  S X="(UNEDITABLE)" D:W["I"  S X="(AUDITED)"
 D:$G(^("AUDIT"))]""
 16a17
 > TYPE S W=+$P(X,"t",2) I W,$D(^DI(.81,W,0)) S W=" ("_$P(^(0),U)_" Data
 Type)" D W G ND:M=U
 DETAILED TESTING INSTRUCTIONS:
 Make a WP field auditable. Make sure that the standard listing says that

Type <Enter> to continue or '^' to exit:
 that field is auditable.
Various fixes dealing with Maximum Global Node Length.

NO.: 14616                              VERSION: 22.2
  TAG: passim                           ROUTINE NAME OR GLOBAL REF: DINIT0F5
  REPORTER: smh                         DATE CHANGED: JAN 23,2013
  PROGRAMMER: GEORGE TIMSON
  CHANGE: Free Text form Min/Max fields are now free text themselves to allow en
tries greater than 250, which is hardcoded in DIR
  DOCUMENTATION NEEDED: YES
  DOCUMENTATION NOTES: Document that long nodes are now possible.
  NEW VERSION: <22.2>
 DETAILED TESTING INSTRUCTIONS:
 Set ^DD("STRING_LIMIT") to a large number not to exceed the capacity of
 your database.

 In the Screenman Modify File Attributes, make a free text field whose
 length is > 250 characters. It should be accepted. Previously, it
 wouldn't.

NO.: 14615                              VERSION: 22.2
  TAG: H,WITHff                         ROUTINE NAME OR GLOBAL REF: DIR2
  REPORTER: GFT                         DATE CHANGED: JAN 23,2013
  PROGRAMMER: GEORGE TIMSON
  CHANGE: Replace/With prompt now will allow more than 245 characters
  DOCUMENTATION NEEDED: NO              NEW VERSION: <22.2>
 DETAILED TESTING INSTRUCTIONS:
 In a field that can accomodate a lot of data, do a replace/with and put
 in more than 255 characters. It should accept it. Previously, it couldn't.

NO.: 14613                              VERSION: 22.2
  TAG: CHKSUBff                         ROUTINE NAME OR GLOBAL REF: DICATTDM
  REPORTER: SMH                         DATE CHANGED: JAN 23,2013
  PROGRAMMER: GEORGE TIMSON
  CHANGE: Screenman Modify File Atrributes now autosuggests next available node
if you are above 250 characters         DOCUMENTATION NEEDED: YES
  DOCUMENTATION NOTES: Document that long nodes are now possible
  NEW VERSION: <22.2>
 LONG DESCRIPTION:
 < CHKSUB(X)     ;used as INPUT TRANSFORM for Fields 16 & 76
 ---
 > CHKSUB(X,DISHORT) ;used as INPUT TRANSFORM for Fields 16 (SUBSCRIPT) &
 76 (MUL SUBSCRIPT)  X is the subscript name.  DISHORT says 'don't go
 beyond 250'
 37c38
 <       S M=$$GET^DDSVALF(20.5,"DICATT",1,"","")
 ---
 >  S M=$$GET^DDSVALF(20.5,"DICATT",1,"","") ;'Is this field Multiple?'
 40c41,42
 <       I $G(DICATTLN),$$MAX(DICATTLN,X)>($G(^DD("STRING_LIMIT"),255)-5)
 Q "Too much to store at the '"_X_"' subscript"
 ---
 >  I '$G(DICATTLN) Q 1 ;if we do not have a current length for the field,
 we are OK
 >  S M=$S($G(DISHORT):250,1:$G(^DD("STRING_LIMIT"),255)-5) I
 $$MAX(DICATTLN,X)>M Q "Too much to store at the '"_X_"' subscript"
 DETAILED TESTING INSTRUCTIONS:
 Set ^DD("STRING_LIMIT") to a high value.

 Keep making fields until you reach 250 characters full on the same node.
 Make sure that when you get there that
 1. You can still place items in the node.
 2. You are suggested the next node.

 You need to test this on both roll and scroll and screenman Modify
 Fileman Attribute forms.