STANDARD DATA DICTIONARY #9000010.18 -- V CPT FILE 3/24/25 PAGE 1 STORED IN ^AUPNVCPT( *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 1.0) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- The V CPT file has been defined for joint use by the Indian Health Service and the Department of Veteran Affairs. This is the file used to store CPT related services performed at a visit. Data must exist for a patient and a visit before data can be entered in the V CPT file. This file is used in the VA to identify procedures that were done to a patient at an encounter or occasion of service. The procedures may have been performed by a primary or secondary provider of patient care. Procedures checked off and scanned from ambulatory care encounter forms are stored here to record that they were done. Results of procedures are not included. This file is restricted to procedures that have a CPT code. The Provider Narrative field represents the preferred text for this procedure as defined by the clinician. DD ACCESS: RD ACCESS: WR ACCESS: DEL ACCESS: LAYGO ACCESS: AUDIT ACCESS: IDENTIFIED BY: PATIENT NAME (#.02)[R], VISIT (#.03)[R] CROSS REFERENCED BY: VISIT(AA), CPT(AATOO), PATIENT NAME(AATOO2), VISIT(AD), VISIT(AV10), CPT(B), PATIENT NAME(C) INDEXED BY: CPT & PATIENT NAME & VISIT & PRINCIPAL PROCEDURE & EVENT DATE AND TIME (ACR) LAST MODIFIED: MAY 4,2021@15:57:23 9000010.18,.01CPT 0;1 POINTER TO CPT FILE (#81) (Required) INPUT TRANSFORM: S DIC("S")="I $P($$CPT^ICPTCOD(+Y),""^"",7)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: DEC 17, 2018 HELP-PROMPT: Enter a CPT code or the name of the procedure done to the patient. DESCRIPTION: This is the entry in the CPT file that most closely represents the clinical procedure done to the patient during the encounter. The preferred text for the procedure performed may be specified in the Provider Narrative field. This field is used for Administrative and Clinical purposes. If a procedure performed is to be billable, the CPT code must be specified here. SCREEN: S DIC("S")="I $P($$CPT^ICPTCOD(+Y),""^"",7)" EXPLANATION: Only active CPTs NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 9000010.18^B 1)= S ^AUPNVCPT("B",$E(X,1,30),DA)="" 2)= K ^AUPNVCPT("B",$E(X,1,30),DA) CROSS-REFERENCE: 9000010.18^AATOO^MUMPS 1)= I $P(^AUPNVCPT(DA,0),U,2)]"",$P(^(0),U,3)]"" S ^AUPNVCPT("AA",$P(^AUPNVCPT(DA,0),U,2),X,(999999 9-$P(+^AUPNVSIT($P(^AUPNVCPT(DA,0),U,3),0),".",1)),DA)="" 2)= I $P(^AUPNVCPT(DA,0),U,2)]"",$P(^(0),U,3)]"" K ^AUPNVCPT("AA",$P(^AUPNVCPT(DA,0),U,2),X,(999999 9-$P(+^AUPNVSIT($P(^AUPNVCPT(DA,0),U,3),0),".",1)),DA) This cross-reference is used for searches in sequence by patient, CPT internal entry number, inverted visit date, and internal entry number. "AA",PATIENT,CPT,VISIT,DA RECORD INDEXES: ACR (#849) 9000010.18,.02PATIENT NAME 0;2 POINTER TO PATIENT/IHS FILE (#9000001) (Required) LAST EDITED: DEC 17, 2018 HELP-PROMPT: Enter the patient to whom the procedure was done. DESCRIPTION: This is the patient to whom the procedure was done during the encounter. TECHNICAL DESCR: This is a pointer to the PATIENT/IHS file, #9000001, which is DINUMED to the PATIENT file, #2. This field is always stuffed by the application. No editing is allowed. UNEDITABLE CROSS-REFERENCE: 9000010.18^AATOO2^MUMPS 1)= I $P(^AUPNVCPT(DA,0),U,3)]"" S ^AUPNVCPT("AA",X,+^AUPNVCPT(DA,0),(9999999-$P(+^AUPNVSIT($P(^AUP NVCPT(DA,0),U,3),0),".",1)),DA)="" 2)= I $P(^AUPNVCPT(DA,0),U,3)]"" K ^AUPNVCPT("AA",X,+^AUPNVCPT(DA,0),(9999999-$P(+^AUPNVSIT($P(^AUP NVCPT(DA,0),U,3),0),".",1)),DA) This cross-reference is used for searches in sequence by patient, CPT internal entry number, inverted visit date, and internal entry number. "AA",PATIENT,CPT,VISIT,DA CROSS-REFERENCE: 9000010.18^C 1)= S ^AUPNVCPT("C",$E(X,1,30),DA)="" 2)= K ^AUPNVCPT("C",$E(X,1,30),DA) This cross-reference allows look-up on the file by the patient's name. RECORD INDEXES: ACR (#849) 9000010.18,.03VISIT 0;3 POINTER TO VISIT FILE (#9000010) (Required) INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,5)=$P(^AUPNVCPT(DA,0),U,2)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: DEC 17, 2018 HELP-PROMPT: Enter the visit date/time for the encounter where the procedure was done. DESCRIPTION: This is the encounter or occasion of service defined in the VISIT file that represents when and where the procedure was done. TECHNICAL DESCR: This is a pointer to the VISIT file, #9000010. This field is stuffed by the applications. No editing is allowed. SCREEN: S DIC("S")="I $P(^(0),U,5)=$P(^AUPNVCPT(DA,0),U,2)" EXPLANATION: VISIT MUST BE FOR CURRENT PATIENT UNEDITABLE CROSS-REFERENCE: 9000010.18^AD 1)= S ^AUPNVCPT("AD",$E(X,1,30),DA)="" 2)= K ^AUPNVCPT("AD",$E(X,1,30),DA) This cross-reference is used for searches by the visit pointer and internal entry number. "AD",VISIT,DA CROSS-REFERENCE: 9000010.18^AA^MUMPS 1)= Q:$P(^AUPNVCPT(DA,0),U,2)="" S ^AUPNVCPT("AA",$P(^AUPNVCPT(DA,0),U,2),+^AUPNVCPT(DA,0),(999999 9-$P(+^AUPNVSIT(X,0),".",1)),DA)="" 2)= Q:$P(^AUPNVCPT(DA,0),U,2)="" K ^AUPNVCPT("AA",$P(^AUPNVCPT(DA,0),U,2),+^AUPNVCPT(DA,0),(999999 9-$P(+^AUPNVSIT(X,0),".",1)),DA) This cross-reference is used for searches in sequence by patient, CPT internal entry number, inverted visit date, and internal entry number. "AA",PATIENT,CPT,VISIT,DA CROSS-REFERENCE: 9000010.18^AV10^MUMPS 1)= D ADD^AUPNVSIT 2)= D SUB^AUPNVSIT This cross-reference adds and subtracts from the dependent entry count in the VISIT file. RECORD INDEXES: ACR (#849) 9000010.18,.04PROVIDER NARRATIVE 0;4 POINTER TO PROVIDER NARRATIVE FILE (#9999999.27) (Required) INPUT TRANSFORM: S DIC(0)=$S($D(PXKLAYGO):"LOX",$D(APCDALVR):"LO",$D(ZTQUEUED):"LO",1:"EMQLO") D ^DIC K DIC S DIC=DI E,X=+Y K:Y<0 X LAST EDITED: DEC 17, 2018 HELP-PROMPT: Enter the providers preferred text identifying the procedure done. DESCRIPTION: This is the narrative the provider uses to represent the procedure that was done. The text may be different from the CPT file's procedure name text, but should not have a significantly different meaning. The CPT code in the CPT (.01) field should be the CPT code that "most closely" represents the provider narrative for the procedure done. TECHNICAL DESCR: This is a pointer to the PROVIDER NARRATIVE file, #9999999.27. Disk space is saved by storing ONE entry in the Provider Narrative file for each unique narrative. The provider narrative is often repetitive, especially if the data capture mode is automated (e.g., AICS Encounter Forms). 9000010.18,.05DIAGNOSIS 0;5 POINTER TO ICD DIAGNOSIS FILE (#80) INPUT TRANSFORM: D ICDEN^PXCECPT1 K:Y<0 X LAST EDITED: DEC 17, 2018 HELP-PROMPT: Enter the ICD diagnosis related to the procedure done. DESCRIPTION: This is the diagnosis, from the ICD Diagnosis file, associated with the procedure performed. TECHNICAL DESCR: SCREEN: S DIC("S")="D ^AUPNSICD" S DIC(0)=$P(DIC(0),"E")_$P(DIC(0),"E",2) EXPLANATION: Dx cannot be an inactive code, and it must be appropriate NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 9000010.18,.07PRINCIPAL PROCEDURE 0;7 SET 'Y' FOR YES; 'N' FOR NO; LAST EDITED: AUG 10, 2017 HELP-PROMPT: Enter 'Y' if this is the principal procedure done at the encounter. DESCRIPTION: This field identifies this procedure as the principal procedure done to the patient at the encounter. RECORD INDEXES: ACR (#849) 9000010.18,.09DIAGNOSIS 2 0;9 POINTER TO ICD DIAGNOSIS FILE (#80) INPUT TRANSFORM: D ICDEN^PXCECPT1 K:Y<0 X LAST EDITED: DEC 17, 2018 HELP-PROMPT: Enter the ICD diagnosis related to the procedure done. DESCRIPTION: This is the diagnosis, from the ICD Diagnosis file, associated with the procedure performed. SCREEN: S DIC("S")="D ^AUPNSICD" S DIC(0)=$P(DIC(0),"E")_$P(DIC(0),"E",2) EXPLANATION: Dx cannot be an inactive code, and it must be appropriate NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 9000010.18,.1 DIAGNOSIS 3 0;10 POINTER TO ICD DIAGNOSIS FILE (#80) INPUT TRANSFORM: D ICDEN^PXCECPT1 K:Y<0 X LAST EDITED: DEC 17, 2018 HELP-PROMPT: Enter the ICD diagnosis related to the procedure done. DESCRIPTION: This is the diagnosis, from the ICD Diagnosis file, associated with the procedure performed. SCREEN: S DIC("S")="D ^AUPNSICD" S DIC(0)=$P(DIC(0),"E")_$P(DIC(0),"E",2) EXPLANATION: Dx cannot be an inactive code, and it must be appropriate NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 9000010.18,.11DIAGNOSIS 4 0;11 POINTER TO ICD DIAGNOSIS FILE (#80) INPUT TRANSFORM: D ICDEN^PXCECPT1 K:Y<0 X LAST EDITED: DEC 19, 2018 HELP-PROMPT: Enter the ICD diagnosis related to the procedure done. DESCRIPTION: This is the diagnosis, from the ICD Diagnosis file, associated with the procedure performed. SCREEN: S DIC("S")="D ^AUPNSICD" S DIC(0)=$P(DIC(0),"E")_$P(DIC(0),"E",2) EXPLANATION: Dx cannot be an inactive code, and it must be appropriate NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 9000010.18,.12DIAGNOSIS 5 0;12 POINTER TO ICD DIAGNOSIS FILE (#80) INPUT TRANSFORM: D ICDEN^PXCECPT1 K:Y<0 X LAST EDITED: DEC 19, 2018 HELP-PROMPT: Enter the ICD diagnosis related to the procedure done. DESCRIPTION: This is the diagnosis, from the ICD Diagnosis file, associated with the procedure performed. SCREEN: S DIC("S")="D ^AUPNSICD" S DIC(0)=$P(DIC(0),"E")_$P(DIC(0),"E",2) EXPLANATION: Dx cannot be an inactive code, and it must be appropriate NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 9000010.18,.13DIAGNOSIS 6 0;13 POINTER TO ICD DIAGNOSIS FILE (#80) INPUT TRANSFORM: D ICDEN^PXCECPT1 K:Y<0 X LAST EDITED: DEC 19, 2018 HELP-PROMPT: Enter the ICD diagnosis related to the procedure done. DESCRIPTION: This is the diagnosis, from the ICD Diagnosis file, associated with the procedure performed. SCREEN: S DIC("S")="D ^AUPNSICD" S DIC(0)=$P(DIC(0),"E")_$P(DIC(0),"E",2) EXPLANATION: Dx cannot be an inactive code, and it must be appropriate NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 9000010.18,.14DIAGNOSIS 7 0;14 POINTER TO ICD DIAGNOSIS FILE (#80) INPUT TRANSFORM: D ICDEN^PXCECPT1 K:Y<0 X LAST EDITED: DEC 19, 2018 HELP-PROMPT: Enter the ICD diagnosis related to the procedure done. DESCRIPTION: This is the diagnosis, from the ICD Diagnosis file, associated with the procedure performed. SCREEN: S DIC("S")="D ^AUPNSICD" S DIC(0)=$P(DIC(0),"E")_$P(DIC(0),"E",2) EXPLANATION: Dx cannot be an inactive code, and it must be appropriate NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 9000010.18,.15DIAGNOSIS 8 0;15 POINTER TO ICD DIAGNOSIS FILE (#80) INPUT TRANSFORM: D ICDEN^PXCECPT1 K:Y<0 X LAST EDITED: DEC 19, 2018 HELP-PROMPT: Enter the ICD diagnosis related to the procedure done. DESCRIPTION: This is the diagnosis, from the ICD Diagnosis file, associated with the procedure performed. SCREEN: S DIC("S")="D ^AUPNSICD" S DIC(0)=$P(DIC(0),"E")_$P(DIC(0),"E",2) EXPLANATION: Dx cannot be an inactive code, and it must be appropriate NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 9000010.18,.16QUANTITY 0;16 NUMBER INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: DEC 17, 2018 HELP-PROMPT: Enter a number between 1 and 999 indicating how many times, this procedure was done. DESCRIPTION: This is the number of times this procedure was done to the patient during the encounter. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 9000010.18,.17ORDER REFERENCE 0;17 POINTER TO ORDER FILE (#100) LAST EDITED: DEC 17, 2018 HELP-PROMPT: Enter the order for this procedure. DESCRIPTION: Pointer to the order in the ORDER file, #100, that ordered the procedure. TECHNICAL DESCR: This field provides a place for the Surgery package to store the pointer to the entry in the ORDER file, #100, that is associated with this procedure. 9000010.18,.19DEPARTMENT CODE 0;19 FREE TEXT INPUT TRANSFORM: K:$L(X)>3!($L(X)<3) X LAST EDITED: APR 25, 2005 HELP-PROMPT: Answer must be 3 characters in length. DESCRIPTION: The 3-digit code that defines the service area associated with the charge by the sending application. TECHNICAL DESCR: All CPT-based charges coming through PCE, which are not already associated with one of the Department Codes, are assigned a Department Code. The Department Code assigned is the Stop Code associated (in the HOSPITAL LOCATION file, #44) with the Hospital Location of the patient visit/encounter. 9000010.18,.2 PFSS CHARGE ID 0;20 NUMBER INPUT TRANSFORM: K:+X'=X!(X>99999999)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: DEC 17, 2018 HELP-PROMPT: Type a Number between 1 and 99999999, 0 Decimal Digits DESCRIPTION: A numeric identifier of not more than 8 digits that uniquely identifies the charge item in the external medical billing system. This data item is referred to as the "PFSS Charge Identifier" within the PFSS project documentation. TECHNICAL DESCR: The application providing the data to the PFSS CHARGE CACHE file uses $$GETCHGID^IBBAPI to obtain a unique identifying number for the original charge. 9000010.18,1 CPT MODIFIER 1;0 POINTER Multiple #9000010.181 (Add New Entry without Asking) DESCRIPTION: SCREEN: S DIC("S")="N PXC,PXM,PXV,PXD S PXC=$P(^AUPNVCPT(D0,0),U),PXV=$P(^AUPNVCPT(D0,0),U,3),PXD=$P($G(^AU PNVSIT(PXV,0)),U) I $$MODP^ICPTMOD(PXC,Y,""I"",PXD)" EXPLANATION: The selected modifier must go with the CPT code. 9000010.181,.01 CPT MODIFIER 0;1 POINTER TO CPT MODIFIER FILE (#81.3) (Multiply asked) INPUT TRANSFORM: S DIC("S")="I $$CPTMOD^PXCPTAPI(D0,Y,0)>0" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: DEC 17, 2018 HELP-PROMPT: Select a modifier that is valid for this CPT code. DESCRIPTION: This multiple field points to the CPT MODIFIER file, #81.3. The modifier(s) you select must be valid for the CPT field #.01. SCREEN: S DIC("S")="I $$CPTMOD^PXCPTAPI(D0,Y,0)>0" EXPLANATION: The modifier(s) you select must be valid for the CPT. CROSS-REFERENCE: 9000010.181^B 1)= S ^AUPNVCPT(DA(1),1,"B",$E(X,1,30),DA)="" 2)= K ^AUPNVCPT(DA(1),1,"B",$E(X,1,30),DA) 9000010.18,1201EVENT DATE AND TIME 12;1 DATE INPUT TRANSFORM: S %DT="ESTX" D ^%DT S X=Y K:Y<1 X LAST EDITED: DEC 17, 2018 HELP-PROMPT: Enter the date and time the procedure was done. DESCRIPTION: This is the date and time the procedure was performed. This date and time may be different from the visit date and time. For example, for clinic appointment visits, the Visit Date and Time is the date and time of the appointment, not the time the provider performed the clinical event. The date may be an imprecise date. Date and time may be before or after the Visit date, with the restriction the date cannot be a future date. TECHNICAL DESCR: Event Date and Time defaults to NOW and reflects the actual time the service was provided. The Event Date does not have to be the Visit Date, but it cannot be a future date. If a user wants to enter a historical procedure, the user should use the Historical Encounter entry action to document the historical procedure. Historical entries will not be eligible for credit. PCE data sources for automatic (scanning) data capture will be blank unless the Event Date and Time are passed to PCE for filing. RECORD INDEXES: ACR (#849) 9000010.18,1202ORDERING PROVIDER 12;2 POINTER TO NEW PERSON FILE (#200) LAST EDITED: MAY 13, 1996 HELP-PROMPT: Enter the provider who ordered this procedure. DESCRIPTION: This field can be used to document the provider who ordered the procedure. 9000010.18,1204ENCOUNTER PROVIDER 12;4 POINTER TO NEW PERSON FILE (#200) LAST EDITED: DEC 19, 1994 HELP-PROMPT: Enter the provider who performed the procedure. DESCRIPTION: This is the provider who performed the procedure. 9000010.18,80101EDITED FLAG 801;1 SET '1' FOR EDITED; LAST EDITED: DEC 17, 2018 HELP-PROMPT: Enter 1 if the original V CPT data is being edited. DESCRIPTION: This field is automatically set to 1 if PCE detects that any original procedure data is being edited. TECHNICAL DESCR: PCE filing logic automatically compares the before and after pictures of the record to determine if the edited flag should be set to "1". 9000010.18,80102AUDIT TRAIL 801;2 FREE TEXT INPUT TRANSFORM: K:$L(X)>85!($L(X)<2) X LAST EDITED: DEC 17, 2018 HELP-PROMPT: The answer must be 2 to 85 characters. DESCRIPTION: This field is populated automatically by the PCE filing logic. The format of the field is as follows: Pointer to PCE data source file_"-"_A for Add or E for Edit_" "_DUZ of the person who entered the data_";"... TECHNICAL DESCR: The PCE filing logic requires a pointer to the PCE data source file. If this is not passed, the PCE filing logic will not process the data. If the record is a new record, then an "A" is used to specify the source that added the data. If the record existed previously, PCE filing logic compares the old and new records of information. An "E" will be automatically used if the filing logic finds the data has been edited. If "E" is used, then the Edited Flag field is automatically set to 1. The DUZ is stored in its internal format to represent the user who performed the adding or editing of data for this record. Iterations of editing will be concatenated to the previous data source value, up to 85 characters. 9000010.18,80201PROVIDER NARRATIVE CATEGORY 802;1 POINTER TO PROVIDER NARRATIVE FILE (#9999999.27) INPUT TRANSFORM: S DIC(0)=$S($D(PXKLAYGO):"LOX",$D(APCDALVR):"LO",$D(ZTQUEUED):"LO",1:"EMQLO") D ^DIC K DIC S DIC=DI E,X=+Y K:Y<0 X LAST EDITED: DEC 17, 2018 HELP-PROMPT: Enter the provider narrative category. DESCRIPTION: This field is the heading or category used to represent the provider narrative on the scanner form. It may be useful for understanding how providers are grouping data for use on the encounter form, and may help determine clinical data base definitions in the future. TECHNICAL DESCR: This field was added for use in the VA. It is used to identify the common groupings of clinical terminology used by providers. This field is only captured from automated data capture sources, such as AICS. SCREEN: S DIC(0)=$S($D(PXKLAYGO):"LOX",$D(APCDALVR):"LO",$D(ZTQUEUED):"LO",1:"EMQLO") EXPLANATION: OLD LOOKUP 9000010.18,81101COMMENTS 811;1 FREE TEXT INPUT TRANSFORM: K:$L(X)>245!($L(X)<1) X MAXIMUM LENGTH: 245 LAST EDITED: DEC 17, 2018 HELP-PROMPT: Answer must be 1-245 characters in length. DESCRIPTION: This is a comment related to the procedure performed. The provider may enter this manually via the PCE User Interface. 9000010.18,81201VERIFIED 812;1 SET '1' FOR ELECTRONICALLY SIGNED; '2' FOR VERIFIED BY PACKAGE; LAST EDITED: DEC 17, 2018 HELP-PROMPT: Enter 1 if verified by electronic signature or 2 if verified by package. DESCRIPTION: This is used to note how the event was verified and is automatically entered by the software. TECHNICAL DESCR: This is automatically entered by the software and is uneditable for users. UNEDITABLE 9000010.18,81202PACKAGE 812;2 POINTER TO PACKAGE FILE (#9.4) LAST EDITED: DEC 17, 2018 HELP-PROMPT: Enter the VistA package from which this procedure originated. DESCRIPTION: This is the VistA package from which this procedure originated through PCE. This is automatically entered by the software and uneditable by users. UNEDITABLE 9000010.18,81203DATA SOURCE 812;3 POINTER TO PCE DATA SOURCE FILE (#839.7) LAST EDITED: DEC 17, 2018 HELP-PROMPT: Select the data source for this procedure entry through PCE. DESCRIPTION: This is the data source for this procedure. It is set automatically and uneditable by users. UNEDITABLE FILES POINTED TO FIELDS CPT (#81) CPT (#.01) CPT MODIFIER (#81.3) CPT MODIFIER:CPT MODIFIER (#.01) ICD DIAGNOSIS (#80) DIAGNOSIS (#.05) DIAGNOSIS 2 (#.09) DIAGNOSIS 3 (#.1) DIAGNOSIS 4 (#.11) DIAGNOSIS 5 (#.12) DIAGNOSIS 6 (#.13) DIAGNOSIS 7 (#.14) DIAGNOSIS 8 (#.15) NEW PERSON (#200) ORDERING PROVIDER (#1202) ENCOUNTER PROVIDER (#1204) ORDER (#100) ORDER REFERENCE (#.17) PACKAGE (#9.4) PACKAGE (#81202) PATIENT/IHS (#9000001) PATIENT NAME (#.02) PCE DATA SOURCE (#839.7) DATA SOURCE (#81203) PROVIDER NARRATIVE (#9999999.27) PROVIDER NARRATIVE (#.04) PROVIDER NARRATIVE CATEGORY (#80201) VISIT (#9000010) VISIT (#.03) File #9000010.18 Record Indexes: ACR (#849) RECORD MUMPS IR ACTION Short Descr: Clinical Reminders index. Description: This cross-reference builds two indexes, one for finding all patients with a particular CPT code and one for finding all the CPT codes a patient has. The indexes are stored in the Clinical Reminders Index global as: ^PXRMINDX(9000010.18,"IPP",CPT CODE,PP,DFN,DATE,DAS) and ^PXRMINDX(9000010.18,"PPI",DFN,PP,CPT CODE,DATE,DAS) respectively. Where CPT CODE is a pointer to file #81. PP is the principal procedure code. Possible values are Y (yes), N (no) or U (undefined). DFN is a pointer to file #2. DATE is EVENT DATE AND TIME, if it exists. If it does not, then it is VISIT/ADMIT DATE&TIME. DAS is the internal entry number of the entry in file #9000010.18. For all the details, see the Clinical Reminders Index Technical Guide/Programmer's Manual. Set Logic: D SVFILEC^PXPXRM(9000010.18,.X,.DA) Kill Logic: D KVFILEC^PXPXRM(9000010.18,.X,.DA) Whole Kill: K ^PXRMINDX(9000010.18) X(1): CPT (9000010.18,.01) (Subscr 1) (forwards) X(2): PATIENT NAME (9000010.18,.02) (Subscr 2) (forwards) X(3): VISIT (9000010.18,.03) (Subscr 3) (forwards) X(4): PRINCIPAL PROCEDURE (9000010.18,.07) X(5): EVENT DATE AND TIME (9000010.18,1201) (forwards) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):