Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details
Print Page as PDF
Sub-Field: 195.13

Package: Record Tracking

RECORD TRACKING APPLICATION(#195.1)-->195.12-->195.13

Sub-Field: 195.13


Information

Parent File Name Number Package
195.12 TYPE OF RECORDS 195.13 Record Tracking

Details

Field # Name Loc Type Details
.01 TYPE OF RECORD 0;1 POINTER TO RECORD TYPES FILE (#195.2)
************************REQUIRED FIELD************************
RECORD TYPES(#195.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,3)=D0" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUL 02, 1986
  • CROSS-REFERENCE:  195.1^AB
    1)= S ^DIC(195.1,"AB",$E(X,1,30),DA(2),DA(1),DA)=""
    2)= K ^DIC(195.1,"AB",$E(X,1,30),DA(2),DA(1),DA)
2 DEFAULT HOME LOCATION 0;2 POINTER TO BORROWERS/FILE AREAS FILE (#195.9) BORROWERS/FILE AREAS(#195.9)

  • INPUT TRANSFORM:  S DIC("V")="I $P(Y(0),U,4)=""L""",DIC("S")="D HOMESCR^RTDPA31" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAY 14, 1987
  • SCREEN:  S DIC("S")="D HOMESCR^RTDPA31"
  • EXPLANATION:  Allows only file rooms associated with the division and associated with the application.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
5 DEFAULT INITIAL BORROWER 0;5 POINTER TO BORROWERS/FILE AREAS FILE (#195.9) BORROWERS/FILE AREAS(#195.9)

  • INPUT TRANSFORM:  D APL^RTDPA31 S DIC("S")="I $D(^DIC(195.2,+^DIC(195.1,D0,""INST"",D1,""TYPE"",D2,0),0)),$P(^(0),U,3)=$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
  • SCREEN:  S DIC("S")="I $D(D0),$D(D1),$D(D2),$D(^DIC(195.2,+^DIC(195.1,D0,""INST"",D1,""TYPE"",D2,0),0)),$P(^(0),U,3)=$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
Info |  Details