Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: ZISS2

ZISS2.m

Go to the documentation of this file.
  1. %ZISS2 ;AC/SFISC - Collect screen parameters(Graphic set) ;11/04/97 16:28 [ 04/02/2003 8:29 AM ]
  1. ;;8.0;KERNEL;**1005,1007**;APR 1, 2003
  1. ;;8.0;KERNEL;**69**;JUL 10, 1995
  1. Q
  1. SETZ D KILL F %ZISI=1:1 S %ZISZ=$T(Z+%ZISI) Q:%ZISZ="" D SETDR^%ZISS
  1. D SET2^%ZISS1 G KV^%ZISS
  1. Q
  1. KILL K IOG1,IOG0,IOTLC,IOBLC,IOTRC,IOBRC,IOMT,IOTT,IOBT,IOLT,IORT,IOVL,IOHL
  1. Q
  1. Z ;;Variable name;Element number;Global subscript;Piece position;1=input key
  1. IOG1 ;;IOG1;68;G1;E
  1. IOG0 ;;IOG0;69;G0;E
  1. IOTLC ;;IOTLC;69.11;G;1
  1. IOBLC ;;IOBLC;69.12;G;2
  1. IOTRC ;;IOTRC;69.13;G;3
  1. IOBRC ;;IOBRC;69.14;G;4
  1. IOMT ;;IOMT;69.2;G;5
  1. IOTT ;;IOTT;69.3;G;6
  1. IOBT ;;IOBT;69.4;G;7
  1. IOLT ;;IOLT;69.5;G;8
  1. IORT ;;IORT;69.6;G;9
  1. IOVL ;;IOVL;69.7;G;10
  1. IOHL ;;IOHL;69.8;G;11