STANDARD DATA DICTIONARY #3.07 -- PROGRAMMER MODE LOG FILE                                                        9/29/25    PAGE 1
STORED IN ^%ZUA(3.07,  (1541 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                   (VERSION 8.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
Entrance into programmer mode via the menu system is automatically logged in this file.  It points to the New Person File to
identify the user.  It is not cross-referenced.  


              DD ACCESS: @
              RD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @

   APPLICATION GROUP(S): XU


    LAST MODIFIED: JUN 23,2020@14:14:31

3.07,.001     DATE/TIME                  DATE

              INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
              DESCRIPTION:
                                Entries in this file are uniquely identified by the precise time of entry into programmer mode.  


3.07,.01      USER                   0;1 POINTER TO NEW PERSON FILE (#200) (Required)

              LAST EDITED:      SEP 08, 1989 
              DESCRIPTION:
                                This field identifies the user by means of a pointer to the New Person File.  


3.07,1        UCI                    0;2 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
              HELP-PROMPT:      ANSWER MUST BE 1-10 CHARACTERS IN LENGTH 
              DESCRIPTION:
                                This field identifies the UCI account location of the entry into programmer mode.  


3.07,2        CPU                    0;3 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
              HELP-PROMPT:      ANSWER MUST BE 1-10 CHARACTERS IN LENGTH 
              DESCRIPTION:
                                This field identifies the CPU/Volume Set location of the entry into programmer mode.  


3.07,3        USER NUMBER             ;  COMPUTED

              MUMPS CODE:       S Y(3.07,3,1)=$S($D(^%ZUA(3.07,D0,0)):^(0),1:"") S X=$P(Y(3.07,3,1),U,1),X=X
              ALGORITHM:        INTERNAL(USER)
              LAST EDITED:      AUG 12, 2019 
              DESCRIPTION:
                                This field retrieves the user number from the User File to facilitate report display.  


3.07,4        USER NAME               ;  COMPUTED

              MUMPS CODE:       X ^DD(3.07,4,9.3) S X=$S(Y(3.07,4,2):Y(3.07,4,3),Y(3.07,4,4):X)
                                9.2 = S Y(3.07,4,1)=$S($D(^%ZUA(3.07,D0,0)):^(0),1:"") S X="CURRENT",X=$S(X=""!(X'?.ANP):"",$D(DIPA
                                ($E(X,1,30))):DIPA($E(X,1,30)),1:"") S X=X=$P(Y(3.07,4,1),U,2)
                                9.3 = X ^DD(3.07,4,9.2) S Y(3.07,4,2)=X S X=$S('$D(^VA(200,+$P(Y(3.07,4,1),U,1),0)):"",1:$P(^(0),U,
                                1)),Y(3.07,4,3)=X S X=1,Y(3.07,4,4)=X S X=""
              ALGORITHM:        $S(PARAM("CURRENT")=UCI:USER,1:"")
              LAST EDITED:      SEP 08, 1989 
              DESCRIPTION:      A computed field to give the name of the person that switched into Programmer mode, only if it was
                                in the current UCI. Returns empty string otherwise.  



      FILES POINTED TO                      FIELDS

NEW PERSON (#200)                 USER (#.01)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):
XUPMDISPLAY                   AUG 02, 1989@15:01  USER #0                                                Programmer Mode entry list
XUPROGH                       JUL 01, 1987        USER #0                                                                         @

SORT TEMPLATE(S):
XUPMDISPS                     AUG 12, 2019@08:50  USER #0    
SORT BY: +@USER;S1// ( USER not null)
  WITHIN USER, SORT BY: ]'DATE/TIME//    (User is asked range)


FORM(S)/BLOCK(S):