This line for esc-G hiccuped. I put the cursor on the comma -- after "^") -- and after esc-G it refreshed screen and didn't call VGL. Same happened at the close parenthesis. I guess that is because the subscript logic is tricky '+$P(VAPA(5),"^")' to get past. We can't expect it to parse everything unless it is fed by a true M parser (like in XINDEX).
S ADDR(3)=VAPA(4)", "$P($G(^DIC(5,+$P(VAPA(5),"^"),0)),"^",2)_" "VAPA(6),ADDR(2)=
"" S:VAPA(2)]"" ADDR(2)=VAPA(2)" "_VAPA(3)
This line for esc-G hiccuped. I put the cursor on the comma -- after "^") -- and after esc-G it refreshed screen and didn't call VGL. Same happened at the close parenthesis. I guess that is because the subscript logic is tricky '+$P(VAPA(5),"^")' to get past. We can't expect it to parse everything unless it is fed by a true M parser (like in XINDEX).