Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^SRO(137.45

Package: Surgery

Global: ^SRO(137.45


Information

FileMan FileNo FileMan Filename Package
137.45 LOCAL SURGICAL SPECIALTY Surgery

Description

Directly Accessed By Routines, Total: 138

Package Total Routines
Surgery 135 DONOR RACE    SRCHL7A    SRHLUO    SRHLVUO    SROACC1    SROACC2    SROACC3    SROACC4
SROACC5    SROACC6    SROACMP    SROAEX    SROALC    SROALCP    SROALCS    SROALCSP
SROALEC    SROALET    SROALL    SROALLP    SROALLS    SROALLSP    SROALM    SROALMN
SROALNC    SROALSL    SROALSS    SROALSSP    SROALST    SROALSTP    SROALT    SROALTP
SROALTS    SROALTSP    SROANT    SROANTP    SROANTS    SROANTSP    SROAOP1    SROAPRT3
SROAR1    SROAR2    SROAT0P    SROAT1P    SROAT1T    SROATM1    SROATMNO    SROATT2
SROAUTL3    SROAUTLC    SROCAN0    SROCMP    SROCON    SRODELA    SRODIS0    SRODLA1
SRODLA2    SRODLT0    SRODLT2    SRODPT    SROERR1    SROICU1    SROPCEX    SROPRI
SROSPSS    ^SRO(137.45    SROICU2    SROINQ    SROMORT    SROPCE    SROPCE0    SROPCE0A
SROPCE0B    SROPCEP    SROPCEU    SROPCEU0    SROPFSS    SROPLIST    SROPLSTS    SROPPC
SROPRE0    SROPRI1    SROPRI2    SROQADM    SROQD    SROQD0    SROQD1    SROQIDP0
SROQL    SROQN    SRORAT1    SRORAT2    SROREA1    SROREA2    SROREQ1    SROREQ4
SROSPC1    SROUNV2    SROUTUP    SROWC1    SROWC2    SROWC3    SROWL    SROWL0
SRSAVL1    SRSCD    SRSCDS    SRSCDS1    SRSCDW    SRSCDW1    SRSCHAP    SRSCHCA
SRSCHUN    SRSCOR    SRSCPT2    SRSPUT0    SRSRBS1    SRSRBW    SRSRBW1    SRSREQ
SRSRQST    SRSUTIN    SRSWL    SRSWL1    SRSWL10    SRSWL11    SRSWL12    SRSWL13
SRSWL3    SRSWL6    SRSWL7    SRSWL8    SRSWL9    SRSWLST    SRSWREQ    
DSS Extracts 2 ECXSURG    ECXUSUR1    
IFCAP 1 PRCPRPC1    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
DSS Extracts 1 ECXUTL6    

Pointed To By FileMan Files, Total: 10

Package Total FileMan Files
Surgery 9 SURGERY(#130)[.04]    SPECIAL INSTRUMENTS(#131.02)[#131.23(.01)]    SPECIAL SUPPLIES(#131.04)[#131.45(.01)]    PHARMACY ITEMS(#131.06)[#131.64(.01)]    OPERATION TIMES(#131.25)[.01]    SPECIAL EQUIPMENT(#131.3)[#131.34(.01)]    PLANNED IMPLANT(#131.5)[#131.56(.01)]    SURGERY WAITING LIST(#133.8)[.01]    SURGERY UTILIZATION(#131.8)[#131.82(.01)]    
IFCAP 1 INVENTORY DISTRIBUTED PATIENT SUPPLIES(#446.1)[130.03]    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Registration 1 SURGICAL SPECIALTY(#45.3)[1]    
Scheduling 1 HOSPITAL LOCATION(#44)[2]    

Fields, Total: 6

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>40!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  FEB 12, 1993
  • HELP-PROMPT:  Answer must be 3-40 characters in length.
  • DESCRIPTION:  
    This is the name of the 'local' surgical specialty used at this site.
  • DELETE TEST:  1,0)= W !,"Deletion from the Local Surgical Specialty file is not allowed !! ",*7 I 1
  • CROSS-REFERENCE:  137.45^B1^MUMPS
    1)= S ^SRO(137.45,"B1",$E(X,1,40),DA)=""
    2)= K ^SRO(137.45,"B1",$E(X,1,40),DA)
    The B1 cross reference on the NAME field is used for lookup purposes. It displays the entire name as defined in the NAME field (up to 40 characters).
1 NATIONAL SURGICAL SPECIALTY 0;2 POINTER TO SURGICAL SPECIALTY FILE (#45.3)
************************REQUIRED FIELD************************
SURGICAL SPECIALTY(#45.3)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U)?2N&(+^(0)>47&(+^(0)<63)!(+^(0)=78))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • OUTPUT TRANSFORM:  I '$D(SRCUSS("OUT")),Y'="" S Y=$P(^DIC(45.3,Y,0),"^",2)
  • LAST EDITED:  JUL 19, 2007
  • HELP-PROMPT:  Enter the 'national' Surgical Specialty in file 45.3 to which this 'local' surgical specialty points.
  • DESCRIPTION:  
    This is the 'national' surgical specialty in file 45.3 to which this 'local' specialty points.
  • SCREEN:  S DIC("S")="I $P(^(0),U)?2N&(+^(0)>47&(+^(0)<63)!(+^(0)=78))"
  • EXPLANATION:  Screen allows selection of standard entries only.
  • CROSS-REFERENCE:  137.45^C
    1)= S ^SRO(137.45,"C",$E(X,1,30),DA)=""
    2)= K ^SRO(137.45,"C",$E(X,1,30),DA)
2 ASSOCIATED CLINIC 0;5 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#44)

  • INPUT TRANSFORM:  S DIC("S")="I $$HL^SROUTL0(Y,$G(SRSITE(""DIV""))),$$ACTCLIN^SROUTL(Y)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAY 11, 1998
  • HELP-PROMPT:  Enter the clinic location associated with this specialty.
  • DESCRIPTION:  
    This is the default clinic associated with operations or procedures performed by this surgical specialty. This information is used to document patient encounters in the VISIT file (#900010).
  • SCREEN:  S DIC("S")="I $$HL^SROUTL0(Y,$G(SRSITE(""DIV""))),$$ACTCLIN^SROUTL(Y)"
  • EXPLANATION:  Select active, count clinic only for user's division.
10 INACTIVE? 0;3 SET
  • '1' FOR YES;

  • LAST EDITED:  JUN 04, 1992
  • HELP-PROMPT:  Enter 'YES' to inactivate this file entry.
  • DESCRIPTION:  
    Enter 'YES' to make this specialty inactive and to prevent its selection and use by users in the Surgery Package.
11 CODE 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>5!($L(X)<1) X
  • LAST EDITED:  JAN 28, 1993
  • HELP-PROMPT:  Your answer must be 1-5 characters in length.
  • DESCRIPTION:  This is a code used for selecting local surgical specialties. Your answer may be a number, number/letter combination, or brief alphabetic code. The specialty code is optional.
  • CROSS-REFERENCE:  137.45^D
    1)= S ^SRO(137.45,"D",$E(X,1,30),DA)=""
    2)= K ^SRO(137.45,"D",$E(X,1,30),DA)
    This is a regular cross reference used for lookup on the Local Surgical Specialty file.
12 ROBOTIC DEFAULT 0;6 SET
  • 'NO' FOR NO - ROBOTICS NOT USED;

  • LAST EDITED:  FEB 11, 2021
  • HELP-PROMPT:  Enter NO to automatically set the ROBOTIC ASSISTANCE (Y/N) field to NO when cases are created for this specialty.
  • DESCRIPTION:  Setting this field to NO - ROBOTICS NOT USED will cause the software to automatically set the ROBOTIC ASSISTANCE (Y/N) field to NO when a surgical case is created and this specialty is selected. The value of the ROBOTIC
    ASSISTANCE (Y/N) for the case can still be modified for the case later.
    Leave this field blank if the specialty uses robotics for any procedures.

Found Entries, Total: 13

NAME: GENERAL(OR WHEN NOT DEFINED BELOW)    NAME: GYNECOLOGY    NAME: NEUROSURGERY    NAME: OPHTHALMOLOGY    NAME: ORTHOPEDICS    NAME: OTORHINOLARYNGOLOGY (ENT)    NAME: PLASTIC SURGERY (INCLUDES HEAD AND NECK)    NAME: PROCTOLOGY    
NAME: THORACIC SURGERY (INC. CARDIAC SURG.)    NAME: UROLOGY    NAME: ORAL SURGERY (DENTAL)    NAME: PODIATRY    NAME: PERIPHERAL VASCULAR    

ICR, Total: 3

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #991
  • IFCAP
  • NAME (.01).
    Access: Pointed to

    NAME (.01).
    Access: Direct Global Read & w/Fileman

    ICR #1002
  • QUALITY IMPROVEMENT CHECKLIST
  • NAME (.01).
    Access: Read w/Fileman

    ICR #1855
  • DSS - DECISION SUPPORT SYSTEM EXTRACTS
  • NATIONAL SURGICAL SPECIALTY (1).
    Access: Direct Global Read & w/Fileman

    External References

    Name Field # of Occurrence
    ^DIC 1+1, 2+1
    Y^DIQ ID1+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD(45.3 ID1+1
    ^DIC(45.3 - [#45.3] ID1+1, 1OT+1
    ^SRO(137.45 - [#137.45] .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 11(XREF 1S), 11(XREF 1K)

    Naked Globals

    Name Field # of Occurrence
    ^(0 ID1+1, ID11+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    %I ID1+1*!
    >> C ID1+1*
    >> DA .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 11(XREF 1S), 11(XREF 1K)
    DIC ID1+1, 1+1!*, 2+1!*
    DIC("S" 1+1*, 1SCR+1*, 2+1*, 2SCR+1*
    >> DIE 1+1, 2+1
    >> SRCUSS("OUT" 1OT+1
    U ID1+1, ID11+1
    X .01+1!, .01(XREF 1S), .01(XREF 1K), 1+1*!, 1(XREF 1S), 1(XREF 1K), 2+1*!, 11+1!, 11(XREF 1S), 11(XREF 1K)
    >> Y ID1+1*, 1+1, 1OT+1*, 2+1
    >> Y(0 1OT+1*
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All