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

Package: Surgery

SURGERY(#130)-->130.23

Sub-Field: 130.23


Information

Parent File Name Number Package
SURGERY(#130) OTHER SCRUBBED ASSISTANTS 130.23 Surgery

Details

Field # Name Loc Type Details
.01 OTHER SCRUBBED ASSISTANTS 0;1 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="S RESTRICT=""130.23,.01"" D KEY^SROXPR I $D(SROK)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAY 26, 1993
  • HELP-PROMPT:  Enter the names of persons other than those already listed as scrubbed.
  • DESCRIPTION:  These are names of persons in the operating room other than those that are already listed as scrubbed.
  • SCREEN:  S DIC("S")="S RESTRICT=""130.23,.01"" D KEY^SROXPR I $D(SROK)"
  • EXPLANATION:  Entries in this field may be restricted based on locally selected keys.
  • DELETE TEST:  .01,0)= I $D(^SRF(DA(1),"CON")),$P(^("CON"),"^") D ^SROCOND I 0
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  130.23^B
    1)= S ^SRF(DA(1),28,"B",$E(X,1,30),DA)=""
    2)= K ^SRF(DA(1),28,"B",$E(X,1,30),DA)
1 COMMENTS 1;0 WORD-PROCESSING #130.35

  • DESCRIPTION:  These are comments related to this person that may be useful in documentation of this case.
Info |  Details