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 |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^DIC(195.2

Package: Record Tracking

Global: ^DIC(195.2


Information

FileMan FileNo FileMan Filename Package
195.2 RECORD TYPES Record Tracking

Description

Directly Accessed By Routines, Total: 57

Package Total Routines
Record Tracking 57 ALLOWABLE FILE ROOMS    LINKED RECORDS    MAS RECORDS NEEDED BY CLINICS    RAD FOLDERS NEEDED BY CLINICS    RECORDS NEEDED BY LOCATION    RT MISSING    RT PURGE PROFILE    RT RETIREMENT PROFILE
RT TYPE SET-UP    RTB2    RTCC4    RTCH    RTCL    RTCX    RTDEL    RTDPA
RTDPA1    RTDPA2    RTDPA31    RTL1    RTNQ1    RTNQ2    RTNQ3    RTNQ4
RTNQ41    RTP2    RTP3    RTP31    RTP41    RTP51    RTPURGE    RTQ1
RTQ2    RTQ3    RTRAD    RTRPT    RTRPT1    RTRPT2    RTRPT5    RTSM2
RTSM7    RTSM81    RTT    RTT1    RTT11    RTT2    RTT3    RTUTL
RTUTL1    RTUTL2    RTUTL3    RTUTL4    RTUTL6    ^DIC(195.2    ^DIC(195.4    ^RTV(194.2
SYNONYMS    

Accessed By FileMan Db Calls, Total: 10

Package Total Routines
Record Tracking 10 RTDPA1    RTNQ2    RTPSET    RTPURGE    RTSM2    RTSM81    RTSYS    RTT1
RTT11    RTUTL    

Pointed To By FileMan Files, Total: 7

Package Total FileMan Files
Record Tracking 6 RECORD TRACKING APPLICATION(#195.1)[1045#195.13(.01)#195.14(.01)#195.15(.01)]    RECORD TYPES(#195.2)[#195.22(.01)]    RECORD TRACKING SYSTEM PARAMETERS(#195.4)[102202]    RECORDS(#190)[3]    PULL LIST(#194.2)[4]    BORROWERS/FILE AREAS(#195.9)[#195.9001(.01)]    
Registration 1 MEDICAL CENTER DIVISION(#40.8)[100.3]    

Pointer To FileMan Files, Total: 4

Package Total FileMan Files
Record Tracking 4 LABEL FORMAT(#194.4)[56]    RECORD TRACKING APPLICATION(#195.1)[3]    RECORD TYPES(#195.2)[#195.22(.01)]    BORROWERS/FILE AREAS(#195.9)[#195.21(.01)]    

Fields, Total: 26

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

  • 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 describes the record as to function.
  • CROSS-REFERENCE:  195.2^B
    1)= S ^DIC(195.2,"B",$E(X,1,30),DA)=""
    2)= K ^DIC(195.2,"B",$E(X,1,30),DA)
2 ABBREVIATION 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<1) X
  • LAST EDITED:  SEP 05, 1986
  • HELP-PROMPT:  ANSWER MUST BE 1-3 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This allows the record type to be selected by a few characters.
3 APPLICATION 0;3 POINTER TO RECORD TRACKING APPLICATION FILE (#195.1) RECORD TRACKING APPLICATION(#195.1)

  • LAST EDITED:  JAN 22, 1987
  • DESCRIPTION:  
    This allows the record type to be associated with one or many applications.
    UNEDITABLE
  • CROSS-REFERENCE:  195.2^C
    1)= S ^DIC(195.2,"C",$E(X,1,30),DA)=""
    2)= K ^DIC(195.2,"C",$E(X,1,30),DA)
4 INQUIRY DISPLAY ORDER 0;4 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X D CHK^RTUTL3:$D(X)
  • LAST EDITED:  MAR 06, 1987
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 0 AND 999
  • DESCRIPTION:  
    This is used by the system to allow application modification of displays.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
5 RECORD LABEL FORMAT 0;5 POINTER TO LABEL FORMAT FILE (#194.4) LABEL FORMAT(#194.4)

  • INPUT TRANSFORM:  S DIC("S")="I $D(D0),$P(^(0),U,4)=""r"",$P(^(0),U,3)=$P(^DIC(195.2,D0,0),U,3)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  AUG 19, 1986
  • DESCRIPTION:  
    This defines the label format to be used when printing a record label.
  • SCREEN:  S DIC("S")="I $D(D0),$P(^(0),U,4)=""r"",$P(^(0),U,3)=$P(^DIC(195.2,D0,0),U,3)"
  • EXPLANATION:  Allows only record formats for current application.
6 REQUEST NOTICE FORMAT 0;6 POINTER TO LABEL FORMAT FILE (#194.4) LABEL FORMAT(#194.4)

  • INPUT TRANSFORM:  S DIC("S")="I $D(D0),$P(^(0),U,4)=""q"",$P(^(0),U,3)=$P(^DIC(195.2,D0,0),U,3)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  AUG 19, 1986
  • DESCRIPTION:  
    This defines the label format to be used when printing a request for a record.
  • SCREEN:  S DIC("S")="I $D(D0),$P(^(0),U,4)=""q"",$P(^(0),U,3)=$P(^DIC(195.2,D0,0),U,3)"
  • EXPLANATION:  Allows only request formats for current application.
7 CONTROL OF FINDING RECORDS 0;7 SET
  • 'f' FOR FILE ROOM SUPERVISOR ONLY!;
  • 'a' FOR ANY USER;

  • LAST EDITED:  AUG 26, 1986
  • DESCRIPTION:  
    This allows the application to limit the designation of a missing record as found.
8 REQUEST PURGE CUTOFF (days) 0;8 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  AUG 26, 1986
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 99999999
  • DESCRIPTION:  
    This defines the number of days to retain requests before purging.
9 PENDING REQUEST CUTOFF (days) 0;9 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  AUG 26, 1986
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 99999999
  • DESCRIPTION:  
    This defines the number of days before a request is considered not filled by the system.
10 PULL LIST PURGE CUTOFF (days) 0;10 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  AUG 27, 1986
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 99999999
  • DESCRIPTION:  
    This defines the number of days to retain pull lists before the pull lists are purged by the purge option.
11 OVERDUE RECORD CUTOFF (days) 0;11 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 02, 1986
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 99999999
  • DESCRIPTION:  
    This defines the number of days that a charged record is allowed to be charged before it is considered by the system as overdue.
11.1 BARCODE RENEWAL CUTOFF (days) 0;20 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<365)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 23, 1991
  • HELP-PROMPT:  Type a Number between 365 and 9999, 0 Decimal Digits
  • DESCRIPTION:  This field contains the number of days required to consider re-printing a barcode label.
12 # PREVIOUS MOVEMENTS TO RETAIN 0;12 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<5)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUN 06, 1988
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 5 AND 9999
  • DESCRIPTION:  
    This defines the number of movements to not be purged by the purge option.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
13 CURRENT BORR REQUEST TIME MIN. 0;13 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 28, 1986
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 99999
  • DESCRIPTION:  
    This defines the time in the future when the current borrower may request the record again.
14 CAN RECORD BE REQUESTED? 0;14 SET
  • 'y' FOR YES;
  • 'n' FOR NO;

  • LAST EDITED:  NOV 12, 1986
  • DESCRIPTION:  
    No means the record cannot be requested.
15 IS RECORD TEMPORARY? 0;15 SET
  • 'y' FOR YES;
  • 'n' FOR NO;

  • LAST EDITED:  NOV 12, 1986
  • DESCRIPTION:  
    This means that the record can only be charged out once.
16 ASK FOR CONTENT DESCRIPTOR? 0;16 SET
  • 'y' FOR YES;
  • 'n' FOR NO;

  • LAST EDITED:  NOV 12, 1986
  • DESCRIPTION:  
    Yes means the system will query the user to add free text for record description.
17 MULTIPLE VOLUMES ALLOWED? 0;17 SET
************************REQUIRED FIELD************************
  • 'y' FOR YES;
  • 'n' FOR NO;

  • LAST EDITED:  FEB 14, 1987
  • DESCRIPTION:  
    Yes means the system will allow creation of multiple volumes for this type of record.
18 OK TO PURGE DATA? 0;18 SET
  • 'y' FOR YES;
  • 'n' FOR NO;

  • LAST EDITED:  APR 28, 1987
  • DESCRIPTION:  
    NO means that all the purge parameters will be ignored by the purge option and no data is purged until this parameter is set to YES.
19 RETIRE RECORD CUTOFF (days) 0;19 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<365)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 23, 1991
  • HELP-PROMPT:  Type a Number between 365 and 9999, 0 Decimal Digits
  • DESCRIPTION:  This field will contain the number of days required for a record to be considered for retirement.
21 PENDING CHECK-IN CUTOFF (days) 1;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 18, 1990
  • HELP-PROMPT:  Type a Number between 0 and 99999, 0 Decimal Digits
  • DESCRIPTION:  
    This describes the number of days a pending request will be displayed for a record when the record is being checked in.
22 OK TO RETIRE RECORDS? 1;2 SET
  • 'y' FOR YES;
  • 'n' FOR NO;

  • LAST EDITED:  MAR 13, 1991
50 INACTIVATION DATE I;1 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • DESCRIPTION:  
    This defines a date when the record is no longer available to be charged out.
75 LINKED RECORDS LINKED;0 POINTER Multiple #195.22 195.22

  • DESCRIPTION:  
    This points to other record types which should be automatically created by the system when this record is created.
  • SCREEN:  S DIC("S")="I $D(D0),D0'=+Y,$P(^(0),U,3)=$P(^DIC(195.2,D0,0),U,3)"
  • EXPLANATION:  Allows only records for the same application.
100 ALLOWABLE FILE ROOMS F;0 POINTER Multiple #195.21 195.21

  • DESCRIPTION:  
    This defines which borrower/file areas may be allowed to check in this type of record.
  • SCREEN:  S DIC("S")="I $D(D0),$P(^(0),U,3)=$P(^DIC(195.2,D0,0),U,3),$D(^SC(+$P(^RTV(195.9,Y,0),U,2),0)),$P(^(0),U,3)=""F"" D DICS^RTDPA31"
  • EXPLANATION:  Allows only file rooms that match the record type application.
150 DESCRIPTION D;0 WORD-PROCESSING #195.23

  • DESCRIPTION:  
    This free text allows the record to be described more fully.
  • LAST EDITED:  SEP 23, 1986

Found Entries, Total: 7

NAME: MEDICAL RECORD    NAME: ADMINISTRATIVE FOLDER    NAME: MASTER FOLDER    NAME: WET READING FOLDER    NAME: TEMPORARY EXAM FOLDER    NAME: OUTSIDE FOLDER    NAME: PERPETUAL FOLDER    

External References

Name Field # of Occurrence
^%DT 50+1
^DIC 5+1, 6+1
CHK^RTUTL3 4+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(195.2 - [#195.2] .01(XREF 1S), .01(XREF 1K), 3(XREF 1S), 3(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT 50+1*
>> DA .01(XREF 1S), .01(XREF 1K), 3(XREF 1S), 3(XREF 1K)
DIC 5+1!*, 6+1!*
DIC("S" 5+1*, 5SCR+1*, 6+1*, 6SCR+1*
>> DIE 5+1, 6+1
X .01+1!, .01(XREF 1S), .01(XREF 1K), 2+1!, 3(XREF 1S), 3(XREF 1K), 4+1!, 5+1*!, 6+1*!, 8+1!
, 9+1!, 10+1!, 11+1!, 11.1+1!, 12+1!, 13+1!, 19+1!, 21+1!, 50+1*!
>> Y 5+1, 6+1, 50+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Local Variables  | All