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 |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^SRO(131.9

Package: Surgery

Global: ^SRO(131.9


Information

FileMan FileNo FileMan Filename Package
131.9 PROSTHESIS Surgery

Description

Directly Accessed By Routines, Total: 6

Package Total Routines
Surgery 5 ^SRO(131.9    DONOR RACE    SRONIN    SRONRPT1    SROXR4    
DSS Extracts 1 ECXFEKE1    

Pointed To By FileMan Files, Total: 2

Package Total FileMan Files
DSS Extracts 1 SURGERY EXTRACT(#727.811)[22]    
Surgery 1 SURGERY(#130)[#130.01(.01)]    

Fields, Total: 11

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

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
  • LAST EDITED:  SEP 17, 1991
  • HELP-PROMPT:  Your answer must be 3-30 characters in length.
  • DESCRIPTION:  
    This is the name of the Prosthesis.
  • DELETE TEST:  1,0)= N SRX S SRX=$C(7)_"Deletion from the Prosthesis file is not allowed !!" D EN^DDIOL(SRX) I 1
  • CROSS-REFERENCE:  131.9^B
    1)= S ^SRO(131.9,"B",$E(X,1,30),DA)=""
    2)= K ^SRO(131.9,"B",$E(X,1,30),DA)
1 VENDOR 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>64!($L(X)<2) X
  • LAST EDITED:  OCT 02, 1990
  • HELP-PROMPT:  Your answer must be 2-64 characters in length.
  • DESCRIPTION:  This is the name of the manufacturer of the implanted prosthetic device.
2 MODEL 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>64!($L(X)<2) X
  • HELP-PROMPT:  Your answer must be 2-64 characters in length.
  • DESCRIPTION:  This is the model of the implanted prosthetic device.
3 STERILE CODE 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  OCT 02, 1990
  • HELP-PROMPT:  Your Answer must be 1-30 characters in length.
  • DESCRIPTION:  This is the Sterilization Number/Code identifying the implanted prosthetic device.
4 LOT/SERIAL NO 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • HELP-PROMPT:  Your Answer must be 1-30 characters in length.
  • DESCRIPTION:  This is the Lot/Serial Number of the implanted prosthetic device.
5 STERILE RESP 0;7 SET
  • 'M' FOR MANUFACTURER;
  • 'SPD' FOR SPD;
  • 'SUR' FOR SURGERY;

  • LAST EDITED:  OCT 02, 1990
  • DESCRIPTION:  This is the code corresponding to the party responsible for the sterilization of the implanted device.
6 SIZE 1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  OCT 02, 1990
  • HELP-PROMPT:  Your answer must be 1-30 characters in length.
  • DESCRIPTION:  This is the size of the implanted prosthetic device.
7 QUANTITY 1;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 02, 1990
  • HELP-PROMPT:  Type a Number between 1 and 99999, 0 Decimal Digits
  • DESCRIPTION:  This is quantity of the prosthetic device used for the procedure.
8 LOT NUMBER 1;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  SEP 01, 2011
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    This is the lot number of the implanted prosthetic device.
9 SERIAL NUMBER 1;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  SEP 01, 2011
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    This is the serial number of the implanted prosthetic device.
10 INACTIVE? 0;6 SET
  • '1' FOR YES;

  • LAST EDITED:  JUN 03, 1992
  • HELP-PROMPT:  Enter 'YES' to inactivate this file entry.
  • DESCRIPTION:  
    Enter 'YES' to make this entry inactive and to prevent its selection and use by users of the Surgery Package.

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #563
  • DSS - DECISION SUPPORT SYSTEM EXTRACTS
    		•  NAME (.01).
    Access: Direct Global Read & w/Fileman

    External References

    Name Field # of Occurrence
    EN^DDIOL .01DEL1+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^SRO(131.9 - [#131.9] .01(XREF 1S), .01(XREF 1K)

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> DA .01(XREF 1S), .01(XREF 1K)
    SRX .01DEL1+1~*
    X .01+1!, .01(XREF 1S), .01(XREF 1K), 1+1!, 2+1!, 3+1!, 4+1!, 6+1!, 7+1!, 8+1!
    , 9+1!
    Info |  Desc |  Directly Accessed By Routines |  Pointed To By FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Local Variables  | All