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

Package: VA FileMan

Routine: DIWE3


Information

DIWE3 ;SFISC/GFT-WP - MOVE, DELETE, REPEAT, TRANSFER ;02:10 PM 8 Dec 1999

Source Information

Source file <DIWE3.m>

Entry Points

Name Comments DBIA/ICR reference
M ;MOVE
1
OPT
R ;REPEAT
D ;DELETE; **CCO/NI MOST LINES FROM HERE TO 'YN' HAVE BEEN CHANGED
F
MOVE
YN
DN
DEL
H
Q
O
Z ;TRANSFER
Z0
EGP
RT(DIROOT,DIARR) ;
RT1 ;
PRSREL
ACC
DIC
GET1
Q0
DIAC
XM(Z)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: OPT+0
Function Call: READ
  • Variable: DW2
  • Timeout: DTIME
  • Line Location: D+1
Function Call: WRITE
  • Prompt: $C(7),"??"
  • Line Location: D+2
Function Call: WRITE
  • Prompt: " ("_DW2_")"
  • Line Location: D+3
Function Call: WRITE
  • Prompt: !,$$EZBLD^DIALOG(8116,X)
  • Line Location: D+4
Function Call: WRITE
  • Prompt: " ",$$EZBLD^DIALOG(8114)
  • Line Location: D+5
Function Call: WRITE
  • Prompt: !,$C(7),$$EZBLD^DIALOG(8115)
  • Line Location: D+6
Function Call: READ
  • Variable: DWL
  • Timeout: DTIME
  • Line Location: F+0
Function Call: WRITE
  • Prompt: !,$$EZBLD^DIALOG(8118)
  • Line Location: F+0
Function Call: WRITE
  • Prompt: $C(7)," ?? ",$$EZBLD^DIALOG(8054)
  • Line Location: F+2
Function Call: READ
  • Variable: DW2
  • Timeout: DTIME
  • Line Location: MOVE+0
Function Call: WRITE
  • Prompt: " ",$$EZBLD^DIALOG(8117)
  • Line Location: MOVE+0
Function Call: WRITE
  • Prompt: " (",DW1,")"
  • Line Location: MOVE+2
Function Call: READ
  • Variable: DW3
  • Timeout: DTIME
  • Line Location: MOVE+3
Function Call: WRITE
  • Prompt: " ",$$EZBLD^DIALOG(8119)
  • Line Location: MOVE+3
Function Call: WRITE
  • Prompt: !,$$EZBLD^DIALOG(7050)
  • Line Location: YN+0
Function Call: WRITE
  • Prompt: !,$J(%,3),">",X
  • Line Location: H+2
Function Call: WRITE
  • Prompt: " ",$$EZBLD^DIALOG(8121)
  • Line Location: Q+0
Function Call: READ
  • Variable: VAL
  • Timeout: DTIME
  • Line Location: Z0+1
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X
  • Line Location: Q0+0
Function Call: WRITE
  • Prompt: " <"_MSG_">",$C(7)
  • Line Location: Q0+0
Function Call: READ
  • Variable: A9
  • Timeout: DTIME
  • Line Location: XM+2
Function Call: WRITE
  • Prompt: !,"Transfer which Response: Original Message// "
  • Line Location: XM+2
Info |  Source |  Entry Points |  Interaction Calls