Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details |  All
Print Page as PDF
Sub-Field: 130.01

Package: Surgery

SURGERY(#130)-->130.01

Sub-Field: 130.01


Information

Parent File Name Number Package
SURGERY(#130) PROSTHESIS INSTALLED 130.01 Surgery

Details

Field # Name Loc Type Details
.01 PROSTHESIS ITEM 0;1 POINTER TO PROSTHESIS FILE (#131.9) PROSTHESIS(#131.9)

  • INPUT TRANSFORM:  S DIC("S")="I '$P(^(0),U,6)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUN 03, 1992
  • HELP-PROMPT:  Enter the name of the implanted prosthetic device.
  • DESCRIPTION:  This is the name of the implanted prosthetic device required for this operative procedure. If entered, this information appears on the Nurse Intraoperative Report.
  • SCREEN:  S DIC("S")="I '$P(^(0),U,6)"
  • EXPLANATION:  Screen prevents selection of inactive entries.
  • DELETE TEST:  .01,0)= I $D(^SRF(DA(1),"CON")),$P(^("CON"),"^") D ^SROCOND I 0
  • CROSS-REFERENCE:  130.01^AC^MUMPS
    1)= D PRO^SROXR4
    2)= Q
    The AC cross reference on the PROSTHESIS ITEM field of the PROSTHESIS INSTALLED multiple stuffs the default information stored in the PROSTHESIS file (131.9).
1 VENDOR 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>64!($L(X)<2) X
  • HELP-PROMPT:  Your answer must be 2 to 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 to 64 characters in length.
  • DESCRIPTION:  This is the model of the implanted prosthetic device.
2.5 LOT/SERIAL NO 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  AUG 25, 1984
  • HELP-PROMPT:  Your answer must be 1 to 30 characters in length.
  • DESCRIPTION:  This is the lot/serial number of the implanted prosthetic device.
3 *STERILE CODE 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  AUG 25, 1984
  • HELP-PROMPT:  Your answer must be 1 to 30 characters in length.
  • DESCRIPTION:  
    This is the sterilization number of the implanted device.  This field is marked for deletion.
4 *STERILE NUMBER 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  FEB 02, 1993
  • HELP-PROMPT:  Your answer must be 1 to 30 characters in length.
  • DESCRIPTION:  
    This is the sterilization number of the implanted prosthetic device.  This field is marked for deletion.
5 STERILE RESP 0;7 SET
  • 'M' FOR MANUFACTURER;
  • 'SPD' FOR SPD;
  • 'SUR' FOR SURGERY;

  • LAST EDITED:  SEP 15, 1984
  • HELP-PROMPT:  Enter the code corresponding to sterilization accountability.
  • DESCRIPTION:  This is the code corresponding to the sterilization accountability. Although this information is optional, it may be useful in documentation of this case.
6 SIZE 1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  JAN 15, 1987
  • HELP-PROMPT:  Your answer must be 1 to 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:  NOV 14, 1989
  • HELP-PROMPT:  Type a Number between 1 and 99999, 0 Decimal Digits
  • DESCRIPTION:  This is the quantity of this prosthetic device used for this operative procedure.
8 IMPLANT STERILITY CHECKED 2;1 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  JUN 29, 2006
  • HELP-PROMPT:  Enter YES or NO, documenting whether implant sterility was checked.
  • DESCRIPTION:  
    This field documents whether or not the implant sterility was checked.  Your answer should be YES or NO.  This field is required for all prosthesis items entered for a surgery case.
9 STERILITY EXPIRATION DATE 2;2 DATE

  • INPUT TRANSFORM:  S Z=$E($P(^SRF($S($D(SRTN):SRTN,1:D0),0),U,9),1,7) D EN3^SROVAR K:Y<1 X
  • LAST EDITED:  AUG 21, 2006
  • HELP-PROMPT:  Enter the sterility expiration date.
  • DESCRIPTION:  
    This field documents the sterility expiration date. This field is required for all prosthesis items entered for a surgery case. Expiration Date can not be prior to Date of Operation.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
10 RN VERIFIER 2;3 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="S RESTRICT=""130.01,10"" D KEY^SROXPR I $D(SROK)" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
  • LAST EDITED:  AUG 18, 2006
  • HELP-PROMPT:  Enter the name of the person that verified the sterility information.
  • DESCRIPTION:  
    This is the name of the person that verified the sterility information. This field may be restricted by locally determined keys so that only people with the appropriate keys can be entered.
  • SCREEN:  S DIC("S")="S RESTRICT=""130.01,10"" D KEY^SROXPR I $D(SROK)"
  • EXPLANATION:  Entries in this field may be restricted based on already selected keys.
Info |  Details |  All