Global: ^ACK(509850.5

Information

FileMan FileNo	FileMan Filename	Package
509850.5	A&SP PROCEDURE MODIFIER	Quasar

The A&SP Procedure Modifier file contains a list of the CPT and HCPCS Modifiers that are appropriate to Audiology and Speech Pathology. This file restricts the selection of Modifiers when entering CPT Procedures within the New Visit option and Edit Existing visit option. The file will be referenced when the user is either selecting a Modifier or requesting a Help list for Modifiers whilst within the New Visit or Edit an Existing Visit options. This file was introduced within Version 3.0 of QUASAR. Data in this file SHOULD NOT be altered through the use of VA FileMan; input should take place ONLY through the QUASAR menu options. Per VHA Directive 10-93-142, this file definition SHOULD NOT be modified.

Package	Total	Routines
Quasar	4	ACKQUTL4 ^ACK(509850.5 ACKQTM ACKQUTL5

Package	Total	Routines
Quasar	3	ACKQASU5 ACKQPCE1 ACKQTM

Package	Total	FileMan Files
Quasar	1	A&SP CLINIC VISIT(#509850.6)[#509850.64(.01)]

Package	Total	FileMan Files
CPT HCPCS Codes	1	CPT MODIFIER(#81.3)[.01]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	MODIFIER	0;1	POINTER TO CPT MODIFIER FILE (#81.3)	CPT MODIFIER(#81.3) INPUT TRANSFORM: `D MODS^ACKQUTL5 D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X S:$D(X) DINUM=X` LAST EDITED: `OCT 05, 1999` HELP-PROMPT: `Enter valid Modifier code.` DESCRIPTION: `Valid Procedure Modifiers used within A&SP.` `DELETE AUTHORITY: Y` `UNEDITABLE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `509850.5^B` `1)= S ^ACK(509850.5,"B",$E(X,1,30),DA)=""` `2)= K ^ACK(509850.5,"B",$E(X,1,30),DA)`
1	MODIFIER STATUS	0;2	SET	**********************REQUIRED FIELD********************** '1' FOR ACTIVE; '0' FOR INACTIVE; LAST EDITED: `APR 13, 1999` HELP-PROMPT: `Enter 'A' to set the modifier status to Active or 'I' to set the status to Inactive.` DESCRIPTION: `This is the current status of the CPT Modifier. If the status is Inactive the Modifier will be unselectable within the New/Edit Function.`

MODIFIER

0;1

POINTER TO CPT MODIFIER FILE (#81.3)

INPUT TRANSFORM: D MODS^ACKQUTL5 D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X S:$D(X) DINUM=X
LAST EDITED: OCT 05, 1999
HELP-PROMPT: Enter valid Modifier code.
DESCRIPTION:
Valid Procedure Modifiers used within A&SP.
DELETE AUTHORITY: Y
UNEDITABLE
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 509850.5^B
1)= S ^ACK(509850.5,"B",$E(X,1,30),DA)=""
2)= K ^ACK(509850.5,"B",$E(X,1,30),DA)

MODIFIER STATUS

0;2

SET

************************REQUIRED FIELD************************

LAST EDITED: APR 13, 1999
HELP-PROMPT: Enter 'A' to set the modifier status to Active or 'I' to set the status to Inactive.
DESCRIPTION:
This is the current status of the CPT Modifier. If the status is Inactive the Modifier will be unselectable within the New/Edit Function.

MODIFIER: 81.3^3	MODIFIER: 81.3^7	MODIFIER: 81.3^10	MODIFIER: 81.3^11	MODIFIER: 81.3^12	MODIFIER: 81.3^20	MODIFIER: 81.3^21	MODIFIER: 81.3^28
MODIFIER: 81.3^35	MODIFIER: 81.3^307	MODIFIER: 81.3^308

ICR LINK	Subscribing Package(s)	Fields Referenced	Description
ICR #2930	DSS - DECISION SUPPORT SYSTEM EXTRACTS	NAME (.01). Access: Direct Global Read & w/Fileman

Name	Field # of Occurrence
MODS^ACKQUTL5	.01+1
^DIC	.01+1

Name	Line Occurrences (* Changed, ! Killed)
^ACK(509850.5 - [#509850.5]	.01(XREF 1S), .01(XREF 1K)