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 |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^VA(407.5

Package: Scheduling

Global: ^VA(407.5


Information

FileMan FileNo FileMan Filename Package
407.5 LETTER Scheduling

Description

Directly Accessed By Routines, Total: 8

Package Total Routines
Scheduling 8 SDLT    ^VA(407.5    SDEC40    SDES2VAL44    SDESAPPTLETTERS    SDESCLINICSET2    SDESGETLETTERS    TEAM POSITIONS

Accessed By FileMan Db Calls, Total: 4

Package Total Routines
Scheduling 4 SDEC01B    SDES2VAL44    SDESCLINICSET2    SDESGETLETTERS    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Scheduling 1 HOSPITAL LOCATION(#44)[2508, 2509, 2510, 2511]    

Fields, Total: 6

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:  
    The name of a letter that has been initially created by the developer in a 'skeleton form' and the user edits the body of the letter. These letters are utilized mostly in the Scheduling Module of the MAS DHCP software.
  • DELETE TEST:  1,0)= I $D(^SC("ALTN",DA))!$D(^SC("ALTP",DA))!$D(^SC("ALTC",DA))!$D(^SC("ALTA",DA))
  • CROSS-REFERENCE:  407.5^B
    1)= S ^VA(407.5,"B",$E(X,1,30),DA)=""
    2)= K ^VA(407.5,"B",$E(X,1,30),DA)
1 TYPE 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X S DIC="^VA(407.6,",DIC(0)="QMZ",DIC("S")="I $P(^(0),""^"",3)']""""" D ^DIC K:+Y'>0&(X'="?") X I $D(^VA(407.6,+Y,0)) S Y=Y(0,0) W:X'=$P(Y(0),"^",2) " ",$P(Y(0),"^",2) S X=Y(0,0) K DIC S DIC=407.5
  • LAST EDITED:  DEC 21, 1988
  • HELP-PROMPT:  TYPE must be in LETTER TYPE file.
  • DESCRIPTION:  The letter created is assigned a type for user specific needs. For example, a letter created to alert a veteran that he has an appointment and a new travel legislation has been passed, the user may call this letter
    'Beneficiary Travel'.
  • EXECUTABLE HELP:  K DIC S DIC="^VA(407.6,",DIC(0)="QMZ",X="?",DIC("S")="I $P(^(0),""^"",3)']""""",D="B" D ^DIC
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  407.5^C
    1)= S ^VA(407.5,"C",$E(X,1,30),DA)=""
    2)= K ^VA(407.5,"C",$E(X,1,30),DA)
2 INITIAL SECTION OF LETTER 1;0 WORD-PROCESSING #407.52

  • DESCRIPTION:  The initial section of the letter is the portion that has been pre-\ programmed by the developer to include items such as veteran's name, address, social security number and is in the format of a VA style letter. The
    first paragraph automatically lists the clinic and date/time he/she may have or had an appointment in one of the facility's outpatient areas.
  • CROSS-REFERENCE:  407.52^B
    1)= S ^VA(407.5,DA(1),1,"B",$E(X,1,30),DA)=""
    2)= K ^VA(407.5,DA(1),1,"B",$E(X,1,30),DA)
3 FINAL SECTION OF LETTER 2;0 WORD-PROCESSING #407.53

  • DESCRIPTION:  
    The final section of the letter is a word-processing field in which, through a scheduling menu option, the user can enter the body of the letter with site=specific information or announcements for the veteran.
  • CROSS-REFERENCE:  407.53^B
    1)= S ^VA(407.5,DA(1),2,"B",$E(X,1,30),DA)=""
    2)= K ^VA(407.5,DA(1),2,"B",$E(X,1,30),DA)
4 PRINT DEFAULT PROVIDER? 3;1 SET
  • 'Y' FOR YES;

  • LAST EDITED:  SEP 26, 2014
  • HELP-PROMPT:  Enter 'Y' to print the Default Provider on the letter.
  • DESCRIPTION:  
    This field controls the printing of the clinic default provider on a Scheduling letter regardless of its type.
5 PRINT CLINIC LOCATION? 3;2 SET
  • 'Y' FOR YES;

  • LAST EDITED:  SEP 26, 2014
  • HELP-PROMPT:  Enter 'Y' to print the physical location of the clinic on a letter.
  • DESCRIPTION:  
    This field controls the printing of the clinic physical location for a Scheduling letter regardless of its type.

External References

Name Field # of Occurrence
^DIC 1+1, 1(HELP )

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SC("ALTA" .01DEL1+1
^SC("ALTC" .01DEL1+1
^SC("ALTN" .01DEL1+1
^SC("ALTP" .01DEL1+1
^VA(407.5 - [#407.5] IDWRITE+1, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K)
^VA(407.6 - [#407.6] IDWRITE+1, 1+1

Naked Globals

Name Field # of Occurrence
^(0 IDWRITE+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> D 1(HELP )
>> DA .01DEL1+1, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K)
DIC 1+1*!, 1(HELP )
DIC("S" 1+1*, 1(HELP )
DIC(0 1+1*, 1(HELP )
X .01+1!, .01(XREF 1S), .01(XREF 1K), 1+1!*, 1(HELP ), 1(XREF 1S), 1(XREF 1K)
>> Y IDWRITE+1, 1+1*
>> Y(0 1+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All