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 |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^RTV(194.2

Package: Record Tracking

Global: ^RTV(194.2


Information

FileMan FileNo FileMan Filename Package
194.2 PULL LIST Record Tracking

Description

Directly Accessed By Routines, Total: 24

Package Total Routines
Record Tracking 24 RT TIME STUDY    RTCP    RTCP1    RTCP2    RTDPA31    RTP2    RTP3    RTP31
RTP32    RTP4    RTP41    RTP5    RTP51    RTP6    RTPCAN    RTPURGE
RTQ2    RTREP    RTREP1    RTSM7    RTXP1    RTXP2    RTYDPST    ^RTV(194.2

Accessed By FileMan Db Calls, Total: 12

Package Total Routines
Record Tracking 12 RTCP    RTCP1    RTCP2    RTP    RTP1    RTP40    RTP6    RTPCAN
RTPURGE    RTQ2    RTREP    RTYDPST    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Record Tracking 1 REQUESTED RECORDS(#190.1)[10]    

Pointer To FileMan Files, Total: 6

Package Total FileMan Files
Record Tracking 4 RECORD TRACKING APPLICATION(#195.1)[15]    RECORD TYPES(#195.2)[4]    REASONS(#195.6)[9]    BORROWERS/FILE AREAS(#195.9)[516]    
Kernel 2 INSTITUTION(#4)[12]    NEW PERSON(#200)[38]    

Fields, Total: 18

Field # Name Loc Type Details
.001 NUMBER NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUN 30, 1986
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 9999999
  • DESCRIPTION:  
    This allows pull lists to be selected by internal file number
.01 PULL LIST 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>45!($L(X)<3) X I $D(X) S X=$$UP^XLFSTR(X)
  • LAST EDITED:  NOV 22, 1995
  • HELP-PROMPT:  ANSWER MUST BE 3-45 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This allows a group of requests for records to be logically grouped in a list for group action, charged out by the system.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  194.2^B
    1)= S ^RTV(194.2,"B",$E(X,1,45),DA)=""
    2)= K ^RTV(194.2,"B",$E(X,1,45),DA)
2 DATE RECORDS NEEDED 0;2 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUN 17, 1986
  • DESCRIPTION:  
    This identifies the date for a group of requests for records.
  • CROSS-REFERENCE:  194.2^C
    1)= S ^RTV(194.2,"C",$E(X,1,30),DA)=""
    2)= K ^RTV(194.2,"C",$E(X,1,30),DA)
3 USER ENTERING REQUEST 0;3 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JUN 24, 1991
  • DESCRIPTION:  
    This defines the user who made the requests on the pull list
4 RECORD TYPE RESTRICTION 0;4 POINTER TO RECORD TYPES FILE (#195.2) RECORD TYPES(#195.2)

  • INPUT TRANSFORM:  S DIC("S")="I $D(D0),$P(^(0),U,3)=$P(^RTV(194.2,D0,0),U,15)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAY 06, 1987
  • DESCRIPTION:  
    This defines particular types of records which may be requested on a pull list.
  • SCREEN:  S DIC("S")="I $D(D0),$P(^(0),U,3)=$P(^RTV(194.2,D0,0),U,15)"
  • EXPLANATION:  Allows only record types associated with the application.
5 BORROWER 0;5 POINTER TO BORROWERS/FILE AREAS FILE (#195.9)
************************REQUIRED FIELD************************
BORROWERS/FILE AREAS(#195.9)

  • INPUT TRANSFORM:  D PULL^RTDPA31 S DIC("S")="I $D(D0),$P(^RTV(194.2,D0,0),U,15)=$P(^RTV(195.9,Y,0),U,3) D DICS^RTDPA31" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  FEB 18, 1987
  • DESCRIPTION:  
    This defines the borrower in the system for the list of records.
  • SCREEN:  S DIC("S")="I $D(D0),$P(^RTV(194.2,D0,0),U,15)=$P(^RTV(195.9,Y,0),U,3) D DICS^RTDPA31"
  • EXPLANATION:  Allows borrowers/locations associated with this application.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
6 PULL LIST STATUS 0;6 SET
  • 'c' FOR CHARGED;
  • 'x' FOR CANCELLED;
  • 'r' FOR REQUESTED;

  • LAST EDITED:  NOV 10, 1986
  • DESCRIPTION:  
    This delineates the state of the pull list in the system.
7 DATE/TIME CURRENT STATUS 0;7 DATE

  • INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUL 25, 1986
  • DESCRIPTION:  
    This defines the date, time the status of the pull list was set.
8 USER RESPONSIBLE FOR STATUS 0;8 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JUN 24, 1991
  • DESCRIPTION:  
    This defines the user in the system who changed the status of the pull list.
9 CANCEL REASON 0;9 POINTER TO REASONS FILE (#195.6) REASONS(#195.6)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""c""!($P(^(0),U,2)=""g"")" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAY 27, 1987
  • DESCRIPTION:  
    This defines different reasons for cancelling the pull list.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""c""!($P(^(0),U,2)=""g"")"
  • EXPLANATION:  Allows only cancel or general reasons.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
10 TYPE OF LIST 0;10 SET
  • '1' FOR SCHEDULING;
  • '2' FOR ADHOC;
  • '3' FOR RECORD RETIREMENT;

  • LAST EDITED:  MAR 10, 1991
  • DESCRIPTION:  
    This allows the system to differentiate between pull list generated from Scheduling clinics and other pull lists.
11 VOLUMES REQUESTED 0;11 SET
  • 'A' FOR ALL VOLUMES;
  • 'L' FOR LATEST VOLUME;

  • LAST EDITED:  FEB 15, 1987
  • DESCRIPTION:  
    This allows the system to handle multi-volume records by defining the needs of the borrower.
12 INSTITUTION OF BORROWER 0;12 POINTER TO INSTITUTION FILE (#4)
************************REQUIRED FIELD************************
INSTITUTION(#4)

  • LAST EDITED:  NOV 10, 1986
  • DESCRIPTION:  
    This further describes the borrower of the record for different divisions within the system.
13 DATE/TIME PULL LIST PRINTED 0;13 DATE

  • INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  AUG 05, 1986
  • DESCRIPTION:  
    This defines the date, time the pull list was printed to identify the validity of the list at the present time.
    WRITE AUTHORITY:  ^
14 DATE/TIME LAST UPDATED 0;14 DATE

  • INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  AUG 07, 1986
  • DESCRIPTION:  
    This defines the date, time of the last update to the list.
    WRITE AUTHORITY:  ^
15 APPLICATION 0;15 POINTER TO RECORD TRACKING APPLICATION FILE (#195.1)
************************REQUIRED FIELD************************
RECORD TRACKING APPLICATION(#195.1)

  • LAST EDITED:  SEP 16, 1986
  • DESCRIPTION:  
    This defines the application identified with the list to allow the system to share the same file with different applications.
  • CROSS-REFERENCE:  194.2^AC
    1)= S ^RTV(194.2,"AC",$E(X,1,30),DA)=""
    2)= K ^RTV(194.2,"AC",$E(X,1,30),DA)
16 HOLDING AREA 0;16 POINTER TO BORROWERS/FILE AREAS FILE (#195.9) BORROWERS/FILE AREAS(#195.9)

  • INPUT TRANSFORM:  S DIC("S")="I $D(D0),$P(^RTV(194.2,D0,0),U,15)=$P(^RTV(195.9,Y,0),U,3) D DICS^RTDPA31" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAY 15, 1987
  • DESCRIPTION:  
    This allows groups of records to be moved to a temporary area before  further distribution.
  • SCREEN:  S DIC("S")="I $D(D0),$P(^RTV(194.2,D0,0),U,15)=$P(^RTV(195.9,Y,0),U,3) D DICS^RTDPA31"
  • EXPLANATION:  Allows borrowers/locations associated with this application.
100 COMMENTS 1;0 WORD-PROCESSING #194.21

  • DESCRIPTION:  
    This allows free text description to be added to the pull list to aid in justification and identification of the list.

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #546
  • SCHEDULING
  • External References

    Name Field # of Occurrence
    ^%DT 2+1, 7+1, 13+1, 14+1
    ^DIC 4+1, 5+1, 9+1, 16+1
    PULL^RTDPA31 5+1
    $$UP^XLFSTR .01+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DIC(195.2 - [#195.2] ID4+1
    ^RTV(194.2 - [#194.2] .01(XREF 1S), .01(XREF 1K), 2(XREF 1S), 2(XREF 1K), 15(XREF 1S), 15(XREF 1K)

    Naked Globals

    Name Field # of Occurrence
    ^(0 ID2+1, ID4+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT 2+1*, 7+1*, 13+1*, 14+1*
    >> DA .01(XREF 1S), .01(XREF 1K), 2(XREF 1S), 2(XREF 1K), 15(XREF 1S), 15(XREF 1K)
    DIC ID4+1, ID6+1, 4+1!*, 5+1!*, 9+1!*, 16+1!*
    DIC("S" 4+1*, 4SCR+1*, 5+1*, 5SCR+1*, 9+1*, 9SCR+1*, 16+1*, 16SCR+1*
    >> DIE 4+1, 5+1, 9+1, 16+1
    U ID2+1, ID4+1
    X .001+1!, .01+1!*, .01(XREF 1S), .01(XREF 1K), 2+1*!, 2(XREF 1S), 2(XREF 1K), 4+1*!, 5+1*!, 7+1*!
    , 9+1*!, 13+1*!, 14+1*!, 15(XREF 1S), 15(XREF 1K), 16+1*!
    >> Y 2+1, 4+1, 5+1, 7+1, 9+1, 13+1, 14+1, 16+1
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All