Routine: LEXTRAN3

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Local Variables
Marked Items

Package	Total	Call Graph
Lexicon Utility	1	$$GETSYN^LEXTRAN1
Problem List	1	SCTMAP^GMPLX1
VA Fileman	1	(FILE,UPDATE)^DIE

Package

Total

Call Graph

Lexicon Utility

$$GETSYN^LEXTRAN1

Problem List

SCTMAP^GMPLX1

VA Fileman

(FILE,UPDATE)^DIE

Entry Points

Name	Comments	DBIA/ICR reference
CHANGE()	; check if the after data is different from the before data ; i.e. detect if any change
UPDPLP(SCT,ICD,ORD)	; update patient problem list file ; SCTMAP^GMPLX1 is a CPRS problem list function which scans the patient ; data file and updates the SNOMED CT code field on the basis of the ; mapping change ; ; check for existence of function; if not found do not attempt to call
CTRL	; control
DELPLS	; remove a concept from subset
ADDPLS(PRF,SUB)	; Add the concept to the problem list subset
INPSUB(PRF,SUB)	; check if concept PRF is member of subset SUB
ACTVMAP(SRC,MAP)	; return whether active map exists for given code and ; mapping identifier
INIT	; initiate variables ; ; record data
DELIEN()	; determine IEN of record to be erased from 757.21
SUBIEN()	; get next IEN for addition to 757.21
PRFIEN(SCTCDE)	; get preferred term IEN in 757.01 for subset update

Name	Field # of Occurrence
FILE^DIE	DELPLS+4
UPDATE^DIE	ADDPLS+7
SCTMAP^GMPLX1	UPDPLP+6, UPDPLP+7
$$GETSYN^LEXTRAN1	PRFIEN+2

Name	Line Occurrences (* Changed, ! Killed)
^LEX(757.21 - [#757.21]	INPSUB+4, INPSUB+5, SUBIEN+4, DELIEN+4, DELIEN+5
^LEX(757.33 - [#757.33]	INIT+6, INIT+10, ACTVMAP+6, ACTVMAP+7, ACTVMAP+8, ACTVMAP+9, ACTVMAP+10, ACTVMAP+11

Name	Line Occurrences
$$ACTVMAP	CTRL+35
$$CHANGE	CTRL+7
$$DELIEN	DELPLS+3
$$INPSUB	CTRL+25
$$PRFIEN	CTRL+18
$$SUBIEN	ADDPLS+6
ADDPLS	CTRL+25
DELPLS	CTRL+37
INIT	CTRL+12
UPDPLP	CTRL+28

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACT	ACTVMAP+3~, ACTVMAP+5, ACTVMAP+6, ACTVMAP+7, ACTVMAP+8, ACTVMAP+12, ACTVMAP+13
BASE	SUBIEN+2~, SUBIEN+3*, SUBIEN+4
C	SUBIEN+2~, SUBIEN+3*, SUBIEN+4
CHANGE	CHANGE+2~, CHANGE+3, CHANGE+4, CHANGE+5, CHANGE+6
DIEN	DELIEN+2~, DELIEN+3, DELIEN+4, DELIEN+5, DELIEN+6
FDA	ADDPLS+3~, DELPLS+2~
FDA(	ADDPLS+4, ADDPLS+5, DELPLS+3*
ICD	UPDPLP~, UPDPLP+7
ICDCDE	CTRL+10~, CTRL+28, INIT+8*
IEN	ACTVMAP+3~, ACTVMAP+4, ACTVMAP+8, ACTVMAP+9, ACTVMAP+10, ACTVMAP+11
IMIEN	INIT+3~, INIT+5*, INIT+6, INIT+10
IN	INPSUB+2~, INPSUB+3, INPSUB+4, INPSUB+5, INPSUB+6
LDAT	ACTVMAP+3~, ACTVMAP+9*, ACTVMAP+10
LEX	PRFIEN+1~
LEX("P"	PRFIEN+3
MAP	ACTVMAP~, ACTVMAP+6, ACTVMAP+7, ACTVMAP+8
MAPID	CTRL+10~, CTRL+15, CTRL+35, INIT+9*
MAPORD	CTRL+10~, CTRL+28, INIT+10*
NOSYNS	PRFIEN+1~, PRFIEN+2*
ORD	UPDPLP~, UPDPLP+7, ACTVMAP+3~, ACTVMAP+4, ACTVMAP+6, ACTVMAP+7, ACTVMAP+8
ORIEN	ADDPLS+3~
ORIEN(1	ADDPLS+6*
PLSUB	CTRL+10~, CTRL+25, INIT+14*, DELIEN+5
PRF	INPSUB~, INPSUB+4, ADDPLS~, ADDPLS+4
PRFIEN	CTRL+10~, CTRL+18, CTRL+25, PRFIEN+1~, PRFIEN+3, PRFIEN+4, DELIEN+4
RECORD	CTRL+10~, INIT+6*, INIT+7, INIT+8, INIT+9
SCT	UPDPLP~, UPDPLP+7
SCTCDE	CTRL+10~, CTRL+18, CTRL+28, CTRL+35, INIT+7*, PRFIEN~, PRFIEN+2
SCTMAPID	CTRL+10~, CTRL+15, INIT+15*
SIEN	INPSUB+2~, INPSUB+3, INPSUB+4, INPSUB+5, ACTVMAP+3~, ACTVMAP+10*, ACTVMAP+11
SRC	ACTVMAP~, ACTVMAP+6, ACTVMAP+7, ACTVMAP+8
SSIEN	DELIEN+2~, DELIEN+3, DELIEN+4, DELIEN+5
STAT	ACTVMAP+3~, ACTVMAP+11*, ACTVMAP+12
STATUS	CTRL+10~, CTRL+22, INIT+4*
SUB	INPSUB~, INPSUB+5, ADDPLS~, ADDPLS+5
SUBERR	ADDPLS+3~, DELPLS+2~
TAR	ACTVMAP+3~, ACTVMAP+4, ACTVMAP+7, ACTVMAP+8
U	INIT+7, INIT+8, INIT+9, INIT+10, PRFIEN+3, INPSUB+5, ACTVMAP+11, DELIEN+5
XSUB	CHANGE+2~, CHANGE+3, CHANGE+4, CHANGE+5
>> XUHUIDA	INIT+5
>> XUHUIDA(1	INIT+5
>> XUHUIX(2	INIT+4
>> XUHUIX1(	CHANGE+4, CHANGE+5
>> XUHUIX2(	CHANGE+5

Customize PDF page

Package: Lexicon Utility

Routine: LEXTRAN3

Information

Source Information

Call Graph

Call Graph Total: 3

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items