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

Package: Automated Information Collection System

Routine: IBDLXDG2


Information

IBDLXDG2 ;ALB/CFS - Select ICD DIAGNOSIS FROM LEXICON UTILITY LIST ;03/27/2012

Source Information

Source file <IBDLXDG2.m>

Entry Points

Name Comments DBIA/ICR reference
SEL(IBDSRL,X) ; Select from List
ASK(IBDSRL,X) ; Ask for Selection
ONE(X,IBDSRL) ; One Entry Found
MUL(IBDSRL,Y) ; Multiple Entries Found
MULW ; Write Multiple
MULS(X,Y,IBDSRL) ; Select from Multiple Entries
MULSH ; Select from Multiple Entries Help
MULQ ; Quit Multiple
X(X,IBDSRL) ; Set X and Output Array
CL ; Clear
PR(IBDSRL,X) ; Parse Array
TM(X,Y) ; Trim Character Y - Default " "

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ONE+14
Function Call: WRITE
  • Prompt: !
  • Line Location: MUL+5
Function Call: WRITE
  • Prompt: !," ",IBDLX," matches found"
  • Condition for execution: +IBDLX>1
  • Line Location: MUL+5
Function Call: WRITE
  • Prompt: !
  • Line Location: MUL+11
Function Call: WRITE
  • Prompt: !,$J(IBDSRLE,5),". ",$G(IBDLTX(1))
  • Line Location: MULW+5
Function Call: WRITE
  • Prompt: !,$G(IBDLHLP)
  • Line Location: MULSH+1
Info |  Source |  Entry Points |  Interaction Calls