PRSA TP POST (63)    BLOCK (.404)

Name Value
NAME PRSA TP POST
DATA DICTIONARY NUMBER 458.02
DISABLE NAVIGATION NO
FIELD
  • FIELD ORDER:   10
    POST ACTION:   I X="ML" D HLP^DDSUTL("Please verify that at least one hour of Military Leave has been requested.")
    POST ACTION ON CHANGE:   S $P(Z,"^",7)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   4,30
    DATA LENGTH:   10
  • FIELD ORDER:   11
    PRE ACTION:   S TT=$$GET^DDSVAL(DIE,.DA,47) S:TT="" TT="*"
    POST ACTION ON CHANGE:   S $P(Z,"^",8)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   4,44
    DATA LENGTH:   25
  • FIELD ORDER:   12
    CAPTION:   3
    POST ACTION ON CHANGE:   S $P(Z,"^",9)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   5,9
    DATA LENGTH:   7
    CAPTION COORDINATE:   5,3
    SUPPRESS COLON AFTER CAPTION?:   YES
  • FIELD ORDER:   13
    POST ACTION ON CHANGE:   S $P(Z,"^",10)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   5,19
    DATA LENGTH:   7
  • FIELD ORDER:   14
    POST ACTION:   I X="ML" D HLP^DDSUTL("Please verify that at least one hour of Military Leave has been requested.")
    POST ACTION ON CHANGE:   S $P(Z,"^",11)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   5,30
    DATA LENGTH:   10
  • FIELD ORDER:   15
    PRE ACTION:   S TT=$$GET^DDSVAL(DIE,.DA,51) S:TT="" TT="*"
    POST ACTION ON CHANGE:   S $P(Z,"^",12)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   5,44
    DATA LENGTH:   25
  • FIELD ORDER:   16
    CAPTION:   4
    POST ACTION ON CHANGE:   S $P(Z,"^",13)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   6,9
    DATA LENGTH:   7
    CAPTION COORDINATE:   6,3
    SUPPRESS COLON AFTER CAPTION?:   YES
  • FIELD ORDER:   17
    POST ACTION ON CHANGE:   S $P(Z,"^",14)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   6,19
    DATA LENGTH:   7
  • FIELD ORDER:   18
    POST ACTION:   I X="ML" D HLP^DDSUTL("Please verify that at least one hour of Military Leave has been requested.")
    POST ACTION ON CHANGE:   S $P(Z,"^",15)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   6,30
    DATA LENGTH:   10
  • FIELD ORDER:   19
    PRE ACTION:   S TT=$$GET^DDSVAL(DIE,.DA,55) S:TT="" TT="*"
    POST ACTION ON CHANGE:   S $P(Z,"^",16)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   6,44
    DATA LENGTH:   25
  • FIELD ORDER:   20
    CAPTION:   5
    POST ACTION ON CHANGE:   S $P(Z,"^",17)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   7,9
    DATA LENGTH:   7
    CAPTION COORDINATE:   7,3
    SUPPRESS COLON AFTER CAPTION?:   YES
  • FIELD ORDER:   21
    POST ACTION ON CHANGE:   S $P(Z,"^",18)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   7,19
    DATA LENGTH:   7
  • FIELD ORDER:   22
    POST ACTION:   I X="ML" D HLP^DDSUTL("Please verify that at least one hour of Military Leave has been requested.")
    POST ACTION ON CHANGE:   S $P(Z,"^",19)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   7,30
    DATA LENGTH:   10
  • FIELD ORDER:   23
    PRE ACTION:   S TT=$$GET^DDSVAL(DIE,.DA,59) S:TT="" TT="*"
    POST ACTION ON CHANGE:   S $P(Z,"^",20)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   7,44
    DATA LENGTH:   25
  • FIELD ORDER:   24
    CAPTION:   6
    POST ACTION ON CHANGE:   S $P(Z,"^",21)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   8,9
    DATA LENGTH:   7
    CAPTION COORDINATE:   8,3
    SUPPRESS COLON AFTER CAPTION?:   YES
  • FIELD ORDER:   25
    POST ACTION ON CHANGE:   S $P(Z,"^",22)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   8,19
    DATA LENGTH:   7
  • FIELD ORDER:   26
    POST ACTION:   I X="ML" D HLP^DDSUTL("Please verify that at least one hour of Military Leave has been requested.")
    POST ACTION ON CHANGE:   S $P(Z,"^",23)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   8,30
    DATA LENGTH:   10
  • FIELD ORDER:   27
    PRE ACTION:   S TT=$$GET^DDSVAL(DIE,.DA,63) S:TT="" TT="*"
    POST ACTION ON CHANGE:   S $P(Z,"^",24)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   8,44
    DATA LENGTH:   25
  • FIELD ORDER:   28
    CAPTION:   7
    POST ACTION ON CHANGE:   S $P(Z,"^",25)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   9,9
    DATA LENGTH:   7
    CAPTION COORDINATE:   9,3
    SUPPRESS COLON AFTER CAPTION?:   YES
  • FIELD ORDER:   29
    POST ACTION ON CHANGE:   S $P(Z,"^",26)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   9,19
    DATA LENGTH:   7
  • FIELD ORDER:   3
    CAPTION:   START STOP TYPE OF TIME REMARKS CODE
    FIELD TYPE:   CAPTION ONLY
    CAPTION COORDINATE:   1,10
  • FIELD ORDER:   30
    POST ACTION:   I X="ML" D HLP^DDSUTL("Please verify that at least one hour of Military Leave has been requested.")
    POST ACTION ON CHANGE:   S $P(Z,"^",27)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   9,30
    DATA LENGTH:   10
  • FIELD ORDER:   31
    PRE ACTION:   S TT=$$GET^DDSVAL(DIE,.DA,67) S:TT="" TT="*"
    POST ACTION ON CHANGE:   S $P(Z,"^",28)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   9,44
    DATA LENGTH:   25
  • FIELD ORDER:   32
    CAPTION:   Remarks
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   11,10
    DATA LENGTH:   70
    CAPTION COORDINATE:   11,1
  • FIELD ORDER:   4
    CAPTION:   1
    POST ACTION ON CHANGE:   S $P(Z,"^",1)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   3,9
    DATA LENGTH:   7
    CAPTION COORDINATE:   3,3
    SUPPRESS COLON AFTER CAPTION?:   YES
  • FIELD ORDER:   5
    POST ACTION ON CHANGE:   S $P(Z,"^",2)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   3,19
    DATA LENGTH:   7
  • FIELD ORDER:   6
    POST ACTION:   I X="ML" D HLP^DDSUTL("Please verify that at least one hour of Military Leave has been requested.")
    POST ACTION ON CHANGE:   S $P(Z,"^",3)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   3,30
    DATA LENGTH:   10
  • FIELD ORDER:   7
    PRE ACTION:   S TT=$$GET^DDSVAL(DIE,.DA,43,.ERR43) S:TT="" TT="*"
    POST ACTION ON CHANGE:   S $P(Z,"^",4)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   3,44
    DATA LENGTH:   25
  • FIELD ORDER:   8
    CAPTION:   2
    POST ACTION ON CHANGE:   S $P(Z,"^",5)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   4,9
    DATA LENGTH:   7
    CAPTION COORDINATE:   4,3
    SUPPRESS COLON AFTER CAPTION?:   YES
  • FIELD ORDER:   9
    POST ACTION ON CHANGE:   S $P(Z,"^",6)=X
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   4,19
    DATA LENGTH:   7