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

Package: VA FileMan

Routine: DIKKUTL2


Information

DIKKUTL2 ;SFISC/MKO-KEY DEFINITION, SOME UTILITIES ;1:25 PM 17 Jul 1998

Source Information

Source file <DIKKUTL2.m>

Entry Points

Name Comments DBIA/ICR reference
GET(FIL,CNT) ;Get information about keys on file FIL
LIST(CNT,HDR) ;
CHOOSE(DIKKCNT,DIKKPR) ;Choose a key
GETFLD(KEY,UI,KEYFLD,UIFLD) ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"There are no Keys defined on "_$$FSTR^DIKCUTL2($P(CNT,U,2))_"."
  • Line Location: LIST+2
Function Call: WRITE
  • Prompt: !,HDR
  • Line Location: LIST+8
Function Call: WRITE
  • Prompt: !!?2,NAM,?5,$$EXTERNAL^DILFD(.31,1,"",PRIO,"MSG")_" KEY"
  • Line Location: LIST+19
Function Call: WRITE
  • Prompt: !?9,TAG_SN_") "_$P($G(^DD(FIL,FLD,0)),U)_" (#"_FLD_$S(FIL=FILE01:")",1:", from File #"_FIL)
  • Line Location: LIST+26
Function Call: WRITE
  • Prompt: !
  • Line Location: CHOOSE+7
Info |  Source |  Entry Points |  Interaction Calls