Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All
Print Page as PDF
Routine: LEXQM

Package: Lexicon Utility

Routine: LEXQM


Information

LEXQM ;ISL/KER - Query - Miscellaneous ;05/23/2017

Source Information

Source file <LEXQM.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 4 HOME^%ZIS  (ENDR,KILL)^%ZISS  ($$DT,$$FMADD,$$FMTE)^XLFDT  $$UP^XLFSTR  
VA FileMan 2 $$GET1^DIQ  ^DIR  
Lexicon Utility 1 ($$RET,SAV)^LEXQD  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 21

Package Total Caller Graph
Lexicon Utility 21 LEXQC  LEXQC2  LEXQC6  LEXQCM  LEXQCM2  LEXQCP  LEXQCP2  LEXQHL1  
LEXQHL2  LEXQHL3  LEXQHL4  LEXQID  LEXQID2  LEXQID3  LEXQID4  LEXQIP  
LEXQIP2  LEXQIP3  LEXQSC  LEXQWA  LEXQWS  

Entry Points

Name Comments DBIA/ICR reference
AD(X) ; Assumed Date
SD(X) ; Short Date
CLR ; Clear
ATTR ; Screen Attributes
CSD(X) ; Code Set Date
ES(X) ; External Status
CSDX(X) ; Code Set Date Pre-Processing
CS(X) ; Trim Comma/Space
KATTR ; Kill Screen Attributes
CSDH ; Code Set Date Help
AND(X) ; Substitute 'and'
TM(X,Y) ; Trim Character Y - Default " "
EV(X) ; Check environment
ADH ; Assumed Date Help
ED(X) ; External Date

External References

Name Field # of Occurrence
HOME^%ZIS EV+1
ENDR^%ZISS ATTR+1
KILL^%ZISS KATTR+1
$$GET1^DIQ EV+2
^DIR AD+7, CSD+6
$$RET^LEXQD AD+3, CSD+3
SAV^LEXQD AD+9, CSD+8
$$DT^XLFDT AD+2, CSD+2, CSDX+1, EV+1
$$FMADD^XLFDT AD+2, CSD+2
$$FMTE^XLFDT AD+2, AD+8, ADH+5, CSD+2, CSD+7, CSDH+6, SD+1, ED+2
$$UP^XLFSTR AD+2, AD+8, ADH+5, CSD+2, CSD+7, CSDH+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: AD+7
Function Call: WRITE
  • Prompt: !,?5,"This is the date of a fictitious healthcare transaction. It is the"
  • Line Location: ADH+1
Function Call: WRITE
  • Prompt: !,?5,"date that service was provided to a patient and the date that will "
  • Line Location: ADH+2
Function Call: WRITE
  • Prompt: !,?5,"be used during the lookup of a code (ICD/CPT/CPT Modifier)."
  • Line Location: ADH+3
Function Call: WRITE
  • Prompt: !!,?5,"Enter a date from ",$$UP^XLFSTR($$FMTE^XLFDT(LEXPAS))," to ",$$UP^XLFSTR($$FMTE^XLFDT(LEXFUT))," or"
  • Line Location: ADH+5
Function Call: WRITE
  • Prompt: !,?5,"T (for TODAY), T+1 (for TOMORROW), T+2, T+7, etc.",!,?5,"T-1 (for YESTERDAY), T-3W (for 3 WEEKS AGO), etc."
  • Line Location: ADH+6
Function Call: WRITE
  • Prompt: !
  • Line Location: CSD+6
Function Call: WRITE
  • Prompt: !,?3,"This is a date to used to search for Code Set changes in the ICD and CPT"
  • Line Location: CSDH+1
Function Call: WRITE
  • Prompt: !,?3,"files. A future date may be used to search for changes in the Code Sets"
  • Line Location: CSDH+2
Function Call: WRITE
  • Prompt: !,?3,"with future effective dates. (HINT: Most Code Set effective dates are"
  • Line Location: CSDH+3
Function Call: WRITE
  • Prompt: !,?3,"quarterly, the first of January, April, July or October)"
  • Line Location: CSDH+4
Function Call: WRITE
  • Prompt: !!,?5,"Enter a date from ",$$UP^XLFSTR($$FMTE^XLFDT(LEXPAS))," to ",$$UP^XLFSTR($$FMTE^XLFDT(LEXFUT))," or"
  • Line Location: CSDH+6
Function Call: WRITE
  • Prompt: !,?5,"T (for TODAY), T+1 (for TOMORROW), T+2, T+7, etc."
  • Line Location: CSDH+7
Function Call: WRITE
  • Prompt: !,?5,"T-1 (for YESTERDAY), T-3W (for 3 WEEKS AGO), etc."
  • Line Location: CSDH+8
Function Call: WRITE
  • Prompt: !,?5,"Q1 (for first quarter), Q109 (for first quarter of FY09), etc."
  • Line Location: CSDH+9
Function Call: WRITE
  • Prompt: !!,?5,"DUZ not defined"
  • Line Location: EV+1
Function Call: WRITE
  • Prompt: !!,?5,"DUZ not valid"
  • Line Location: EV+2
Routine Call
  • %ZIS
  • Line Location:
    • EV+1
Routine Call
  • DIR
  • Line Location:
    • AD+7
    • CSD+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ

Label References

Name Line Occurrences
$$TM CS+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BOLD ATTR+1*, KATTR+1!
DIR AD+1~, CSD+1~
DIR("?" AD+5*, CSD+5*
DIR("??" AD+5*, CSD+5*
DIR("A" AD+4*, CSD+4*
DIR("B" AD+4*, CSD+4*
DIR("PRE" AD+6*, CSD+5*
DIR(0 AD+5*, CSD+5*
DIRB AD+1~, AD+3*, AD+4, CSD+1~, CSD+3*, CSD+4
DIROUT AD+1~, CSD+1~
DIRUT AD+1~, CSD+1~
DT EV+1*
DTOUT AD+1~, AD+7, CSD+1~, CSD+6
DUOUT AD+1~, CSD+1~
DUZ AD+3, AD+9, CSD+3, CSD+8, EV+1, EV+2
IOINHI ATTR+1, KATTR+1!
IOINORM ATTR+1, KATTR+1!
LEX EV+1~, EV+2*
LEXAD AD+3, CSD+3, CLR+1~
LEXEXIT AD+1, AD+7*, CSD+1, CSD+6*, CLR+1~
LEXF CSDX+1~, CSDX+4~*, CSDX+6
LEXFUT AD+1~, AD+2*, AD+5, ADH+4, ADH+5, CSD+1~, CSD+2*, CSD+5, CSDH+5, CSDH+6
LEXN CSDX+1~*
LEXNOW AD+1~, AD+2*, AD+3, CSD+1~, CSD+2*, CSD+3
LEXPAS AD+1~, AD+2*, AD+5, ADH+5, CSD+1~, CSD+2*, CSD+5, CSDH+6
LEXQ CSDX+1~, CSDX+4~*, CSDX+5*, CSDX+6
LEXT CSDX+1~*, CSDX+6
LEXX CSDX+1~, CSDX+3*, CSDX+6*, CSDX+7
LEXY CSDX+1~*, CSDX+2
NORM ATTR+1*, KATTR+1!
U EV+1*
X AD~, AD+7*, AD+8*, AD+9, AD+10, CSD~, CSD+6*, CSD+7*, CSD+8, CSD+9
, CSDX~, CSDX+1, CSDX+2, CSDX+3, CSDX+4, CSDX+7*, CSDX+8, TM~, TM+1*, TM+2*
, TM+3, ATTR+1~*, AND~, AND+1*, AND+2*, AND+3, CS~, CS+1*, CS+2, SD~
, SD+1, ED~, ED+1, ED+2, ES~, ES+1, EV~
Y AD+1~, AD+8, CSD+1~, CSD+7, TM~, TM+1*, TM+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All