Index: UI/PR/GA/dlgTBStartNew.cls.xml =================================================================== diff -u -r32020 -r44328 --- UI/PR/GA/dlgTBStartNew.cls.xml (.../dlgTBStartNew.cls.xml) (revision 32020) +++ UI/PR/GA/dlgTBStartNew.cls.xml (.../dlgTBStartNew.cls.xml) (revision 44328) @@ -257,7 +257,7 @@ Set i="" For Set i=$O(ArrayDS(i)) Quit:(i="") Do . Quit:(i="0-Index") - . Quit:($LI(ArrayDS(i),1)?1(1"GS",1"WS",1"AF",1"WI",1"GI",1"ZI",1"II")) + . Quit:($LI(ArrayDS(i),1)?1(1"GS",1"WS",1"AF",1"WI",1"GI",1"ZI",1"II",1"IA")) . Set lbIDs=lbIDs_$LB($LI(ArrayDS(i),1)) . Set sText=sText_$$$CRLF_$LI(ArrayDS(i),1)_" - "_$LG(ArrayDS(i),2) Set:($L(sText)) $E(sText,1,2)=""