STANDARD DATA DICTIONARY #.7 -- MUMPS OPERATING SYSTEM FILE 3/24/25 PAGE 1 STORED IN ^DD("OS", (7 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 22.2) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This file stores operating system-specific code. Since the code to invoke some operating system utilities that FileMan uses varies among operating systems, code to perform these utilities is stored in and executed from this file. During the FileMan INIT process an operating system is selected so that FileMan knows which entry to use from this file. DD ACCESS: ^ RD ACCESS: ^ WR ACCESS: ^ LAYGO ACCESS: ^ POINTED TO BY: OPERATING SYSTEM field (#.01) of the OPERATING SYSTEM sub-field (#101.35) of the ORDER EXECUTE CODES File (#101.3) CROSS REFERENCED BY: NAME(B) .7,.01 NAME 0;1 FREE TEXT DESCRIPTION: Name of a MUMPS operating system that is supported by VA FileMan. CROSS-REFERENCE: .7^B 1)= S ^DD("OS","B",X,DA)="" 2)= K ^DD("OS","B",X,DA) .7,1 BREAK LOGIC 1;E1,250 FREE TEXT (Required) INPUT TRANSFORM: D ^DIM DESCRIPTION: MUMPS code to enable terminal break, i.e., to allow the user to interrupt processing with. WRITE AUTHORITY: @ .7,2 GLOBAL LENGTH (MAX) 0;3 NUMBER (Required) INPUT TRANSFORM: K:+X'=X!(X<30) X DESCRIPTION: Maximum allowable length of a global. .7,3 ROUTINE SIZE (MAX) 0;4 NUMBER (Required) INPUT TRANSFORM: K:+X'=X!(X<2048) X DESCRIPTION: Maximum allowable size of a routine. .7,4 CLOSING PRINCIPAL DEVICE 0;5 SET '1' FOR ALLOWED; DESCRIPTION: Is closing a job's principal device allowed? .7,5 NEW COMMAND 0;6 SET '1' FOR SUPPORTED; DESCRIPTION: Is the NEW command supported? .7,7 INDIVIDUAL SUBSCRIPT LENGTH 0;7 NUMBER INPUT TRANSFORM: K:X\1'=X!(X<9) X DESCRIPTION: Maximum length of an individual subscript. .7,8 SAVE SYMBOL TABLE 8;E1,250 FREE TEXT INPUT TRANSFORM: D ^DIM DESCRIPTION: MUMPS code that saves the contents of the local symbol table. WRITE AUTHORITY: @ .7,9 RIGHT MARGIN RM;E1,245 MUMPS INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM LAST EDITED: NOV 13, 2012 HELP-PROMPT: Enter MUMPS code, 1-245 characters. DESCRIPTION: Sets the $I width to X characters. If X=0, then the line in set to no wrap. WRITE AUTHORITY: @ .7,10 CHECK EXISTENCE OF UCI UCICHECK;E1,245 MUMPS INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM LAST EDITED: NOV 13, 2012 HELP-PROMPT: Enter MUMPS code, 1-245 characters. DESCRIPTION: Returns Y'="" if X is a valid UCI name. WRITE AUTHORITY: @ .7,11 ECHO OFF EOFF;E1,245 MUMPS INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM LAST EDITED: NOV 13, 2012 HELP-PROMPT: Enter MUMPS code, 1-245 characters. DESCRIPTION: Turn off echo to the $I device. WRITE AUTHORITY: @ .7,12 ECHO ON EON;E1,245 MUMPS INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM LAST EDITED: NOV 13, 2012 HELP-PROMPT: Enter MUMPS code, 1-245 characters. DESCRIPTION: Turn on echo to the $I device. WRITE AUTHORITY: @ .7,21 TURN OFF READ TERMINATORS TRMOFF;E1,245 MUMPS INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM LAST EDITED: NOV 13, 2012 HELP-PROMPT: Enter MUMPS code, 1-245 characters. DESCRIPTION: Turns off all controls as terminators. WRITE AUTHORITY: @ .7,22 TURN ON READ TERMINATORS TRMON;E1,245 MUMPS INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM LAST EDITED: NOV 13, 2012 HELP-PROMPT: Enter MUMPS code, 1-245 characters. DESCRIPTION: Turns on all controls as terminators. WRITE AUTHORITY: @ .7,23 GET READ TERMINATOR TRMRD;E1,245 MUMPS INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM LAST EDITED: NOV 13, 2012 HELP-PROMPT: Enter MUMPS code, 1-245 characters. DESCRIPTION: Returns in Y what terminated the last READ. WRITE AUTHORITY: @ .7,31 DISABLE TYPE AHEAD BUFFERING NO-TYPE-AHEAD;E1,245 MUMPS INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM LAST EDITED: NOV 13, 2012 HELP-PROMPT: Enter MUMPS code, 1-245 characters. DESCRIPTION: Turn off the TYPE-AHEAD for the device $I. WRITE AUTHORITY: @ .7,32 ENABLE TYPE AHEAD BUFFERING TYPE-AHEAD;E1,245 MUMPS INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM LAST EDITED: NOV 13, 2012 HELP-PROMPT: Enter MUMPS code, 1-245 characters. DESCRIPTION: Allow TYPE-AHEAD for the device $I. WRITE AUTHORITY: @ .7,419 MINIMUM SAFE $S 0;2 NUMBER INPUT TRANSFORM: K:+X'=X X DESCRIPTION: The minimum value for $S that will allow routines to process successfully. .7,1820 ROUTINE EXISTENCE TEST 18;E1,250 FREE TEXT INPUT TRANSFORM: D ^DIM DESCRIPTION: MUMPS code that tests for the existence of a routine. WRITE AUTHORITY: @ .7,2425 SET $X & $Y FROM 'IOX' & 'IOY' XY;E1,250 FREE TEXT INPUT TRANSFORM: D ^DIM DESCRIPTION: MUMPS code to XECUTE to move the position of the cursor to the position specified by the variables IOX and IOY. WRITE AUTHORITY: @ .7,2619 ZSAVE CODE ZS;E1,250 FREE TEXT INPUT TRANSFORM: D ^DIM DESCRIPTION: MUMPS code that will save a routine to disk. The name of the routine must be in variable X. The source code of the routine should be stored in ^UTLITY($J,0,%Y). Each node of the array will become a line of the routine. WRITE AUTHORITY: @ .7,2620 DELETE ROUTINE DEL;E1,245 MUMPS INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM LAST EDITED: NOV 13, 2012 HELP-PROMPT: Enter MUMPS code, 1-245 characters. DESCRIPTION: Delete the routine named in X from the UCI. WRITE AUTHORITY: @ .7,2621 LOAD ROUTINE INTO ARRAY LOAD;E1,245 MUMPS INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM LAST EDITED: NOV 13, 2012 HELP-PROMPT: Enter MUMPS code, 1-245 characters. DESCRIPTION: Load routine X into @(DIE_"XCNP,0)". WRITE AUTHORITY: @ .7,2622 SELECT ROUTINES RSEL;E1,245 MUMPS INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM LAST EDITED: NOV 13, 2012 HELP-PROMPT: Enter MUMPS code, 1-245 characters. DESCRIPTION: Returns the user's selection of routines in ^UTILITY($J,"routine name"). WRITE AUTHORITY: @ .7,21400 HIGHEST CHARACTER VALUE HIGHESTCHAR;E1,250 FREE TEXT INPUT TRANSFORM: D ^DIM HELP-PROMPT: Enter MUMPS code, 1-245 characters. DESCRIPTION: MUMPS code that sets into the "Y" variable the highest ('stop') character for the current MUMPS environment WRITE AUTHORITY: @ .7,190416 WRITE FROM SDP SDP;E1,250 FREE TEXT INPUT TRANSFORM: D ^DIM DESCRIPTION: MUMPS code that READs data from SDP and WRITEs it to a device. The $I value of the SDP device should be in variable DIO and the $I value for the output device in IO. The DLP variable should contain the open parameters of the SDP device. WRITE AUTHORITY: @ .7,190416.1 FIND SDP END SDPEND;E1,250 FREE TEXT INPUT TRANSFORM: D ^DIM DESCRIPTION: MUMPS code that tests for the end of SDP. WRITE AUTHORITY: @ INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):