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 |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables |  All
Print Page as PDF
Global: ^QA(742.5

Package: Incident Reporting

Global: ^QA(742.5


Information

FileMan FileNo FileMan Filename Package
742.5 QA INCIDENT LOCATION Incident Reporting

Description

Directly Accessed By Routines, Total: 8

Package Total Routines
Incident Reporting 8 QANCDNT    QANFULL    QANMAIL    QANRPT1    ^QA(742.5    QANUTL1    QANUTL3    QANUTL4

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
Incident Reporting 1 QANUTL3    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Incident Reporting 1 QA INCIDENT REPORT(#742.4)[.04]    

Fields, Total: 3

Field # Name Loc Type Details
.001 INCIDENT LOCATION NUMBER FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45)!(X<200) X I $D(X) K:$L(X)>6!($L(X)<3)!((X'?3N)&(X'?3N1"."1.2N)) X D:$D(^QA(742.1,+X,0)) EN3^QANAUX1 S:$D(X) DINUM=X
  • LAST EDITED:  JUL 22, 1992
  • HELP-PROMPT:  Answer must be 3-6 numbers in length, greater than or equal to 200, with or without two decimal places.
  • DESCRIPTION:  
    Incident Location Number links a unique number with a particular incident.  All local incident locations must have numbers of 200 or greater.  This number may or may not have two decimal places.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.01 INCIDENT LOCATION 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  JUL 10, 1991
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    Location where the incident has taken place.
  • DELETE TEST:  1,0)= I 1 W !,*7,"Incident Locations CANNOT be deleted."
  • CROSS-REFERENCE:  742.5^B
    1)= S ^QA(742.5,"B",$E(X,1,30),DA)=""
    2)= K ^QA(742.5,"B",$E(X,1,30),DA)
    3)= Do not delete!
  • CROSS-REFERENCE:  742.5^BUPPER
    1)= S ^QA(742.5,"BUPPER",$TR(X,"abcdefghijklmnopqrstuvwxyz","ABCDEFGHIJKLMNOPQRSTUVWXYZ"),DA)=""
    2)= K ^QA(742.5,"BUPPER",$TR(X,"abcdefghijklmnopqrstuvwxyz","ABCDEFGHIJKLMNOPQRSTUVWXYZ"),DA)
    3)= Do not delete!
    Cross Reference files the uppercase text of the Incident Location.
.02 LOCATION STATUS 0;2 SET
  • '1' FOR ACTIVE;

  • LAST EDITED:  APR 29, 1992
  • HELP-PROMPT:  Enter if the location is currently valid.
  • DESCRIPTION:  
    Indicates whether a location is currently active on the system.
  • CROSS-REFERENCE:  742.5^BSTAT
    1)= S ^QA(742.5,"BSTAT",$E(X,1,30),DA)=""
    2)= K ^QA(742.5,"BSTAT",$E(X,1,30),DA)
    3)= Do not delete.
    Indicates the status of an Incident Location.

External References

Name Field # of Occurrence
EN3^QANAUX1 .001+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^QA(742.1 - [#742.1] .001+1
^QA(742.5 - [#742.5] .01(XREF 1S), .01(XREF 1K), .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
>> DA .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K)
>> DINUM .001+1*
X .001+1!, .01+1!, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K)
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables |  All