Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  ICR  | All
Print Page as PDF
Global: ^SRO(136

Package: Surgery

Global: ^SRO(136


Information

FileMan FileNo FileMan Filename Package
136 SURGERY PROCEDURE/DIAGNOSIS CODES Surgery

Description

Accessed By FileMan Db Calls, Total: 12

Package Total Routines
Surgery 5 SROCD    SROCD0    SROCD1    SRONOP1    SROPDEL    
Virtual Patient Record 3 VPRDJ07    VPRDSR    VPRSDASR    
Enterprise Health Management Platform 2 HMPDJ07    HMPDSR    
Health Summary 1 GMTSRON    
VistA Integration Adapter 1 VIABRPC4    

Pointer To FileMan Files, Total: 5

Package Total FileMan Files
CPT HCPCS Codes 2 CPT MODIFIER(#81.3)[#136.01(.01), #136.31(.01)]    CPT(#81)[.02, #136.03(.01)]    
DRG Grouper 1 ICD DIAGNOSIS(#80)[.03, #136.02(.01), #136.04(.01), #136.32(.01)]    
Kernel 1 NEW PERSON(#200)[#136.011(.01)]    
Surgery 1 SURGERY(#130)[.01]    

Fields, Total: 17

Field # Name Loc Type Details
.01 SURGERY CASE 0;1 POINTER TO SURGERY FILE (#130)
************************REQUIRED FIELD************************
SURGERY(#130)

  • INPUT TRANSFORM:  S DINUM=X
  • LAST EDITED:  DEC 14, 2004
  • HELP-PROMPT:  Enter the matching case in the SURGERY file (#130).
  • DESCRIPTION:  
    This is the case in the SURGERY file associated with this file entry.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  136^B
    1)= S ^SRO(136,"B",$E(X,1,30),DA)=""
    2)= K ^SRO(136,"B",$E(X,1,30),DA)
.02 PRINCIPAL PROCEDURE CODE 0;2 POINTER TO CPT FILE (#81) CPT(#81)

  • INPUT TRANSFORM:  D IN^SROCPT S DIC("S")="I $$ACTIV^SROCPT($S($D(SRTN):SRTN,$D(DA):DA,1:""""),+Y)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X D:$D(X) PHYPH^SROMOD0
  • OUTPUT TRANSFORM:  D DISPLAY^SROCPT0
  • LAST EDITED:  JUL 31, 2005
  • HELP-PROMPT:  Enter the CPT code for the principal procedure.
  • DESCRIPTION:  
    This is the Current Procedural Terminology (CPT) code corresponding with the principal procedure.
  • SCREEN:  S DIC("S")="I $$ACTIV^SROCPT($S($D(SRTN):SRTN,$D(DA):DA,1:""""),+Y)"
  • EXPLANATION:  Screen out Inactive Codes.
  • DELETE TEST:  1,0)= I 1 D EN^DDIOL("Deletion of the Principal Procedure Code is not allowed! ",,"!!,?2")
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.03 PRIN POSTOP DIAGNOSIS CODE 0;3 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#80)

  • INPUT TRANSFORM:  D GETAPI^SROICDGT("SURG","DIAG",$S($G(DA):DA,$G(SRTN):SRTN,1:""))
  • OUTPUT TRANSFORM:  NOT EXECUTABLE!! -- SPECIFIER NEEDS AN "O"!
  • LAST EDITED:  JUN 29, 2012
  • HELP-PROMPT:  Enter the ICD Diagnosis code for the principal postoperative diagnosis.
  • DESCRIPTION:  
    This is the principal postoperative ICD diagnosis code.
  • DELETE TEST:  1,0)= I 1 D EN^DDIOL("Deletion of the Principal Postop Diagnosis Code is not allowed! ",,"!!,?2")
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.04 SERVICE CONNECTED (PRIN) 0;4 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JAN 11, 2005
  • HELP-PROMPT:  If the principal diagnosis is a service connected problem, enter YES.
  • DESCRIPTION:  
    This field indicates if the principal diagnosis is a service connected problem. This information may be passed to the VISIT file (#9000010) for use by PCE.
.05 AGENT ORANGE EXPOSURE (PRIN) 0;5 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JAN 11, 2005
  • HELP-PROMPT:  If the principal diagnosis is an agent orange exposure problem, enter YES.
  • DESCRIPTION:  
    This field indicates if the principal diagnosis is an agent orange exposure problem. This information may be passed to the VISIT file (#9000010) for use by PCE.
.06 IONIZING RAD EXPOSURE (PRIN) 0;6 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JAN 12, 2005
  • HELP-PROMPT:  If the principal diagnosis is an ionizing radiation exposure problem, enter YES.
  • DESCRIPTION:  
    This field indicates if the principal diagnosis is an ionizing radiation exposure problem. This information may be passed to the VISIT file (#9000010) for use by PCE.
.07 SOUTHWEST ASIA CONDITIONS (PR) 0;7 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JUL 28, 2006
  • HELP-PROMPT:  If the principal diagnosis is a problem related to service in SW Asia, enter YES.
  • DESCRIPTION:  
    This field indicates if the principal diagnosis is related to service in SW Asia. This information may be passed to the VISIT file (#9000010) for use by PCE.
.08 MILITARY SEXUAL TRAUMA (PRIN) 0;8 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JAN 12, 2005
  • HELP-PROMPT:  If the principal diagnosis is related to military sexual trauma, enter YES.
  • DESCRIPTION:  
    This field indicates if the principal diagnosis is a military sexual trauma problem. This information may be passed to the VISIT file (#9000010) for use by PCE.
.09 HEAD AND/OR NECK CANCER (PRIN) 0;9 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JAN 12, 2005
  • HELP-PROMPT:  If the principal diagnosis is a problem related to head and/or neck cancer, enter YES.
  • DESCRIPTION:  
    This field indicates if the principal diagnosis is a head and/or neck cancer problem. This information may be passed to the VISIT file (#9000010) for use by PCE.
.1 COMBAT VET (PRIN) 0;10 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JAN 12, 2005
  • HELP-PROMPT:  If the principal diagnosis is a problem related to combat, enter YES.
  • DESCRIPTION:  
    This field indicates if the principal diagnosis is a combat related problem. This information may be passed to the VISIT file (#9000010) for use by PCE.
.11 PROJ 112/SHAD (PRIN) 0;11 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  NOV 17, 2005
  • HELP-PROMPT:  If the principal diagnosis is a problem related to PROJ 112/SHAD, enter YES.
  • DESCRIPTION:  
    This field indicates if the principal diagnosis is a PROJ 112/SHAD related problem. This information may be passed to the VISIT file (#9000010) for use by PCE.
1 PRIN PROCEDURE CPT MODIFIERS 1;0 POINTER Multiple #136.01 136.01

  • LAST EDITED:  DEC 15, 2004
2 PRIN ASSOCIATED DIAGNOSES 2;0 POINTER Multiple #136.02 136.02

  • LAST EDITED:  DEC 15, 2004
3 OTHER PROCEDURE CODES 3;0 POINTER Multiple #136.03 136.03
4 OTHER POSTOP DIAGNOSIS CODES 4;0 POINTER Multiple #136.04 136.04

  • LAST EDITED:  JAN 12, 2005
10 CODING COMPLETE 10;1 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  MAR 09, 2005
  • HELP-PROMPT:  Enter YES if the record is complete and ready to send to PCE.
  • DESCRIPTION:  
    This field indicates if the coding record is complete for this case and is ready to send to PCE.
    WRITE AUTHORITY: ^
11 CODING COMPLETED BY 11;0 POINTER Multiple #136.011 136.011

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #4872
  • DSS - DECISION SUPPORT SYSTEM EXTRACTS
  • Spinal Cord Dysfunction
  • Virtual Patient Record
  • Health Summary
  • VistA Integration Adapter
    		•  PRINCIPAL PROCEDURE CODE (.02).
    Access: Direct Global Read & w/Fileman

    PRIN POSTOP DIAGNOSIS CODE (.03).
    Access: Direct Global Read & w/Fileman

    OTHER PROCEDURE CODE (.01).
    Access: Direct Global Read & w/Fileman

    OTHER POSTOP DIAGNOSIS CODE (.01).
    Access: Direct Global Read & w/Fileman

    PRIN PROCEDURE CPT MODIFIER (.01).
    Access: Direct Global Read & w/Fileman

    OTHER PROCEDURE CPT MODIFIER (.01).
    Access: Direct Global Read & w/Fileman
    Info |  Desc |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  ICR  | All