STANDARD DATA DICTIONARY #698.6 -- PACEMAKER MANUFACTURER FILE                                                    9/29/25    PAGE 1
STORED IN ^MCAR(698.6,  (46 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                    (VERSION 2.3)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file holds the manufacturer's name for the various equipment (Generators, A Leads, V Leads, PSAs, and telephone transmitters)
used by Pacemaker.  


              DD ACCESS: @
           AUDIT ACCESS: @
IDENTIFIED BY: MNEMONIC (#1)[R]

POINTED TO BY: PACEMAKER MANUFACTURER field (#3) of the GENERATOR IMPLANT File (#698) 
               TRANSMITTER MANUFACTURER field (#13) of the GENERATOR IMPLANT File (#698) 
               V LEAD MANUFACTURER field (#3) of the V LEAD IMPLANT File (#698.1) 
               A LEAD MANUFACTURER field (#3) of the A LEAD IMPLANT File (#698.2) 
               MANUFACTURER field (#2) of the PACEMAKER EQUIPMENT File (#698.4) 
               

CROSS
REFERENCED BY: NAME(B), MNEMONIC(C)



698.6,.01     NAME                   0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X
              HELP-PROMPT:      NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION 
              DESCRIPTION:
                                This field identifies the name of the manufacturer.  

              CROSS-REFERENCE:  698.6^B 
                                1)= S ^MCAR(698.6,"B",$E(X,1,30),DA)=""
                                2)= K ^MCAR(698.6,"B",$E(X,1,30),DA)


698.6,1       MNEMONIC               0;2 FREE TEXT (Required)

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>3!($L(X)<2) X
              LAST EDITED:      FEB 08, 1989 
              HELP-PROMPT:      Enter Abbreviation to be used on Pacemaker active patient list 
              DESCRIPTION:
                                This field identifies the abbreviated manufacturer name.  

              CROSS-REFERENCE:  698.6^C 
                                1)= S ^MCAR(698.6,"C",$E(X,1,30),DA)=""
                                2)= K ^MCAR(698.6,"C",$E(X,1,30),DA)
                                This cross-reference allows look-ups by Mnemonics.  




INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):