Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^QA(741.95

Package: Occurrence Screen

Global: ^QA(741.95


Information

FileMan FileNo FileMan Filename Package
741.95 *QA OCCURRENCE NUMBER CASES SCREENED Occurrence Screen

Description

Directly Accessed By Routines, Total: 2

Package Total Routines
Occurrence Screen 2 ^QA(741.95    ^QA(741.99    

Fields, Total: 11

Field # Name Loc Type Details
.01 *BEGINNING DATE 0;1 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 09, 1991
  • HELP-PROMPT:  Enter the beginning date of the reporting period.
  • DESCRIPTION:  
    This is the beginning date for this range of totals.
  • CROSS-REFERENCE:  741.95^B
    1)= S ^QA(741.95,"B",$E(X,1,30),DA)=""
    2)= K ^QA(741.95,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  741.95^AA1^MUMPS
    1)= S QA(2)=$S($D(^QA(741.95,DA,0))#2:$P(^(0),"^",2),1:"") S:QA(2)]"" ^QA(741.95,"AA",X,QA(2),DA)="" K QA
    2)= S QA(2)=$S($D(^QA(741.95,DA,0))#2:$P(^(0),"^",2),1:"") K:QA(2)]"" ^QA(741.95,"AA",X,QA(2),DA) K QA
.02 *ENDING DATE 0;2 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX",%DT(0)=+^QA(741.95,DA,0) D ^%DT K %DT(0) S X=Y K:Y<1 X
  • LAST EDITED:  MAY 09, 1991
  • HELP-PROMPT:  Enter the ending date of the reporting period.
  • DESCRIPTION:  
    This is the ending date for this range of totals.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  741.95^AA2^MUMPS
    1)= S QA(1)=$S($D(^QA(741.95,DA,0))#2:$P(^(0),"^",1),1:"") S:QA(1)]"" ^QA(741.95,"AA",QA(1),X,DA)="" K QA
    2)= S QA(1)=$S($D(^QA(741.95,DA,0))#2:$P(^(0),"^",1),1:"") K:QA(1)]"" ^QA(741.95,"AA",QA(1),X,DA) K QA
1 *ADMISSIONS TO ACUTE CARE 0;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 09, 1991
  • HELP-PROMPT:  Type a Number between 0 and 999999
  • DESCRIPTION:  
    Number of admissions to acute care during reporting period. (Used by screens 101, 108, and 109.)
2 *AMBULATORY CARE VISITS 0;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 09, 1991
  • HELP-PROMPT:  Type a Number between 0 and 999999
  • DESCRIPTION:  
    Number of ambulatory care visits during reporting period. (Used by screen 102.)
3 *AMBULATORY SURGERY PROCEDURES 0;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 09, 1991
  • HELP-PROMPT:  Type a Number between 0 and 999999
  • DESCRIPTION:  
    Number of ambulatory surgery procedures during reporting period. (Used by screen 103.)
4 *DISCHARGES FROM ACUTE TO NHCU 0;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 09, 1991
  • HELP-PROMPT:  Type a Number between 0 and 999999
  • DESCRIPTION:  
    Number of discharges from acute care to NHCU during reporting period. (Used by screen 104.1.)
5 *PATs TREATED IN NHCU 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 09, 1991
  • HELP-PROMPT:  Type a Number between 0 and 999999
  • DESCRIPTION:  
    Number of patients treated in NHCU during reporting period. (Used by screen 104.2.)
6 *TRFs FROM ACUTE TO INTERM MED 0;8 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 09, 1991
  • HELP-PROMPT:  Type a Number between 0 and 999999, 0 Decimal Digits
  • DESCRIPTION:  
    Number of transfers from acute care to intermediate medicine during reporting period. (Used by screen 105.1.)
7 *PATs TREATED IN INTERM MED 0;9 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 09, 1991
  • HELP-PROMPT:  Type a Number between 0 and 999999
  • DESCRIPTION:  
    Number of patients treated in intermediate medicine during reporting period. (Used by screen 105.2.)
8 *TRFs FROM SPECIAL CARE UNITS 0;10 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 09, 1991
  • HELP-PROMPT:  Type a Number between 0 and 999999
  • DESCRIPTION:  
    Number of transfers from special care units during reporting period. (Used by screen 106.1.)
9 *PATs TREATED IN SURG SERVICE 0;11 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 09, 1991
  • HELP-PROMPT:  Type a Number between 0 and 999999
  • DESCRIPTION:  
    Number of patients treated in surgical service during reporting period. (Used by screens 106.2 and 107.)

External References

Name Field # of Occurrence
^%DT .01+1, .02+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^QA(741.95 - [#741.95] .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02+1, .02(XREF 1S), .02(XREF 1K)

Naked Globals

Name Field # of Occurrence
^(0 ID.02+1, .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT .01+1*, .02+1*
>> %DT(0 .02+1*!
>> DA .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02+1, .02(XREF 1S), .02(XREF 1K)
QA .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K)
QA(1 .02(XREF 1S), .02(XREF 1K)
QA(2 .01(XREF 2S), .01(XREF 2K)
U ID.02+1
X .01+1*!, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02+1*!, .02(XREF 1S), .02(XREF 1K), 1+1!, 2+1!
, 3+1!, 4+1!, 5+1!, 6+1!, 7+1!, 8+1!, 9+1!
>> Y .01+1, .02+1
Info |  Desc |  Directly Accessed By Routines |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All