Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries  | All
Print Page as PDF
Global: ^QA(741.1

Package: Occurrence Screen

Global: ^QA(741.1


Information

FileMan FileNo FileMan Filename Package
741.1 QA OCCURRENCE SCREEN CRITERIA Occurrence Screen

Description

Accessed By FileMan Db Calls, Total: 4

Package Total Routines
Occurrence Screen 3 QAOSCREE    QAOSENTR    QAOSERCR    
Interim Management Support 1 ECTQSCR    

Pointed To By FileMan Files, Total: 3

Package Total FileMan Files
Occurrence Screen 3 QA OCCURRENCE SCREEN(#741)[3]    QA OCCURRENCE CLINICAL REFERRAL(#741.4)[2]    QA OCCURRENCE EXCEPTION(#741.5)[1]    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Clinical Monitoring System 1 QA MONITOR(#743)[200]    

Fields, Total: 5

Field # Name Loc Type Details
.01 CODE 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45)!(X<(201-($D(QAQINST)#2*100))) X I $D(X) K:$L(X)>6!($L(X)<3)!((X'?3N)&(X'?3N1"."1.2N))!(X'=+X) X S:$D(X) DINUM=X
  • LAST EDITED:  JUL 08, 1993
  • HELP-PROMPT:  Answer with a number from 201 to 999.99.
  • DESCRIPTION:  
    VAMCs may enter their own screens (201 through 999.99), but may not change existing national screens (101.1,102,107,109). Screens may not have any trailing zeros or decimal points.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  741.1^B
    1)= S ^QA(741.1,"B",$E(X,1,30),DA)=""
    2)= K ^QA(741.1,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  741.1^BA^MUMPS
    1)= S ^QA(741.1,"BA",X\1,DA)=""
    2)= K ^QA(741.1,"BA",X\1,DA)
1 SCREEN 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:+$L(X)>90!($L(X)<1) X
  • LAST EDITED:  AUG 29, 1989
  • HELP-PROMPT:  Answer must be 1-90 characters in length.
  • DESCRIPTION:  
    This is the short description of the screen.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
2 EXPANDED SCREEN 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>120!($L(X)<1) X
  • LAST EDITED:  AUG 29, 1989
  • HELP-PROMPT:  Answer must be 1-120 characters in length.
  • DESCRIPTION:  
    This is the long description of the screen.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  741.1^C
    1)= S ^QA(741.1,"C",$E(X,1,30),DA)=""
    2)= K ^QA(741.1,"C",$E(X,1,30),DA)
100 SCREEN STATUS 0;4 SET
  • '1' FOR INACTIVE;
  • 'N' FOR NATIONAL;
  • 'L' FOR LOCAL;

  • LAST EDITED:  JUL 01, 1991
  • HELP-PROMPT:  Enter the appropriate screen status.
  • DESCRIPTION:  This field controls the auto enroll of the various screens. National and local screens will be auto enrolled if possible. This field is also used by the semi-annual report, any combinations of screen statuses may be
    included on the report.
  • SCREEN:  S DIC("S")="I $S($P(^QA(741.1,D0,0),""^"",4)=""N"":0,Y=""N"":0,1:1)"
  • EXPLANATION:  Nationally mandated screens may not be changed.
200 ASSOCIATED MONITOR 0;5 POINTER TO QA MONITOR FILE (#743) QA MONITOR(#743)

  • LAST EDITED:  MAR 02, 1992
  • HELP-PROMPT:  Enter the monitor that is associated with this screen.
  • DESCRIPTION:  
    This field is used to link the monitor and the screen for the purposes of the auto enroll functions.
  • CROSS-REFERENCE:  741.1^AM
    1)= S ^QA(741.1,"AM",$E(X,1,30),DA)=""
    2)= K ^QA(741.1,"AM",$E(X,1,30),DA)

Found Entries, Total: 14

CODE: 101    CODE: 101.1    CODE: 102    CODE: 103    CODE: 104.1    CODE: 104.2    CODE: 105.1    CODE: 105.2    
CODE: 106.1    CODE: 106.2    CODE: 107    CODE: 108    CODE: 109    CODE: 199    

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #621
  • QUALITY IMPROVEMENT CHECKLIST
  • Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries  | All