Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: PRSATE1

Package: PAID

Routine: PRSATE1


Information

PRSATE1 ; HISC/REL-Display Tour Change ;5/5/93 10:40

Source Information

Source file <PRSATE1.m>

Entry Points

Name Comments DBIA/ICR reference
LST ; Display Change
L1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?34,"Tour Change",!," Date",?14,"TW",?18,"Scheduled Tour",?45,"TW",?49,"Permanent Tour",?75,"Type"
  • Line Location: LST+2
Function Call: WRITE
  • Prompt: !,PRSDW,?14,$P(PRSTW,U),?18,$S(X<26:PRSTD2,1:$P(PRSTD2," "))
  • Line Location: L1+11
Function Call: WRITE
  • Prompt: ?45,$P(PRSTW,U,5),?49,$S(Y<26:PRSTD4,1:$P(PRSTD4," "))
  • Line Location: L1+12
Function Call: WRITE
  • Prompt: ?75,$S(TYP:"Temp",1:"Perm")
  • Line Location: L1+13
Function Call: WRITE
  • Prompt: !
  • Line Location: L1+14
Function Call: WRITE
  • Prompt: ?18,$P(PRSTD2," ",2,999)
  • Condition for execution: X>25
  • Line Location: L1+14
Function Call: WRITE
  • Prompt: ?49,$P(PRSTD4," ",2,999)
  • Condition for execution: Y>25
  • Line Location: L1+14
Function Call: WRITE
  • Prompt: !?18,$P($G(^PRST(457.1,+TD,0)),U,1),?75,"Temp"
  • Line Location: L1+15
Info |  Source |  Entry Points |  Interaction Calls