STANDARD DATA DICTIONARY #690.97 -- MCQ POLLING FILE                                                              9/29/25    PAGE 1
STORED IN ^MCAR(690.97,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                     (VERSION 2.3)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file supports the loading of Patient Care Component (PCC) visit related procedure information for sites running QueryMan.  


              DD ACCESS: @
           AUDIT ACCESS: @

CROSS
REFERENCED BY: DATE/TIME(B)



690.97,.01    DATE/TIME              0;1 DATE (Required)

              INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X S:$D(X) DINUM=X
              LAST EDITED:      MAY 02, 1996 
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

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


690.97,.02    TYPE                   0;2 SET

                                '1' FOR PAT; 
                                '2' FOR PCC; 
                                '3' FOR DEL; 
              LAST EDITED:      MAY 02, 1996 

690.97,.03    DA                     0;3 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<0)!(X?.E1"."7N.N) X
              LAST EDITED:      MAY 02, 1996 
              HELP-PROMPT:      Type a Number between 0 and 999999999999, 6 Decimal Digits 

690.97,.04    FILE                   0;4 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<0)!(X?.E1"."7N.N) X
              LAST EDITED:      MAY 02, 1996 
              HELP-PROMPT:      Type a Number between 0 and 999999999999, 6 Decimal Digits 

690.97,.05    MCARGDA                0;5 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<0)!(X?.E1"."7N.N) X
              LAST EDITED:      MAY 02, 1996 
              HELP-PROMPT:      Type a Number between 0 and 999999999999, 6 Decimal Digits 

690.97,.06    MCQDEL                 0;6 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
              LAST EDITED:      MAY 02, 1996 
              HELP-PROMPT:      Answer must be 1-30 characters in length. 


INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):