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

Package: Quasar

A&SP CLINIC VISIT(#509850.6)-->509850.615

Sub-Field: 509850.615


Information

Parent File Name Number Package
A&SP CLINIC VISIT(#509850.6) EVENT CAPTURE PROCEDURE 509850.615 Quasar

Details

Field # Name Loc Type Details
.01 EVENT CAPTURE PROCEDURE 0;1 POINTER TO EC NATIONAL PROCEDURE FILE (#725) EC NATIONAL PROCEDURE(#725)

  • INPUT TRANSFORM:  S DIC("S")="I $D(ACKVD),$D(ACKCSC),$G(ACKEVENT),$$CHK^ACKQUTL5(+Y,ACKVD,ACKCSC)" S DIC("W")="W ?42,"" ""_$P(^EC(725,+Y,0),U,2)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 08, 2008
  • HELP-PROMPT:  Enter an Event Capture Procedure code.
  • DESCRIPTION:  
    Procedures performed during this QUASAR encounter as defined by Event Capture codes.
  • SCREEN:  S DIC("S")="I $D(ACKVD),$D(ACKCSC),$$CHK^ACKQUTL5(+Y,ACKVD,ACKCSC)"
  • EXPLANATION:  Only active Audiology & Speech Pathology codes with associated CPT codes are valid.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  509850.615^B
    1)= S ^ACK(509850.6,DA(1),7,"B",$E(X,1,30),DA)=""
    2)= K ^ACK(509850.6,DA(1),7,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  509850.6^AC^MUMPS
    1)= D SEND^ACKQUTL5(DA(1))
    2)= D SEND^ACKQUTL5(DA(1))
    3)= Do not Delete
    This index updates the Last Edited in Quasar field. This in turn may cause the visit to become a PCE Exception.
  • CROSS-REFERENCE:  509850.6^AO^MUMPS
    1)= D SETCPT^ACKQUTL5(DA,DA(1),X)
    2)= D KILLCPT^ACKQUTL5(DA,DA(1))
    3)= Do not Delete.
    Sets up corresponding CPT Procedure entry when an Event Capture Code is created. If EC code is deleted this cross reference will delete the CPT node the EC entry is pointing to.
.03 VOLUME 0;2 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 08, 2008
  • HELP-PROMPT:  Type a Number between 1 and 99, 0 Decimal Digits
  • DESCRIPTION:  
    A procedure may be carried out multiple times during a visit.  The volume field allows the user to specify how many times each procedure was performed.
  • CROSS-REFERENCE:  509850.6^AD^MUMPS
    1)= D SEND^ACKQUTL5(DA(1))
    2)= D SEND^ACKQUTL5(DA(1))
    3)= Do not delete
    This index updates the Last Edited in Quasar field. This in turn may cause the visit to become a PCE Exception.
  • CROSS-REFERENCE:  509850.6^AQ^MUMPS
    1)= D ECVOLPRV^ACKQUTL5(DA,DA(1),X,"V","S")
    2)= D ECVOLPRV^ACKQUTL5(DA,DA(1),X,"V","D")
    3)= Do not Delete.
    If this Event Capture record contains a reference to a CPT record the value entered within this field is automatically updated to the associated CPT field.
.05 EC PROCEDURE PROVIDER 0;3 POINTER TO A&SP STAFF FILE (#509850.3) A&SP STAFF(#509850.3)

  • INPUT TRANSFORM:  S DIC("S")="I $D(ACKVD) S ACKVALSC=$$STACT^ACKQUTL(+Y,ACKVD) I ACKVALSC=""0""!(ACKVALSC=""-6"")" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 08, 2008
  • HELP-PROMPT:  Enter the Provider who carried out this Event Capture Procedure.
  • DESCRIPTION:  
    This is the Provider who carried out this Event Capture Procedure.
  • SCREEN:  S DIC("S")="I $D(ACKVD) S ACKVALSC=$$STACT^ACKQUTL(+Y,ACKVD) I ACKVALSC=""0""!(ACKVALSC=""-6"")"
  • EXPLANATION:  Only Fee Basis Clinicians, Clinicians or Other Providers are valid entries.
  • CROSS-REFERENCE:  509850.6^AE^MUMPS
    1)= D SEND^ACKQUTL5(DA(1))
    2)= D SEND^ACKQUTL5(DA(1))
    3)= Do not Delete
    This index updates the Last Edited in Quasar field. This in turn may cause the visit to become a PCE Exception.
  • CROSS-REFERENCE:  509850.6^AG^MUMPS
    1)= D ECVOLPRV^ACKQUTL5(DA,DA(1),X,"P","S")
    2)= D ECVOLPRV^ACKQUTL5(DA,DA(1),X,"P","D")
    3)= Do not Delete.
    If this Event Capture record contains a reference to a CPT record the value entered within this field is automatically updated to the associated CPT field.
.07 CPT CODE POINTER 0;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 06, 2000
  • HELP-PROMPT:  Type a Number between 1 and 999, 0 Decimal Digits
  • DESCRIPTION:  
    This value is a pointer to this EC entries corresponding CPT entry.
Info |  Details |  All