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 |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PXLEX

Package: PCE Patient Care Encounter

Routine: PXLEX


Information

PXLEX ;SLC/PKR - Routines for PCE Lexicon functionality. ;09/29/2020

Source Information

Source file <PXLEX.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 4 BROWSE^DDBR  EN^DDIOL  REFRESH^DDSUTL  ^DIR  
Kernel 2 $$FMADD^XLFDT  $$UP^XLFSTR  
CPT HCPCS Codes 1 $$CPT^ICPTCOD  
DRG Grouper 1 ($$ICDDX,$$ICDOP)^ICDCODE  
Lexicon Utility 1 ($$CSYS,$$HIST)^LEXU  
PCE Patient Care Encounter 1 CODESYSL^PXLEX  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 13

Package Total Caller Graph
PCE Patient Care Encounter 13 CODE MAPPINGS  PXAICPTV  PXAIPOVV  PXAISCV  PXCASC  PXCEPOV1  PXCESC  PXCPTAPI  
PXINPTR  PXKMCODE  PXLEX  PXPXRMI2  PXVSCSM  

Entry Points

Name Comments DBIA/ICR reference
CODESYSL(CODESYSL,MAP) ;Return the list of Lexicon coding systems supported
CSHELP ;Display help, used as executable help for coding systems fields.
CSHTEXT(TEXT) ;Supported coding systems help text.
GETCSYS(MAP) ;Let the user select a coding system.
GETST() ;Let the user input a Lexicon search term.
ISCACT(CODESYS,CODE,DOI) ;Return 1 if the code was active on the date
VCODE(CODESYS,CODE) ;Check that a code in the specified coding system is valid.
VCODESYS(CODESYS,MF) ;Make sure the coding system is supported.

External References

Name Field # of Occurrence
BROWSE^DDBR CSHELP+5
EN^DDIOL VCODESYS+7, VCODESYS+12
REFRESH^DDSUTL CSHELP+6
^DIR GETCSYS+16, GETST+5
$$ICDDX^ICDCODE VCODE+16
$$ICDOP^ICDCODE VCODE+17
$$CPT^ICPTCOD VCODE+8
$$CSYS^LEXU CSHTEXT+8, GETCSYS+14, VCODESYS+4
$$HIST^LEXU ISCACT+4, VCODE+4
CODESYSL^PXLEX GETCSYS+4, VCODESYS+9
$$FMADD^XLFDT ISCACT+6
$$UP^XLFSTR GETCSYS+18, VCODESYS+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,CODESYS," is the only available coding system."
  • Line Location: GETCSYS+8
Routine Call
  • DIR
  • Line Location:
    • GETCSYS+16
    • GETST+5

Label References

Name Line Occurrences
CODESYSL CSHTEXT+4
CSHTEXT CSHELP+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CODE ISCACT~, ISCACT+4, VCODE~, VCODE+4, VCODE+8, VCODE+11, VCODE+16, VCODE+17, VCODE+20
CODESYS CSHTEXT+1~, CSHTEXT+5*, CSHTEXT+6*, CSHTEXT+8, CSHTEXT+9, GETCSYS+1~, GETCSYS+5, GETCSYS+6*, GETCSYS+7, GETCSYS+8
, GETCSYS+11*, GETCSYS+12*, GETCSYS+14, GETCSYS+15, GETCSYS+18*, GETCSYS+19, ISCACT~, ISCACT+4, VCODE~, VCODE+4
, VCODE+6, VCODE+12, VCODE+13, VCODE+16, VCODE+17, VCODESYS~, VCODESYS+2*, VCODESYS+4, VCODESYS+7, VCODESYS+10
, VCODESYS+12
CODESYSL CODESYSL~, CSHTEXT+1~, CSHTEXT+4, GETCSYS+1~, GETCSYS+4, VCODESYS+1~, VCODESYS+9
CODESYSL( CSHTEXT+6, GETCSYS+12, VCODESYS+10
CODESYSL("10D" CODESYSL+6*
CODESYSL("10P" CODESYSL+6*
CODESYSL("CPC" CODESYSL+7*
CODESYSL("CPT" CODESYSL+7*
CODESYSL("ICD" CODESYSL+8*
CODESYSL("ICP" CODESYSL+8*
CODESYSL("SCT" CODESYSL+2*
CODESYSL(0 CODESYSL+3*, CODESYSL+9*, GETCSYS+5, GETCSYS+6
CODESYSN GETCSYS+1~, GETCSYS+14*, GETCSYS+15
DATA VCODE+1~, VCODE+4
DATE ISCACT+2~, ISCACT+7*, ISCACT+8, ISCACT+9
>> DDS CSHELP+6
DIR GETCSYS+1~, GETST+1~
DIR("A" GETCSYS+9*, GETCSYS+10*, GETST+3*, GETST+4*
DIR(0 GETCSYS+9*, GETCSYS+15*, GETST+2*
DIR0 CSHELP+1~
DIRUT GETCSYS+17, GETST+1~, GETST+6
DOI ISCACT~, ISCACT+6*, ISCACT+7
DT VCODE+16, VCODE+17
>> DX CSHELP+6*
>> DY CSHELP+6*
HDATA ISCACT+2~, ISCACT+4
HDATA( ISCACT+7, ISCACT+9
IEN VCODE+1~, VCODE+9*, VCODE+10, VCODE+11, VCODE+18*, VCODE+19, VCODE+20
IOSL CSHELP+6
>> IOXY CSHELP+6
MAP CODESYSL~, CODESYSL+3, GETCSYS~, GETCSYS+4
MF VCODESYS~, VCODESYS+6, VCODESYS+11
NEVENTS ISCACT+2~, ISCACT+4*, ISCACT+5
NL CSHTEXT+1~, CSHTEXT+5*, CSHTEXT+9*
>> PXCEAFTR(0 GETCSYS+7*, GETCSYS+18*
RESULT VCODE+1~, VCODE+4*, VCODE+5, VCODE+8*, VCODE+9, VCODE+12, VCODE+13, VCODE+16*, VCODE+17*, VCODE+18
, VCODESYS+1~, VCODESYS+4*, VCODESYS+5
SUB ISCACT+2~, ISCACT+9*, ISCACT+11
TEMP CSHTEXT+1~, CSHTEXT+8*, CSHTEXT+9
TEXT CSHELP+1~, CSHELP+4, CSHTEXT~
TEXT( CSHTEXT+9*
TEXT(1 CSHTEXT+2*
TEXT(2 CSHTEXT+3*
U CSHTEXT+9, GETCSYS+7, GETCSYS+14, GETCSYS+18, ISCACT+5, VCODE+5, VCODE+9, VCODE+12, VCODE+13, VCODE+18
VALID VCODE+1~, VCODE+2*, VCODE+10*, VCODE+11*, VCODE+12*, VCODE+13*, VCODE+14, VCODE+19*, VCODE+20*, VCODE+21
X GETCSYS+17*, GETCSYS+18, GETST+1~, GETST+7
Y GETCSYS+17*, GETST+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All