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 |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^PS(52.92

Package: Outpatient Pharmacy

Global: ^PS(52.92


Information

FileMan FileNo FileMan Filename Package
52.92 TPB INSTITUTION LETTERS Outpatient Pharmacy

Description

Directly Accessed By Routines, Total: 5

Package Total Routines
Outpatient Pharmacy 5 PSO145PS    PSOTPCL    ^PS(52.92    PSOTPCLP    SORT GROUP    

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
Outpatient Pharmacy 3 PSOTPCL    PSOTPCLP    PSOTPCLR    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Outpatient Pharmacy 1 TPB INSTITUTION LETTERS(#52.92)[.02]    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Kernel 2 INSTITUTION(#4)[.01]    STATE(#5)[.09, 1.04]    
Outpatient Pharmacy 1 TPB INSTITUTION LETTERS(#52.92)[.02]    

Fields, Total: 17

Field # Name Loc Type Details
.01 INSTITUTION 0;1 POINTER TO INSTITUTION FILE (#4)
************************REQUIRED FIELD************************
INSTITUTION(#4)

  • INPUT TRANSFORM:  S DINUM=X
  • LAST EDITED:  JUL 28, 2003
  • DESCRIPTION:  
    Pointer to Instituion file #4, to be used for printing TPB letters.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  52.92^B
    1)= S ^PS(52.92,"B",$E(X,1,30),DA)=""
    2)= K ^PS(52.92,"B",$E(X,1,30),DA)
.02 PARENT INSTITUTION 0;2 POINTER TO TPB INSTITUTION LETTERS FILE (#52.92) TPB INSTITUTION LETTERS(#52.92)

  • LAST EDITED:  AUG 18, 2003
  • DESCRIPTION:  This field is to be used to re-map Instituions, like CBOCs, to a parent Institution for the purpose of providing a proper:
    Letter Heading
    Local Pharmacy Phone Number(s)
    Directors Signature Block
.03 TPB CONTACT PHONE 1 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<7) X
  • LAST EDITED:  AUG 07, 2003
  • HELP-PROMPT:  Answer must be 7-25 characters in length.
  • DESCRIPTION:  
    This is the first phone number veterans are to call for more information regarding TPB.
.04 TPB CONTACT PHONE 2 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<7) X
  • LAST EDITED:  AUG 07, 2003
  • HELP-PROMPT:  Answer must be 7-25 characters in length.
  • DESCRIPTION:  
    This is the second phone number veterans are to call for more information regarding TPB.
.05 ADDRESS LINE 1 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  JUL 28, 2003
  • HELP-PROMPT:  Answer must be 1-40 characters in length
  • DESCRIPTION:  
    ADDRESS LINE 1
.06 ADDRESS LINE 2 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  JUL 28, 2003
  • HELP-PROMPT:  Answer must be 1-40 characters in length
  • DESCRIPTION:  
    ADDRESS LINE 2
.07 CITY 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  JUL 28, 2003
  • HELP-PROMPT:  Answer must be 1-30 characters in length
  • DESCRIPTION:  
    CITY
.08 ZIP CODE 0;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<5) X
  • LAST EDITED:  AUG 21, 2003
  • HELP-PROMPT:  Answer must be 5-10 characters in length
  • DESCRIPTION:  
    ZIP CODE
.09 STATE 0;9 POINTER TO STATE FILE (#5) STATE(#5)

  • LAST EDITED:  AUG 21, 2003
  • DESCRIPTION:  
    The state portion of the institution physical address.
1.01 ADDRESS LINE 1 (MAILING) 1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  AUG 07, 2003
  • HELP-PROMPT:  Answer must be 1-40 characters in length
  • DESCRIPTION:  
    TPB Mailing Address line 1
1.02 ADDRESS LINE 2 (MAILING) 1;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  AUG 07, 2003
  • HELP-PROMPT:  Answer must be 1-40 characters in length
  • DESCRIPTION:  
    TPB Mailing Address line 2
1.03 CITY (MAILING) 1;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  JUL 28, 2003
  • HELP-PROMPT:  Answer must be 1-40 characters in length
  • DESCRIPTION:  
    CITY (MAILING)
1.04 STATE (MAILING) 1;4 POINTER TO STATE FILE (#5) STATE(#5)

  • LAST EDITED:  AUG 21, 2003
  • DESCRIPTION:  
    STATE For both Physical Address & TPB Mailing Address
1.05 ZIP CODE (MAILING) 1;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<5) X
  • LAST EDITED:  AUG 07, 2003
  • HELP-PROMPT:  Answer must be 5-10 characters in length
  • DESCRIPTION:  
    TPB ZIP CODE for mailing.
2.01 DIRECTORS SIG LINE 1 2;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  AUG 07, 2003
  • HELP-PROMPT:  Answer must be 1-40 characters in length
  • DESCRIPTION:  
    Director Sig Line 1, it is typically the director's name.
2.02 DIRECTORS SIG LINE 2 2;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  JUL 28, 2003
  • HELP-PROMPT:  Answer must be 1-40 characters in length
  • DESCRIPTION:  
    DIRECTORS SIG LINE 2
2.03 DIRECTORS SIG LINE 3 2;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  JUL 28, 2003
  • HELP-PROMPT:  Answer must be 1-40 characters in length
  • DESCRIPTION:  
    DIRECTORS SIG LINE 3

Global Variables Directly Accessed

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA .01(XREF 1S), .01(XREF 1K)
>> DINUM .01+1*
X .01+1, .01(XREF 1S), .01(XREF 1K), .03+1!, .04+1!, .05+1!, .06+1!, .07+1!, .08+1!, 1.01+1!
, 1.02+1!, 1.03+1!, 1.05+1!, 2.01+1!, 2.02+1!, 2.03+1!
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Global Variables Directly Accessed |  Local Variables  | All