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 |  Pointed To By FileMan Files |  Fields |  ICR |  All
Print Page as PDF
Global: ^SRO(132.9

Package: Surgery

Global: ^SRO(132.9


Information

FileMan FileNo FileMan Filename Package
132.9 ATTENDING CODES Surgery

Description

Directly Accessed By Routines, Total: 2

Package Total Routines
Surgery 2 SROPOST0    SROUTL    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Surgery 1 SURGERY(#130)[.166]    

Fields, Total: 4

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

  • INPUT TRANSFORM:  K:$L(X)>70!($L(X)<1) X
  • LAST EDITED:  MAY 10, 2004
  • HELP-PROMPT:  Enter the attending code name, 1-70 characters in length.
  • DESCRIPTION:  
    This is the attending code name briefly describing the highest level of resident supervision provided by the attending staff surgeon.
  • DELETE TEST:  1,0)= D EN^DDIOL("Deletion from the ATTENDING CODES file is not allowed!","","!") I 1
  • LAYGO TEST:  1,0)= D EN^DDIOL("Adding to the ATTENDING CODES file is not allowed!","","!") I 0
    WRITE AUTHORITY:  ^
  • CROSS-REFERENCE:  132.9^B1^MUMPS
    1)= S ^SRO(132.9,"B1",$E(X,1,70),DA)=""
    2)= K ^SRO(132.9,"B1",$E(X,1,70),DA)
    The B1 cross reference on the ATTENDING CODE NAME field is used for lookup purposes and to display the entire contents of the ATTENDING CODE NAME field when querying the file.
1 CODE 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>5!($L(X)<1) X
  • LAST EDITED:  MAY 10, 2004
  • HELP-PROMPT:  Enter the code representing the highest level of resident supervision, 1-5 characters in length.
  • DESCRIPTION:  
    This is the code representing the highest level of resident supervision provided by the attending staff surgeon.
    WRITE AUTHORITY:  ^
  • CROSS-REFERENCE:  132.9^C
    1)= S ^SRO(132.9,"C",$E(X,1,30),DA)=""
    2)= K ^SRO(132.9,"C",$E(X,1,30),DA)
2 DESCRIPTION 1;0 WORD-PROCESSING #132.92
3 INACTIVE 0;3 SET
  • '1' FOR YES;

  • LAST EDITED:  APR 29, 2004
  • HELP-PROMPT:  Enter YES to flag this code as inactive.
  • DESCRIPTION:  
    This field flags this attending code as inactive.
    WRITE AUTHORITY:  ^

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #569
  • QUALITY IMPROVEMENT CHECKLIST
    		•
    Info |  Desc |  Directly Accessed By Routines |  Pointed To By FileMan Files |  Fields |  ICR |  All