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    SROALEC
SROALET    SROALL    SROALLS    SROALLSP    SROALNC    SROALSL    SROALSS    SROALSSP
SROALST    SROALT    SROALTP    SROALTS    SROALTSP    SROANT    SROANTP    SROAOP1
SROAPRT3    SROAR1    SROAT0P    SROAT1P    SROATM1    SROATMNO    SROATT2    SROAUTL3
SROCAN0    SROCMP    SROCON    SRODELA    SRODIS0    SRODLA1    SRODLA2    SRODLT2
SROICU1    SROICU2    SROMORT    SROPCE0    SROPCE0A    SROPCE0B    SROPCEP    SROPCEU
SROPCEU0    SROPCEX    SROPLIST    SROPLSTS    SROPPC    SROPRE0    SROPRI    SROPRI1
SROPRI2    SROQD    SROQD1    SROQIDP0    SROQN    SRORAT1    SRORAT2    SROREA1
SROREA2    SROREQ1    SROREQ4    SROSPC1    SROSPSS    SROUNV2    SROUTUP    SROWC1
SROWC3    SROWL    SRSAVL1    SRSCD    SRSCDS    SRSCDS1    SRSCDW    SRSCHAP
SRSCHCA    SRSCHUN    SRSCOR    SRSCPT2    SRSPUT0    SRSRBS1    SRSRBW    SRSRBW1
SRSREQ    SRSRQST    SRSUTIN    SRSWL    SRSWL1    SRSWL11    SRSWL12    SRSWL8
SRSWL9    SRSWLST    SRSWREQ    ^SRO(137.45    SROALCSP    SROALLP    SROALM    SROALMN
SROALSTP    SROANTS    SROANTSP    SROAR2    SROAT1T    SROAUTLC    SRODLT0    SRODPT
SROERR1    SROINQ    SROPCE    SROPFSS    SROQADM    SROQD0    SROQL    SROWC2
SROWL0    SRSCDW1    SRSWL10    SRSWL13    SRSWL3    SRSWL6    SRSWL7    
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