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

Package: VA FileMan

Routine: DIT


Information

DIT ;SFISC/GFT-GET XFR ANSWERS ;14FEB2005

Source Information

Source file <DIT.m>

Entry Points

Name Comments DBIA/ICR reference
0
OPT
FROM
DTR
TWO
D
Q ;
KL
MAP ;BUILD MAP OF FIELDS FROM 'FROM' TO 'TO' FILE
MAP2 ;ENTRY POINT FROM ^DIT3
T
PTS ;Find re-pointable fields (not containing "I"!)
F
TRNMRG(DIFLG,DIFFNO,DITFNO,DIFIEN,DITIEN) ; SILENT TRANSFER/MERGE OF SINGLE RECORDS IN FILE OR SUBFILE

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: OPT+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: TWO+1
Function Call: WRITE
  • Prompt: "DO YOU WANT TO TRANSFER THE '",$P(Y,U,2),"'",!,"DATA DICTIONARY INTO YOUR NEW FILE"
  • Line Location: TWO+1
Function Call: WRITE
  • Prompt: $C(7),"FILES DON'T MATCH!"
  • Line Location: TWO+3
Function Call: WRITE
  • Prompt: !,"WANT TO MERGE TRANSFERRED ENTRIES WITH ONES ALREADY THERE"
  • Line Location: TWO+5
Function Call: WRITE
  • Prompt: ", "
  • Condition for execution: $X
  • Line Location: T+1
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $L(DIC)+$X>66
  • Line Location: T+1
Function Call: WRITE
  • Prompt: "'"_DIC_"' FIELDS"
  • Line Location: T+1
Function Call: WRITE
  • Prompt: !?7,"(TYPE '^' TO FORGET THE WHOLE THING!)",!
  • Line Location: F+0
Info |  Source |  Entry Points |  Interaction Calls