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: DID1

Package: VA FileMan

Routine: DID1


Information

DID1 ;SFISC/XAK,JLT,GFT - STD DD LIST ;25OCT2016

Source Information

Source file <DID1.m>

Entry Points

Name Comments DBIA/ICR reference
L
A
B
LABEL
WP
TYPE
P
MP
S
J
OT
RD
SUB
N
TR
IX
ND
IX1
CHKWP(F,Z) ;F=file, Z=field - return subdd of WP or 0 ;p19
TP ;TRIGGER POINTER. SHOULD BE A DO-DOT UNDER IX1
WPW(X) ;word processing write
W
HD

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: A+0
Function Call: WRITE
  • Prompt: !!,F(Z),",",DJ(Z)
  • Line Location: B+3
Function Call: WRITE
  • Prompt: ?(Z+Z+12),$P(N,U),?DDL2+4," "_$P(N,U,4)
  • Line Location: LABEL+0
Function Call: WRITE
  • Prompt: I
  • Line Location: LABEL+1
Function Call: WRITE
  • Prompt: S
  • Line Location: LABEL+1
Function Call: WRITE
  • Prompt: !?(Z+Z+12-$L(I)),I,W
  • Line Location: LABEL+1
Function Call: WRITE
  • Prompt: I
  • Line Location: WP+4
Function Call: WRITE
  • Prompt: S:W="p"
  • Line Location: WP+4
Function Call: WRITE
  • Prompt: S:W="m"
  • Line Location: WP+4
Function Call: WRITE
  • Prompt: W
  • Line Location: WP+4
Function Call: WRITE
  • Prompt: ?40," "_W
  • Line Location: WP+4
Function Call: WRITE
  • Prompt: I
  • Line Location: TYPE+0
Function Call: WRITE
  • Prompt: S
  • Line Location: TYPE+0
Function Call: WRITE
  • Prompt: D
  • Line Location: TYPE+0
Function Call: WRITE
  • Prompt: D
  • Line Location: TYPE+0
Function Call: WRITE
  • Prompt: !?DDL1,"PROPERTY: ",?DDL2,$P(^(0),U)
  • Line Location: TYPE+1
Function Call: WRITE
  • Prompt: !?DDL1,$P(^(0),U),": ",Y
  • Line Location: TYPE+3
Function Call: WRITE
  • Prompt: S
  • Line Location: TYPE+4
Function Call: WRITE
  • Prompt: D
  • Line Location: TYPE+4
Function Call: WRITE
  • Prompt: G
  • Line Location: TYPE+4
Function Call: WRITE
  • Prompt: !
  • Line Location: S+2
Function Call: WRITE
  • Prompt: D
  • Line Location: S+2
Function Call: WRITE
  • Prompt: Q:M=U
  • Line Location: S+2
Function Call: WRITE
  • Prompt: " (",$P(^(0),";",%1),")"
  • Line Location: S+3
Function Call: WRITE
  • Prompt: W
  • Line Location: S+4
Function Call: WRITE
  • Prompt: !?DDL1,"MUMPS CODE: "
  • Line Location: S+4
Function Call: WRITE
  • Prompt: G
  • Line Location: S+4
Function Call: WRITE
  • Prompt: !?DDL1,"INPUT TRANSFORM:"
  • Line Location: S+5
Function Call: WRITE
  • Prompt: D
  • Line Location: S+5
Function Call: WRITE
  • Prompt: G
  • Line Location: S+5
Function Call: WRITE
  • Prompt: I
  • Line Location: J+0
Function Call: WRITE
  • Prompt: W
  • Line Location: J+0
Function Call: WRITE
  • Prompt: !?DDL1,"MAXIMUM LENGTH: "
  • Line Location: J+0
Function Call: WRITE
  • Prompt: !?DDL1,"MAXIMUM LENGTH: "
  • Line Location: J+0
Function Call: WRITE
  • Prompt: !?DDL1,"OUTPUT TRANSFORM:"
  • Line Location: OT+0
Function Call: WRITE
  • Prompt: G
  • Line Location: OT+0
Function Call: WRITE
  • Prompt: W
  • Line Location: RD+1
Function Call: WRITE
  • Prompt: !
  • Line Location: RD+1
Function Call: WRITE
  • Prompt: Q
  • Line Location: RD+1
Function Call: WRITE
  • Prompt: D
  • Line Location: RD+3
Function Call: WRITE
  • Prompt: G
  • Line Location: RD+3
Function Call: WRITE
  • Prompt: !,?DDL1,"NOTES:",?DDL2,"XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER"
  • Line Location: N+0
Function Call: WRITE
  • Prompt: !
  • Line Location: N+0
Function Call: WRITE
  • Prompt: I
  • Line Location: N+1
Function Call: WRITE
  • Prompt: !?DDL1,"NOTES:"
  • Line Location: N+1
Function Call: WRITE
  • Prompt: S
  • Line Location: TR+1
Function Call: WRITE
  • Prompt: !
  • Line Location: TR+1
Function Call: WRITE
  • Prompt: K
  • Line Location: TR+1
Function Call: WRITE
  • Prompt: !?DDL1,"CROSS-REFERENCE:"
  • Line Location: IX+0
Function Call: WRITE
  • Prompt: S:$L(W)<248
  • Line Location: IX1+0
Function Call: WRITE
  • Prompt: K:X=3
  • Line Location: IX1+0
Function Call: WRITE
  • Prompt: W
  • Line Location: IX1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: IX1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: IX1+9
Function Call: WRITE
  • Prompt: !?18
  • Condition for execution: $L(X)+$X+5>IOM
  • Line Location: WPW+1
Function Call: WRITE
  • Prompt: " ",X
  • Line Location: WPW+1
Function Call: WRITE
  • Prompt: F
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $D(DDF)
  • Line Location: W+0
Function Call: WRITE
  • Prompt: ?DDL2
  • Line Location: W+0
Function Call: WRITE
  • Prompt: ?DDL2
  • Line Location: W+0
Info |  Source |  Entry Points |  Interaction Calls