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 |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^RMPR(668

Package: Prosthetics

Global: ^RMPR(668


Information

FileMan FileNo FileMan Filename Package
668 PROSTHETIC SUSPENSE Prosthetics

Description

Directly Accessed By Routines, Total: 62

Package Total Routines
Prosthetics 58 ACTION DATE    AMIS GROUPER    PATIENT 2319    RMPR SUSPENSE CLOSE    RMPR144P    RMPR150P    RMPR163P    RMPR29CA
RMPR29CB    RMPR29GU    RMPR29W1    RMPR29WO    RMPR8PG    RMPR8PG1    RMPR9CA    RMPR9CE
RMPR9CL    RMPR9DEM    RMPR9DM1    RMPR9DO    RMPR9EPD    RMPR9LM    RMPR9PA    RMPR9PCD
RMPR9PU    RMPR9S4    RMPR9S6    RMPR9S7    RMPR9S8    RMPR9VR    RMPR9X    RMPRED4
RMPREO    RMPREO24    RMPREOL    RMPREOPS    RMPREOS    RMPREOSA    RMPREOU    RMPREPDT
RMPRFC3    RMPRFC4    RMPRGULK    RMPRHL7A    RMPRHL7B    RMPRHL7U    RMPROWL    RMPRPCE1
RMPRPCED    RMPRPCEG    RMPRPCEL    RMPRS    RMPRSP    RMPRSP1    RMPRSP2    RMPRSP3
RMPRSP7    ^RMPR(668    

Accessed By FileMan Db Calls, Total: 15

Package Total Routines
Prosthetics 15 RMPR29CA    RMPR29CB    RMPR8PG    RMPR9CA    RMPREO23    RMPREO24    RMPREOPS    RMPREOS
RMPREOSA    RMPRFC4    RMPRHL7A    RMPRHL7B    RMPROWL    RMPRPCEG    RMPRS    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Prosthetics 1 PROSTHETIC 2529-3(#664.1)[.05]    

Pointer To FileMan Files, Total: 8

Package Total FileMan Files
Consult Request Tracking 2 REQUEST/CONSULTATION(#123)[20]    REQUEST SERVICES(#123.5)[23]    
Kernel 2 INSTITUTION(#4)[22.1]    NEW PERSON(#200)[6813161724]    
DRG Grouper 1 ICD DIAGNOSIS(#80)[1.630313233]    
Order Entry Results Reporting 1 ORDER(#100)[19]    
Prosthetics 1 RECORD OF PROS APPLIANCE/REPAIR(#660)[#668.81(.01)]    
Registration 1 PATIENT(#2)[1]    

Fields, Total: 64

Field # Name Loc Type Details
.01 SUSPENSE DATE 0;1 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  DEC 12, 2000
  • HELP-PROMPT:  Enter date and time as mmddyy@hhmm when this entry is added.
  • DESCRIPTION:  
    Date that the Suspense entry was entered.
  • TECHNICAL DESCR:  
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  668^B
    1)= S ^RMPR(668,"B",$E(X,1,30),DA)=""
    2)= K ^RMPR(668,"B",$E(X,1,30),DA)
1 VETERAN 0;2 POINTER TO PATIENT FILE (#2) PATIENT(#2)

  • LAST EDITED:  APR 07, 1992
  • HELP-PROMPT:  Please Enter The Name of the Veteran
  • DESCRIPTION:  
    Pointer to the Patient file.  MAS Patients may not become Prosthetic Patients while their eligility is being determined.
  • CROSS-REFERENCE:  668^C
    1)= S ^RMPR(668,"C",$E(X,1,30),DA)=""
    2)= K ^RMPR(668,"C",$E(X,1,30),DA)
    Cross refference to allow looking up by patient name.  e
1.5 PROVISIONAL DIAGNOSIS 8;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<1) X
  • LAST EDITED:  SEP 15, 2003
  • HELP-PROMPT:  Answer must be 1-50 characters in length.
  • DESCRIPTION:  
    CPRS Provisional Diagnosis at the time the Consult was created.
  • TECHNICAL DESCR:  
1.6 ICD 8;3 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#80)

  • LAST EDITED:  DEC 29, 2011
  • HELP-PROMPT:  Select the primary CPRS diagnosis code at the time of consult.
  • DESCRIPTION:  
    This is the primary CPRS diagnosis code at the time of consult. (Stuffed from HL7 message.)
2 STATION 0;7 POINTER TO INSTITUTION FILE (#4) INSTITUTION(#4)

  • LAST EDITED:  DEC 17, 1992
  • HELP-PROMPT:  Enter the Station Number of the patient.
  • DESCRIPTION:  
    This field stores the station number of the patient.
2.1 REQUESTING FACILITY 8;1 POINTER TO INSTITUTION FILE (#4) INSTITUTION(#4)

  • LAST EDITED:  MAR 01, 2000
  • DESCRIPTION:  
    CPRS Requesting Facility, local facility only from Consult Tracking.
2.3 URGENCY 8;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<3) X
  • LAST EDITED:  MAR 01, 2000
  • HELP-PROMPT:  Answer must be 3-20 characters in length.
  • DESCRIPTION:  
    From CPRS, the urgency the user defined at the time the Consult was created.
3 SUSPENSE FORM 0;3 SET
************************REQUIRED FIELD************************
  • '1' FOR PSC;
  • '2' FOR 2421;
  • '3' FOR 2237;
  • '4' FOR 2529-3;
  • '5' FOR 2529-7;
  • '6' FOR 2474;
  • '7' FOR 2431;
  • '8' FOR 2914;
  • '9' FOR OTHER;
  • '10' FOR 2520;
  • '11' FOR STOCK ISSUE;

  • LAST EDITED:  MAR 20, 1991
  • DESCRIPTION:  
    Type of form for the transaction that is being tracked by the Suspense Module.
4 DESCRIPTION OF ITEM/SERVICES 2;0 WORD-PROCESSING #668.04

  • DESCRIPTION:  
    This Field will contain the Description of the Item on suspense and Service rendered to the Veteran.
5 COMPLETION DATE 0;5 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 14, 2003
  • HELP-PROMPT:  MUST NOT BE LESS THAN BEGINNING SUSPENSE DATE
  • DESCRIPTION:  
    This is the date and time of the completion note.
  • CROSS-REFERENCE:  ^^TRIGGER^668^6
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RMPR(668,D0,0)):^(0),1:"") S X=$P(Y(1),U,6),X=X S DIU=X K Y S X=DIV S X=DUZ X ^DD(668,5,1,1,1.4)
    1.4)= S DIH=$S($D(^RMPR(668,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,6)=DIV,DIH=668,DIG=6 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RMPR(668,D0,0)):^(0),1:"") S X=$P(Y(1),U,6),X=X S DIU=X K Y S X="" S DIH=$S($D(^RMPR(668,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,6)=DIV,DIH=668,DIG=6 D ^DICR:$O(^DD(DIH,DIG,1
    ,0))>0
    CREATE VALUE)= S X=DUZ
    DELETE VALUE)= @
    FIELD)= COMPLETED BY
    Triggers completed by field.
  • CROSS-REFERENCE:  668^CD^MUMPS
    1)= D EN02^RMPR9X
    2)= D KILL02^RMPR9X
    This will create a cross reference to be used with the Delayed Order Report.  Completeion Date and Number of Processing Days.
6 COMPLETED BY 0;6 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAR 20, 1991
  • DESCRIPTION:  
    This is the person who dispositioned this transaction.
  • NOTES:  TRIGGERED by the COMPLETION DATE field of the PROSTHETIC SUSPENSE File
7 INITIAL ACTION NOTE 3;0 WORD-PROCESSING #668.07

  • LAST EDITED:  JAN 26, 2000
  • DESCRIPTION:  
    A word-processing field storing the action taken on a suspense with the initial action to remove from the delayed order report.
  • TECHNICAL DESCR:  
    This field has changed from the action taken to the initial action taken.  This used to be the only action taken, the action taken at the time a suspense is completed.
8 SUSPENDED BY 0;4 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JUN 22, 1992
  • HELP-PROMPT:  Enter the name of the employee to suspended the action
  • DESCRIPTION:  
    Person who created the suspense entry.
8.1 PATIENT 2319 10;0 POINTER Multiple #668.81 668.81
8.2 AMIS GROUPER 11;0 Multiple #668.82 668.82
9 TYPE OF REQUEST 0;8 SET
  • '1' FOR ROUTINE PROSTHETICS;
  • '2' FOR EYEGLASS;
  • '3' FOR CONTACT LENS;
  • '4' FOR OXYGEN;
  • '5' FOR MANUAL NON CPRS;
  • '6' FOR CLOTHING ALLOWANCE;
  • '7' FOR CLONE;
  • '8' FOR AUTO ADAPTIVE;
  • '9' FOR PROSTHETICS IFC;
  • '10' FOR DISCONTINUED;
  • '11' FOR LAB;

  • LAST EDITED:  JAN 31, 2006
  • DESCRIPTION:  
    This is the type of order from CPRS Consult Tracking Module, or VBA.  It also records MANUAL for paper orders received.
10 INITIAL ACTION DATE 0;9 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 26, 2000
  • DESCRIPTION:  
    This is the date and time the first action on a suspense was taken.
11 ACTION DATE 1;0 DATE Multiple #668.011 668.011

  • DESCRIPTION:  
    This is the date an Other Action Note was created.
12 COMPLETION NOTE 4;0 WORD-PROCESSING #668.012

  • DESCRIPTION:  
    This is the note for the completion comments.
13 REQUESTOR 0;11 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  FEB 03, 2000
  • DESCRIPTION:  
    This is the person who requested the order, or submitted the order.
14 STATUS 0;10 SET
  • 'O' FOR OPEN;
  • 'P' FOR PENDING;
  • 'C' FOR CLOSED;
  • 'X' FOR CANCELLED;

  • LAST EDITED:  MAR 05, 2003
  • DESCRIPTION:  
    This is the current status, Open, Pending, Closed, or Cancelled.
  • TECHNICAL DESCR:  
  • CROSS-REFERENCE:  668^E
    1)= S ^RMPR(668,"E",$E(X,1,30),DA)=""
    2)= K ^RMPR(668,"E",$E(X,1,30),DA)
  • CROSS-REFERENCE:  668^I^MUMPS
    1)= D EN^RMPR9X
    2)= D KILL^RMPR9X
    Sort and filter on last 2 numbers of the Patients SSN number for Open or Pending Orders Only.
  • CROSS-REFERENCE:  668^L^MUMPS
    1)= D EN0^RMPR9X
    2)= D KILL0^RMPR9X
    This cross refernce is used for the Delayed Order Report GUI Grid.  It is the last 2 of SSN, the Create Date with no Time, and the Status.
  • CROSS-REFERENCE:  668^L1^MUMPS
    1)= D EN01^RMPR9X
    2)= D KILL01^RMPR9X
    This is for the Delayed Order Report, GUI Grid.  It is the last 2 of patient SSN, Status and ien.
15 OIF/OEF 7;1 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  APR 30, 2007
  • DESCRIPTION:  
    Veteran determined to be OEF/OIF 1 Yes 0 NO.
16 INITIAL ACTION BY 0;12 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  FEB 29, 2000
  • DESCRIPTION:  
    This is the person who took first action.
17 CANCELLED BY 0;13 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAR 17, 2000
  • DESCRIPTION:  
    This is the person who cancelled the suspense.
18 CANCEL DATE 5;1 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 17, 2000
  • DESCRIPTION:  
    This is the date the suspense record was cancelled.
19 ORDER 0;14 POINTER TO ORDER FILE (#100) ORDER(#100)

  • LAST EDITED:  MAR 21, 2000
  • DESCRIPTION:  
    This is the CPRS Order Number used to send messages.
20 CONSULT 0;15 POINTER TO REQUEST/CONSULTATION FILE (#123) REQUEST/CONSULTATION(#123)

  • LAST EDITED:  MAR 22, 2000
  • DESCRIPTION:  
    This is the entry associated with consult Tracking.
  • CROSS-REFERENCE:  668^D
    1)= S ^RMPR(668,"D",$E(X,1,30),DA)=""
    2)= K ^RMPR(668,"D",$E(X,1,30),DA)
    To be used with GMRC API.
    ~
21 CANCEL NOTE 9;0 WORD-PROCESSING #668.021

  • DESCRIPTION:  
    This is the cancel note.  If it is a CPRS order the note will be recorded with the Consult.  Reason you are cancelling suspense, and/or deny consult.
22 DATE RX WRITTEN 0;16 DATE

  • INPUT TRANSFORM:  S %DT(0)=X D NOW^%DTC S X=%DT(0),%DT(0)=0-%,%DT="ESTX" D ^%DT S X=Y K:Y<1 X K %DT
  • LAST EDITED:  DEC 12, 2000
  • DESCRIPTION:  
    This is the date the request was signed by a provider.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
23 CONSULT REQUEST SERVICE 8;6 POINTER TO REQUEST SERVICES FILE (#123.5) REQUEST SERVICES(#123.5)

  • LAST EDITED:  JUN 28, 2000
  • DESCRIPTION:  
    This is used to forward a Consult to another service.
24 FORWARDED BY 8;7 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JUL 03, 2000
  • DESCRIPTION:  
    This is the person who forwarded the consult.
27 ORDERING PROVIDER IFC1;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<1) X
  • LAST EDITED:  JUN 24, 2004
  • HELP-PROMPT:  Answer must be 1-50 characters in length.
  • DESCRIPTION:  
    Provider who ordered the entry for Inter-facility Consults (IFC).  This is a free text field.
30 PRIMARY ICD DIAGNOSIS CODE BA1;1 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#80)

  • LAST EDITED:  OCT 20, 2011
  • HELP-PROMPT:  Select the primary CPRS diagnosis code at the time of consult.
  • DESCRIPTION:  
    This is the primary diagnosis code.
30.1 PRIMARY AGENT ORANGE BA1;2 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Primary diagnosis is related to Agent Orange exposure.
  • DESCRIPTION:  
    Primary diagnosis is related to Agent Orange exposure.
30.2 PRIMARY IONIZED RADIATION BA1;3 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Primary diagnosis is related to Ionized Radiation exposure.
  • DESCRIPTION:  
    Primary diagnosis is related to Ionized Radiation exposure.
30.3 PRIMARY SERVICE-CONNECTED BA1;4 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Primary diagnosis is related to a Service-Connected condition.
  • DESCRIPTION:  
    Primary diagnosis is related to a Service-Connected condition.
30.4 PRIMARY ENVIRONMENTAL CONT. BA1;5 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Primary diagnosis is related to Environmental Contaminants exposure.
  • DESCRIPTION:  
    Primary diagnosis is related to Environmental Contaminants exposure.
30.5 PRIMARY MST BA1;6 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if diagnosis is related to Military Sexual Trauma.
  • DESCRIPTION:  
    Primary diagnosis is related to Military Sexual Trauma.
30.6 PRIMARY HEAD/NECK CANCER BA1;7 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Primary diagnosis is related to Head/Neck Cancer.
  • DESCRIPTION:  
    Primary diagnosis is related to Head/Neck Cancer.
30.7 PRIMARY COMBAT VET BA1;8 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Primary diagnosis is related to Combat.
  • DESCRIPTION:  
    Primary diagnosis is related to Combat.
31 SECONDARY ICD DIAGNOSIS 1 BA2;1 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#80)

  • LAST EDITED:  OCT 20, 2011
  • HELP-PROMPT:  Select the secondary CPRS diagnosis code 1 at the time of consult.
  • DESCRIPTION:  
    This is the secondary CPRS diagnosis code 1 at the time of consult.
31.1 SECONDARY AGENT ORANGE 1 BA2;2 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 1 is related to Agent Orange exposure.
  • DESCRIPTION:  
    Secondary diagnosis 1 is related to Agent Orange exposure.
31.2 SECONDARY IONIZED RADIATION 1 BA2;3 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 1 is related to Ionized Radiation exposure.
  • DESCRIPTION:  
    Secondary diagnosis 1 is related to Ionized Radiation exposure.
31.3 SECONDARY SERVICE-CONNECTED 1 BA2;4 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 1 is related to a Service-Connected condition.
  • DESCRIPTION:  
    Secondary diagnosis 1 is related to a Service-Connected condition.
31.4 SECONDARY ENVIRON. CONT. 1 BA2;5 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 1 is related to Environmental Contaminants exposure.
  • DESCRIPTION:  
    Secondary diagnosis 1 is related to Environmental Contaminants exposure.
31.5 SECONDARY MST 1 BA2;6 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 1 is related to Military Sexual Trauma.
  • DESCRIPTION:  
    Secondary diagnosis 1 is related to Military Sexual Trauma.
31.6 SECONDARY HEAD/NECK CANCER 1 BA2;7 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 1 is related to Head/Neck Cancer.
  • DESCRIPTION:  
    Secondary diagnosis 1 is related to Head/Neck Cancer.
31.7 SECONDARY COMBAT VET 1 BA2;8 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 1 is related to Combat.
  • DESCRIPTION:  
    Secondary diagnosis 1 is related to Combat.
32 SECONDARY ICD DIAGNOSIS 2 BA3;1 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#80)

  • LAST EDITED:  OCT 20, 2011
  • HELP-PROMPT:  Select the secondary CPRS diagnosis code 2 at the time of consult.
  • DESCRIPTION:  
    This is the secondary CPRS diagnosis code 2 at the time of consult.
32.1 SECONDARY AGENT ORANGE 2 BA3;2 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 2 is related to Agent Orange exposure.
  • DESCRIPTION:  
    Secondary diagnosis 2 is related to Agent Orange exposure.
32.2 SECONDARY IONIZED RADIATION 2 BA3;3 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 2 is related to Ionized Radiation exposure.
  • DESCRIPTION:  
    Secondary diagnosis 2 is related to Ionized Radiation exposure.
32.3 SECONDARY SERVICE-CONNECTED 2 BA3;4 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 2 is related to a Service-Connected condition.
  • DESCRIPTION:  
    Secondary diagnosis 2 is related to a Service-Connected condition.
32.4 SECONDARY ENVIRON. CONT. 2 BA3;5 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 2 is related to Environmental Contaminants exposure.
  • DESCRIPTION:  
    Secondary diagnosis 2 is related to Environmental Contaminants exposure.
32.5 SECONDARY MST 2 BA3;6 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if diagnosis is related to Military Sexual Trauma.
  • DESCRIPTION:  
    Secondary diagnosis 2 is related to Military Sexual Trauma.
32.6 SECONDARY HEAD/NECK CANCER 2 BA3;7 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 2 is related to Head/Neck Cancer.
  • DESCRIPTION:  
    Secondary diagnosis 2 is related to Head/Neck Cancer.
32.7 SECONDARY COMBAT VET 2 BA3;8 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 2 is related to Combat.
  • DESCRIPTION:  
    Secondary diagnosis 2 is related to Combat.
33 SECONDARY ICD DIAGNOSIS 3 BA4;1 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#80)

  • LAST EDITED:  OCT 20, 2011
  • HELP-PROMPT:  Select the secondary CPRS diagnosis code 3 at the time of consult.
  • DESCRIPTION:  
    This is the secondary CPRS diagnosis code 3 at the time of consult.
33.1 SECONDARY AGENT ORANGE 3 BA4;2 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 3 is related to Agent Orange exposure.
  • DESCRIPTION:  
    Secondary diagnosis 3 is related to Agent Orange.
33.2 SECONDARY IONIZED RADIATION 3 BA4;3 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 3 is related to Ionized Radiation exposure.
  • DESCRIPTION:  
    Secondary diagnosis 3 is related to Ionized Radiation.
33.3 SECONDARY SERVICE-CONNECTED 3 BA4;4 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 3 is related to a Service-Connected condition.
  • DESCRIPTION:  
    Secondary diagnosis 3 is related to a Service-Connected condition.
33.4 SECONDARY ENVIRON. CONT. 3 BA4;5 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if Secondary diagnosis 3 is related to Environmental Contaminants exposure.
  • DESCRIPTION:  
    Secondary diagnosis 3 is related to Environmental Contaminants exposure.
33.5 SECONDARY MST 3 BA4;6 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es if diagnosis is related to Military Sexual Trauma.
  • DESCRIPTION:  
    Secondary diagnosis 3 is related to Military Sexual Trauma.
33.6 SECONDARY HEAD/NECK CANCER 3 BA4;7 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es to indicate Secondary diagnosis 3 is related to Head/Neck Cancer.
  • DESCRIPTION:  
    Secondary diagnosis 3 is related to Head/Neck Cancer.
33.7 SECONDARY COMBAT VET 3 BA4;8 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 25, 2004
  • HELP-PROMPT:  Enter 'Y'es to indicate Secondary diagnosis 3 is related to Combat.
  • DESCRIPTION:  
    Secondary diagnosis 3 is related to Combat.

ICR, Total: 2

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #3603
  • COMMUNICATIONS SERVICE LIBRARY
  • Internal Entry Number (IEN).
    Access: Read w/Fileman

    SUSPENSE DATE (.01).
    Access: Read w/Fileman

    VETERAN (1).
    Access: Read w/Fileman

    STATION (2).
    Access: Read w/Fileman

    TYPE OF REQUEST (9).
    Access: Read w/Fileman

    DESCRIPTION OF ITEM/SERVICES (4).
    Access: Read w/Fileman

    PROVISIONAL DIAGNOSIS (1.5).
    Access: Read w/Fileman

    ICD9 (1.6).
    Access: Read w/Fileman

    ICR #6540
  • ABOVE PAR
  • ADVANCED PROSTHETICS ACQUISITION TOOL
  • ACTION DATE (.01).
    Access: Both R/W w/Fileman

    ACTION NOTE (.01).
    Access: Both R/W w/Fileman

    DESCRIPTION OF ITEM/SERVICES (.01).
    Access: Both R/W w/Fileman

    INITIAL ACTION NOTE (.01).
    Access: Both R/W w/Fileman

    COMPLETION NOTE (.01).
    Access: Both R/W w/Fileman

    CANCEL DATE (18).
    Access: Both R/W w/Fileman

    OIF/OEF (15).
    Access: Both R/W w/Fileman

    REQUESTING FACILITY (2.1).
    Access: Read w/Fileman

    PROVISIONAL DIAGNOSIS (1.5).
    Access: Direct Global Read & w/Fileman

    ICD9 (1.6).
    Access: Direct Global Read & w/Fileman

    URGENCY (2.3).
    Access: Read w/Fileman

    CONSULT REQUEST SERVICE (23).
    Access: Read w/Fileman

    FORWARDED BY (24).
    Access: Read w/Fileman

    CANCEL NOTE (.01).
    Access: Both R/W w/Fileman

    PATIENT 2319 (.01).
    Access: Both R/W w/Fileman

    AMIS GROUPER (.01).
    Access: Both R/W w/Fileman

    PRIMARY ICD DIAGNOSIS CODE (30).
    Access: Read w/Fileman

    PRIMARY AGENT ORANGE (30.1).
    Access: Read w/Fileman

    PRIMARY IONIZED RADIATION (30.2).
    Access: Read w/Fileman

    PRIMARY SERVICE-CONNECTED (30.3).
    Access: Read w/Fileman

    PRIMARY ENVIRONMENTAL CONT. (30.4).
    Access: Read w/Fileman

    PRIMARY MST (30.5).
    Access: Read w/Fileman

    PRIMARY HEAD/NECK CANCER (30.6).
    Access: Read w/Fileman

    PRIMARY COMBAT VET (30.7).
    Access: Read w/Fileman

    SECONDARY ICD DIAGNOSIS 1 (31).
    Access: Read w/Fileman

    SECONDARY AGENT ORANGE 1 (31.1).
    Access: Read w/Fileman

    SECONDARY IONIZED RADIATION 1 (31.2).
    Access: Read w/Fileman

    SECONDARY SERVICE-CONNECTED 1 (31.3).
    Access: Read w/Fileman

    SECONDARY ENVIRON. CONT. 1 (31.4).
    Access: Read w/Fileman

    SECONDARY MST 1 (31.5).
    Access: Read w/Fileman

    SECONDARY HEAD/NECK CANCER 1 (31.6).
    Access: Read w/Fileman

    SECONDARY COMBAT VET 1 (31.7).
    Access: Read w/Fileman

    SECONDARY ICD DIAGNOSIS 2 (32).
    Access: Read w/Fileman

    SECONDARY AGENT ORANGE 2 (32.1).
    Access: Read w/Fileman

    SECONDARY IONIZED RADIATION 2 (32.2).
    Access: Read w/Fileman

    SECONDARY SERVICE-CONNECTED 2 (32.3).
    Access: Read w/Fileman

    SECONDARY ENVIRON. CONT. 2 (32.4).
    Access: Read w/Fileman

    SECONDARY MST 2 (32.5).
    Access: Read w/Fileman

    SECONDARY HEAD/NECK CANCER (32.6).
    Access: Read w/Fileman

    SECONDARY COMBAT VET 2 (32.7).
    Access: Read w/Fileman

    SECONDARY ICD DIAGNOSIS 3 (33).
    Access: Read w/Fileman

    SECONDARY AGENT ORANGE 3 (33.1).
    Access: Read w/Fileman

    SECONDARY IONIZED RADIATION 3 (33.2).
    Access: Read w/Fileman

    SECONDARY SERVICE-CONNECTED 3 (33.3).
    Access: Read w/Fileman

    SECONDARY ENVIRON. CONT. 3 (33.4).
    Access: Read w/Fileman

    SECONDARY MST 3 (33.5).
    Access: Read w/Fileman

    SECONDARY HEAD/NECK CANCER 3 (33.6).
    Access: Read w/Fileman

    SECONDARY COMBAT VET 3 (33.7).
    Access: Read w/Fileman

    ORDERING PROVIDER (27).
    Access: Read w/Fileman

    SUSPENSE DATE (.01).
    Access: Both R/W w/Fileman

    VETERAN (1).
    Access: Both R/W w/Fileman

    STATION (2).
    Access: Direct Global Read & w/Fileman

    COMPLETION DATE (5).
    Access: Write w/Fileman

    COMPLETED BY (6).
    Access: Write w/Fileman

    SUSPENDED BY (8).
    Access: Direct Global Read & w/Fileman

    TYPE OF REQUEST (9).
    Access: Both R/W w/Fileman

    INITIAL ACTION DATE (10).
    Access: Both R/W w/Fileman

    REQUESTOR (13).
    Access: Direct Global Read & w/Fileman

    STATUS (14).
    Access: Direct Global Read & w/Fileman

    INITIAL ACTION BY (16).
    Access: Both R/W w/Fileman

    CANCELLED BY (17).
    Access: Both R/W w/Fileman

    CONSULT (20).
    Access: Direct Global Read & w/Fileman

    DATE RX WRITTEN (22).
    Access: Direct Global Read & w/Fileman

    "B" cross reference - used to look up by SUSPENSE DATE"C" cross reference - used to look up by VETERAN"CD" cross reference - used to look up by COMPLETIONDATE"E" cross reference - used to look up by STATUS"L" cross reference - used to look up by STATUS (Last 2of patient SSN, Create Date with no time, and the STATUS)"L1" cross reference - used to look up by STATUS (Last 2of patient SSN, STATUS, and IEN for Delayed Order Report)

    External References

    Name Field # of Occurrence
    ^%DT .01+1, 5+1, 10+1, 18+1, 22+1
    NOW^%DTC 22+1
    ^DICR 5(XREF 1n1.4), 5(XREF 1K)
    Y^DIQ ID1+1
    EN^RMPR9X 14(XREF 2S)
    EN0^RMPR9X 14(XREF 3S)
    EN01^RMPR9X 14(XREF 4S)
    EN02^RMPR9X 5(XREF 2S)
    KILL^RMPR9X 14(XREF 2K)
    KILL0^RMPR9X 14(XREF 3K)
    KILL01^RMPR9X 14(XREF 4K)
    KILL02^RMPR9X 5(XREF 2K)

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD( 5(XREF 1n1.4), 5(XREF 1K)
    ^DD(2 ID1+1
    ^DD(668 5(XREF 1S)
    ^DPT - [#2] ID1+1
    ^RMPR(668 - [#668] .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 5(XREF 1S), 5(XREF 1n1.4), 5(XREF 1K), 14(XREF 1S), 14(XREF 1K), 20(XREF 1S)
    20(XREF 1K)

    Naked Globals

    Name Field # of Occurrence
    ^(0 ID1+1, 5(XREF 1S), 5(XREF 1n1.4), 5(XREF 1K)

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> % 22+1
    %DT .01+1*, 5+1*, 10+1*, 18+1*, 22+1*!
    %DT(0 22+1*
    %I ID1+1*!
    >> C ID1+1*
    >> D0 5(XREF 1S), 5(XREF 1K)
    >> DA .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 5(XREF 1S), 5(XREF 1K), 14(XREF 1S), 14(XREF 1K), 20(XREF 1S), 20(XREF 1K)
    >> DIC ID1+1, ID3+1
    >> DIG 5(XREF 1n1.4), 5(XREF 1K)
    >> DIH 5(XREF 1n1.4), 5(XREF 1K)
    >> DIU 5(XREF 1S), 5(XREF 1K)
    DIV 5(XREF 1S), 5(XREF 1n1.4), 5(XREF 1K)
    DIV(0 5(XREF 1S), 5(XREF 1n1.4), 5(XREF 1K)
    DUZ 5(XREF 1S)
    U ID1+1, 5(XREF 1S), 5(XREF 1n1.4), 5(XREF 1K)
    X .01+1*!, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 1.5+1!, 2.3+1!, 5+1*!, 5(XREF 1S), 5(XREF 1n1.4)
    5(XREF 1K), 10+1*!, 14(XREF 1S), 14(XREF 1K), 18+1*!, 20(XREF 1S), 20(XREF 1K), 22+1*!, 27+1!
    Y ID1+1*, .01+1, 5+1, 5(XREF 1S), 5(XREF 1K), 10+1, 18+1, 22+1
    Y(1 5(XREF 1S), 5(XREF 1K)
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All