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

Package: VA FileMan

Routine: DICRW


Information

DICRW ;SFISC/XAK-SELECT A FILE ;17SEP2010

Source Information

Source file <DICRW.m>

Entry Points

Name Comments DBIA/ICR reference
R
R2
AU
A
SUB
R1
DT ;
  • ICR #10005
    • Status: Active
    • Usage: Supported
    DTNOLF ; DT entry point without doing a line feed.
  • ICR #4778
    • Status: Active
    • Usage: Controlled Subscription
    0
    1
    W ;
    W1
    DIC
    GOT
    WW
    D
    DIAR ;
    T ; COMP/MERGE
    WW1 ;;W:$X>53 !?9 I Y-1.1,Y-.6,$D(^DIC(+Y,0,"GL")),^("GL")'["[",$D(@(^("GL")_"0)")) S %=+$P(^(0),U,4) W ?40,$$EZBLD^DIALOG(%=1+8300,%) ;**CCO/NI NUMBER OF ENTRIES

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !," No DD AUDIT entries!"
    • Line Location: A+3
    Function Call: WRITE
    • Prompt: !
    • Line Location: DIC+0
    Function Call: READ
    • Variable: X
    • Timeout: DTIME
    • Line Location: DIC+3
    Function Call: WRITE
    • Prompt: D
    • Line Location: DIC+3
    Function Call: WRITE
    • Prompt: $C(7)
    • Line Location: DIC+3
    Function Call: WRITE
    • Prompt: " There are no selectable files."
    • Line Location: DIC+4
    Function Call: WRITE
    • Prompt: ?40,$$EZBLD^DIALOG(%=1+8300,%)
    • Line Location: WW1+0
    Info |  Source |  Entry Points |  Interaction Calls