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

Package: VA FileMan

Routine: DITC2


Information

DITC2 ;SFISC/XAK-COMPARE FILE ENTRIES PRINT ;10/15/91 9:01 AM

Source Information

Source file <DITC2.m>

Entry Points

Name Comments DBIA/ICR reference
D1 ;
D11
D2 ;
D20
D21
D3 ;
D31
D5 ;
D7
MUL ;
EMUL ;
PG ;
PG1
ERD

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,DREDO,".",?4
  • Line Location: D3+1
Function Call: WRITE
  • Prompt: !
  • Line Location: D3+2
Function Call: WRITE
  • Prompt: !
  • Condition for execution: (I=1)
  • Line Location: D3+2
Function Call: WRITE
  • Prompt: DNUM,"."
  • Line Location: D3+2
Function Call: WRITE
  • Prompt: "***"
  • Condition for execution: 'DEQ&'$D(DIMERGE)&(I=1)
  • Line Location: D3+3
Function Call: WRITE
  • Prompt: ?4
  • Line Location: D3+3
Function Call: WRITE
  • Prompt: ?(DV*(X1-1))
  • Line Location: D31+0
Function Call: WRITE
  • Prompt: $P(D(I),U,X1)
  • Line Location: D31+0
Function Call: WRITE
  • Prompt: $E(DDSPC,1,3)
  • Line Location: D31+1
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: PG+1
Function Call: WRITE
  • Prompt:
  • Condition for execution: '$D(IOXY) !! Q:IOST'?1"C".E
  • Line Location: PG+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PG+2
Function Call: WRITE
  • Prompt: "Default is enclosed in brackets, e.g., [",$E($P(DHD(1),U,DDEF),1,(DV-6)),"]",!
  • Line Location: PG+3
Function Call: WRITE
  • Prompt: %,$E(DDSPC,1,IOM-$L(%)-2)
  • Line Location: PG+3
Function Call: WRITE
  • Prompt: $C(8)
  • Line Location: PG+5
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PG+6
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: PG+9
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: DIFF
  • Line Location: PG1+0
Function Call: WRITE
  • Prompt: DHD(0),?(IOM-29),DHD(9)," PAGE ",DC
  • Line Location: PG1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: PG1+1
Function Call: WRITE
  • Prompt: $E(DFL(X1),1,DV-1)
  • Line Location: PG1+1
Function Call: WRITE
  • Prompt: $E(DFL(X1),1,DV-1)
  • Line Location: PG1+1
Function Call: WRITE
  • Prompt: "["
  • Condition for execution: (I=1)
  • Line Location: PG1+1
Function Call: WRITE
  • Prompt: $E($P(DHD(X1),U,1),1,DV-1)
  • Line Location: PG1+1
Function Call: WRITE
  • Prompt: "["
  • Condition for execution: (I=1)
  • Line Location: PG1+1
Function Call: WRITE
  • Prompt: $E($P(DHD(X1),U,1),1,DV-1)
  • Line Location: PG1+1
Function Call: WRITE
  • Prompt: "["
  • Condition for execution: (I=2)
  • Line Location: PG1+1
Function Call: WRITE
  • Prompt: $E($P(DHD(X1),U,2),1,DV-1)
  • Line Location: PG1+1
Function Call: WRITE
  • Prompt: "["
  • Condition for execution: (I=2)
  • Line Location: PG1+1
Function Call: WRITE
  • Prompt: !,DDSH
  • Line Location: PG1+2
Function Call: WRITE
  • Prompt: !,?2,"NOTE: Multiples will be merged into the target record"
  • Line Location: PG1+2
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: ERD+0
Function Call: WRITE
  • Prompt: "You must accept the default because this record is DINUMed!!",$E(DDSPC,1,IOM-62)
  • Line Location: ERD+1
Function Call: READ
  • Variable: X
  • Timeout: 10
  • Line Location: ERD+2
Info |  Source |  Entry Points |  Interaction Calls