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.1

Package: Record Tracking

Global: ^DIC(195.1


Information

FileMan FileNo FileMan Filename Package
195.1 RECORD TRACKING APPLICATION Record Tracking

Description

Directly Accessed By Routines, Total: 44

Package Total Routines
Record Tracking 44 891    BORROWER FILE PARAMETERS    ENTITY FILE    EXCLUDE APPOINTMENT TYPES    MAS RECORDS NEEDED BY CLINICS    RAD FOLDERS NEEDED BY CLINICS    RT ALL INPATIENTS    RT APPL SET-UP
RT FORMATS    RT PURGE PROFILE    RT RETIREMENT PROFILE    RT WARD LIST    RTB    RTB2    RTDPA1    RTDPA3
RTDPA31    RTNQ1    RTNQ2    RTNQ4    RTP3    RTP4    RTP41    RTP5
RTQ2    RTQ41    RTSM6    RTSM7    ^DIC(194.4    ^DIC(195.1    ^DIC(195.3    RTPSET
RTPSET1    RTQ    RTRPT3    RTSM61    RTSM81    RTSYS    RTUTL    ^RTV(195.9
RTUTL5    RTUTL6    SYNONYMS    TYPE OF RECORDS    

Accessed By FileMan Db Calls, Total: 4

Package Total Routines
Record Tracking 4 RTPSET    RTSM    RTSM81    RTSYS    

Pointed To By FileMan Files, Total: 9

Package Total FileMan Files
Record Tracking 9 LABEL FORMAT(#194.4)[3]    RECORD TRACKING APPLICATION(#195.1)[#195.14(3)#195.15(3)]    RECORD TYPES(#195.2)[3]    RECORD MOVEMENT TYPES(#195.3)[3]    RECORD TRACKING SYSTEM PARAMETERS(#195.4)[101201]    REASONS(#195.6)[3]    RECORDS(#190)[4]    PULL LIST(#194.2)[15]    BORROWERS/FILE AREAS(#195.9)[3#195.9001(3)]    

Pointer To FileMan Files, Total: 9

Package Total FileMan Files
Record Tracking 4 LABEL FORMAT(#194.4)[3]    RECORD TRACKING APPLICATION(#195.1)[#195.14(3)#195.15(3)]    RECORD TYPES(#195.2)[1045#195.13(.01)#195.14(.01)#195.15(.01)]    BORROWERS/FILE AREAS(#195.9)[4244#195.12(2)#195.13(2)#195.13(5)]    
Kernel 2 INSTITUTION(#4)[#195.12(.01)]    SERVICE/SECTION(#49)[2]    
MailMan 1 MAIL GROUP(#3.8)[121422]
Scheduling 1 APPOINTMENT TYPE(#409.1)[#195.1165(.01)]    
VA FileMan 1 FILE(#1)[#195.16(.01)#195.17(.01)]    

Fields, Total: 31

Field # Name Loc Type Details
.01 APPLICATION 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 identifies the application or functional work group which is using record tracking.
  • CROSS-REFERENCE:  195.1^B
    1)= S ^DIC(195.1,"B",$E(X,1,30),DA)=""
    2)= K ^DIC(195.1,"B",$E(X,1,30),DA)
2 SERVICE 0;2 POINTER TO SERVICE/SECTION FILE (#49) SERVICE/SECTION(#49)

  • LAST EDITED:  JAN 14, 1987
  • DESCRIPTION:  
    This links the application with an entry in the service/section file.
  • CROSS-REFERENCE:  195.1^D
    1)= S ^DIC(195.1,"D",$E(X,1,30),DA)=""
    2)= K ^DIC(195.1,"D",$E(X,1,30),DA)
3 BORROWER BARCODE FORMAT 0;3 POINTER TO LABEL FORMAT FILE (#194.4) LABEL FORMAT(#194.4)

  • INPUT TRANSFORM:  S DIC("S")="I $D(D0),$P(^(0),U,3)=D0,$P(^(0),U,4)=""b""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 17, 1987
  • DESCRIPTION:  
    This defines which label format will be used to print Borrower labels for this application.
  • SCREEN:  S DIC("S")="I $D(D0),$P(^(0),U,3)=D0,$P(^(0),U,4)=""b"""
  • EXPLANATION:  Allows only borrower type formats for the application.
7 FILE ROOM STAFF KEY 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<2) X I $D(X) S DIC(0)="EM",DIC="^DIC(19.1,",DIC("S")="I $E(^(0),1,2)=""RT""" D ^DIC K DIC S DIC=DIE,X=$P(Y,U,2) K:Y<0 X
  • LAST EDITED:  FEB 06, 1987
  • DESCRIPTION:  
    This identifies the Security key which is necessary to charge-out and check-in records to a file room.
  • EXECUTABLE HELP:  S DIC("S")="I $E(^(0),1,2)=""RT""",DIC="^DIC(19.1,",DIC(0)="E" D ^DIC K DIC S DIC=DIE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
8 FILE ROOM SUPERVISOR KEY 0;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<2) X I $D(X) S DIC(0)="EM",DIC="^DIC(19.1,",DIC("S")="I $E(^(0),1,2)=""RT""" D ^DIC K DIC S DIC=DIE,X=$P(Y,U,2) K:Y<0 X
  • LAST EDITED:  JAN 30, 1987
  • DESCRIPTION:  
    This defines the security key which is required to cancel, edit requests, define or find missing records.
  • EXECUTABLE HELP:  S DIC("S")="I $E(^(0),1,2)=""RT""",DIC="^DIC(19.1,",DIC(0)="E" D ^DIC K DIC S DIC=DIE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
9 ENTITY DISPLAY HEADER 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<3) X
  • LAST EDITED:  AUG 29, 1986
  • HELP-PROMPT:  ANSWER MUST BE 3-25 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This is the text used when displaying the record data.
10 DEFAULT RECORD CREATION TYPE 0;10 POINTER TO RECORD TYPES FILE (#195.2) RECORD TYPES(#195.2)

  • INPUT TRANSFORM:  S DIC("S")="I $D(D0),$P(^(0),U,3)=D0" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 08, 1986
  • DESCRIPTION:  
    This identifies the type of record which is normally created by the system for this application.
  • SCREEN:  S DIC("S")="I $D(D0),$P(^(0),U,3)=D0"
  • EXPLANATION:  Allows only records associated with this application.
12 MISSING RECORD MAIL GROUP 0;12 POINTER TO MAIL GROUP FILE (#3.8) MAIL GROUP(#3.8)

  • LAST EDITED:  MAY 05, 1987
  • DESCRIPTION:  
    This identifies the mail group which is notified when missing records are accessed or identified.
14 CLINIC REQUESTS MAIL GROUP 0;14 POINTER TO MAIL GROUP FILE (#3.8) MAIL GROUP(#3.8)

  • LAST EDITED:  MAR 17, 1988
  • HELP-PROMPT:  This mail group will receive a bulletin when the Clinic initialization batch proccess runs each night.
  • DESCRIPTION:  
    This identifies the mail group which receives notification when requests for records, xrays are generated at night by the clinic request initialization.
    SOURCE OF DATA:   SITE MANAGER
21 CANCELATION BULLETIN 2;1 SET
  • '0' FOR NOTHING;
  • '1' FOR BULLETIN;
  • '2' FOR DEVICE;
  • '3' FOR BOTH;

  • LAST EDITED:  DEC 12, 1990
22 CANCELATION MAIL GROUP 2;2 POINTER TO MAIL GROUP FILE (#3.8) MAIL GROUP(#3.8)

  • LAST EDITED:  APR 11, 1991
23 TERMINATED BORROWERS 2;3 SET
  • 'y' FOR YES;
  • 'n' FOR NO;

  • LAST EDITED:  DEC 11, 1990
  • HELP-PROMPT:  Answer Yes to revoke borrowing for terminated users
24 CANCEL REQUESTS 2;4 SET
  • 'y' FOR YES;
  • 'n' FOR NO;

  • LAST EDITED:  DEC 11, 1990
  • HELP-PROMPT:  Answer Yes to cancel requests for terminated borrowers
25 OK TO RETIRE RECORDS? 2;5 SET
  • 'y' FOR YES;
  • 'n' FOR NO;

  • LAST EDITED:  MAR 14, 1991
31 ENTITY SELECT PROMPT 3;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<3) X
  • LAST EDITED:  JUL 11, 1986
  • HELP-PROMPT:  ANSWER MUST BE 3-40 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This defines the prompt which is used when the system prompts for a record.
32 BORROWER SELECT PROMPT 3;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<3) X
  • LAST EDITED:  JUL 11, 1986
  • HELP-PROMPT:  ANSWER MUST BE 3-40 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This identifies the prompt used when the system asks for a Borrower.
41 EXCLUDE INPATIENTS 4;1 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  DEC 16, 1990
42 DEFAULT SCHEDULED ADMISSIONS 4;2 POINTER TO BORROWERS/FILE AREAS FILE (#195.9) BORROWERS/FILE AREAS(#195.9)

  • INPUT TRANSFORM:  S DIC("S")="I $D(D0),$P(^(0),U,3)=D0" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 17, 1991
  • DESCRIPTION:  
    This defines the borrower/file areas which will be used in generating a pull list from the scheduled admissions file.
  • SCREEN:  S DIC("S")="I $D(D0),$P(^(0),U,3)=D0"
  • EXPLANATION:  allows only borrowers/file areas associated with this application
43 CREATE RECORDS-CLINIC REQUESTS 4;3 SET
  • 'y' FOR YES;
  • 'n' FOR NO;

  • LAST EDITED:  APR 23, 1991
  • HELP-PROMPT:  No prevents requests, pull lists, if no record exists.
  • DESCRIPTION:  
    If set to yes a clinic request for a record will generate a record if none exists.  If set to no, a request, pull list and record will not be created if there is no record at the time of the request.
44 DEFAULT RETIREMENT BORROWER 4;4 POINTER TO BORROWERS/FILE AREAS FILE (#195.9) BORROWERS/FILE AREAS(#195.9)

  • INPUT TRANSFORM:  S DIC("S")="I $D(D0),$P(^(0),U,3)=D0" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 17, 1991
  • DESCRIPTION:  
    This field contains the default Borrower to charge/transfer records when they are retired.
  • SCREEN:  S DIC("S")="I $D(D0),$P(^(0),U,3)=D0"
  • EXPLANATION:  Allows only borrowers associated with this application
45 DEFAULT PERPETUAL RECORD 4;5 POINTER TO RECORD TYPES FILE (#195.2) RECORD TYPES(#195.2)

  • INPUT TRANSFORM:  S DIC("S")="I $D(D0),$P(^(0),U,3)=D0" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 15, 1991
  • DESCRIPTION:  
    This contains the record type that should be created when records are retired.
  • SCREEN:  S DIC("S")="I $D(D0),$P(^(0),U,3)=D0"
  • EXPLANATION:  Allows only records associated with this application.
50 SYNONYMS 1;0 Multiple #195.11 195.11

  • DESCRIPTION:  
    This allows the application to be selected by different names.
75 PROFILE/REPORT HEADER HD;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<5) X
  • LAST EDITED:  OCT 16, 1986
  • HELP-PROMPT:  ANSWER MUST BE 5-40 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This defines the text which will be displayed on various reports for this application.
100 INSTITUTION INST;0 POINTER Multiple #195.12 195.12

  • DESCRIPTION:  
    This defines the institutions using this application.
125 BORROWER FILE PARAMETERS BOR;0 POINTER Multiple #195.16 195.16

  • DESCRIPTION:  
    This defines that the system should ask for phone/room, associated borrower and show charged records when a borrower is accessed.
150 MAS RECORDS NEEDED BY CLINICS MAS;0 POINTER Multiple #195.14 195.14

  • DESCRIPTION:  
    This defines the type of record, volumes needed, and application when a clinic schedules a visit.
  • SCREEN:  S DIC("S")="I $D(D0),$D(^DIC(195.4,1,""MAS"")),D0=+^(""MAS""),+^(""MAS"")=+$P(^DIC(195.2,+Y,0),U,3)"
  • EXPLANATION:  Allows only MAS application records.
161 *EXCLUDE COLLATERAL REQUESTS CL EX;1 SET
  • '1' FOR YES;

  • LAST EDITED:  JUL 06, 1988
  • DESCRIPTION:  
    YES means do not request records for scheduled clinics if the patient type is collateral.
162 *EXCLUDE C&P REQUESTS CL EX;2 SET
  • '1' FOR YES;

  • LAST EDITED:  JUL 06, 1988
  • DESCRIPTION:  
    YES means do not request records for a scheduled clinic if the patient type is C&P.
165 EXCLUDE APPOINTMENT TYPES EXCLUDE;0 POINTER Multiple #195.1165 195.1165

  • DESCRIPTION:  
    Appointment types listed in this field are excluded from pull lists generated for clinics
250 RAD FOLDERS NEEDED BY CLINICS RAD;0 POINTER Multiple #195.15 195.15

  • DESCRIPTION:  
    This defines the folder, volume and application that should be requested when a scheduled clinic requires x-rays.
  • SCREEN:  S DIC("S")="I $D(^DIC(195.4,1,""RAD""),+^(""RAD"")=+$P(^DIC(195.2,+Y,0),U,3)"
  • EXPLANATION:  Allows only radiology record types.
300 ENTITY FILE ENTITY;0 POINTER Multiple #195.17 195.17

  • DESCRIPTION:  
    This defines by application the file which the record file points to.

Found Entries, Total: 2

APPLICATION: MEDICAL ADMINISTRATION    APPLICATION: RADIOLOGY    

External References

Name Field # of Occurrence
^DIC 3+1, 7+1, 7(HELP ), 8+1, 8(HELP ), 10+1, 42+1, 44+1, 45+1

Global Variables Directly Accessed

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA .01(XREF 1S), .01(XREF 1K), 2(XREF 1S), 2(XREF 1K)
DIC 3+1!*, 7+1*!, 7(HELP ), 8+1*!, 8(HELP ), 10+1!*, 42+1!*, 44+1!*, 45+1!*
DIC("S" 3+1*, 3SCR+1*, 7+1*, 7(HELP ), 8+1*, 8(HELP ), 10+1*, 10SCR+1*, 42+1*, 42SCR+1*
, 44+1*, 44SCR+1*, 45+1*, 45SCR+1*
DIC(0 7+1*, 7(HELP ), 8+1*, 8(HELP )
>> DIE 3+1, 7+1, 7(HELP ), 8+1, 8(HELP ), 10+1, 42+1, 44+1, 45+1
U 7+1, 8+1
X .01+1!, .01(XREF 1S), .01(XREF 1K), 2(XREF 1S), 2(XREF 1K), 3+1*!, 7+1!*, 8+1!*, 9+1!, 10+1*!
, 31+1!, 32+1!, 42+1*!, 44+1*!, 45+1*!, 75+1!
>> Y 3+1, 7+1, 8+1, 10+1, 42+1, 44+1, 45+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