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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: GMPLCLNP

Package: Problem List

Routine: GMPLCLNP


Information

GMPLCLNP ;ISP/TC - Problem File Cleanup Routine ;01/14/16 13:41

Source Information

Source file <GMPLCLNP.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 3 ^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  MES^XPDUTL  
Problem List 3 (BLDCLMSG,BLDCLRPT,BLDERMSG,BLDERRPT,BLDLEMSG,BLDNEMSG,BLDRPMSG)^GMPLCLN  $$GETDX^GMPLUTL  $$NOS^GMPLX  
VA FileMan 2 (FILE,UPDATE)^DIE  $$GET1^DIQ  
DRG Grouper 1 ($$CODEC,$$CODECS,$$CODEN,$$SAB)^ICDEX  
Lexicon Utility 1 $$GETSYN^LEXTRAN1  

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

Package Total Caller Graph
Problem List 2 GMPL GENERATE DIAG RPTS  GMPLY40  
Electronic Health Modernization 1 EHM-01429  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
EN ; Main entry point to task off SCT error scan & cleanup
EN1 ; Main entry point to task off incorrect mapping scan & cleanup
SCANSCT ; Scan Problem file for SCT in Diagnosis field errors
CLNSCTE ; Clean up erroneous PL entries in ^TMP("GMPLSCT")
FILEMT(GMPDA,GMPICD,GMPDLM) ; File the associating Mapping Target codes
CLNAUD(GMPLDLM,GMPLDA,GMPLDIEN) ; Cleanup audit history for Diagnosis field
CNVTFMDT(GMPLINVD) ; Convert an inverted date into FileMan format
SCANVCDE ; Scan Problem file for incorrect mapping (SCT 428283002, ICD-9 V15.89)
CLNVCDE ; Clean up erroneous PL entries in ^TMP("GMPLVCDE")

External References

Name Field # of Occurrence
^%ZTLOAD EN+6, EN1+6
FILE^DIE CLNSCTE+27, CLNSCTE+28, FILEMT+8, CLNAUD+12, CLNVCDE+11
UPDATE^DIE FILEMT+19, CLNVCDE+25
$$GET1^DIQ SCANSCT+12, SCANVCDE+11
BLDCLMSG^GMPLCLN CLNSCTE+49, CLNVCDE+35
BLDCLRPT^GMPLCLN CLNSCTE+48
BLDERMSG^GMPLCLN SCANSCT+17
BLDERRPT^GMPLCLN SCANSCT+16
BLDLEMSG^GMPLCLN CLNSCTE+40, CLNVCDE+29
BLDNEMSG^GMPLCLN SCANSCT+24, SCANVCDE+23
BLDRPMSG^GMPLCLN SCANVCDE+16
$$GETDX^GMPLUTL CLNSCTE+14
$$NOS^GMPLX FILEMT+12
$$CODEC^ICDEX SCANSCT+8, CLNAUD+9, SCANVCDE+9
$$CODECS^ICDEX FILEMT+2
$$CODEN^ICDEX CLNSCTE+15, CLNVCDE+22
$$SAB^ICDEX FILEMT+2
$$GETSYN^LEXTRAN1 CLNSCTE+17
$$FMTE^XLFDT SCANSCT+14, CLNSCTE+32, FILEMT+15
$$NOW^XLFDT SCANSCT+5, CLNSCTE+4, SCANVCDE+5, CLNVCDE+19
MES^XPDUTL EN+10, EN1+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPROB - [#9000011] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPROB - [#9000011] SCANSCT+9, CLNSCTE+8, CLNSCTE+30, FILEMT+4, SCANVCDE+7, CLNVCDE+6, CLNVCDE+12
^AUPNPROB("ASCT" SCANVCDE+6
^AUPNPROB("B" SCANSCT+6, SCANSCT+7
^DPT - [#2] SCANVCDE+10
^GMPL(125.8 - [#125.8] CLNAUD+3, CLNAUD+4, CLNAUD+6, CLNAUD+7
^TMP("GMPLCLER" CLNSCTE+3!, CLNSCTE+10*, CLNSCTE+34
^TMP("GMPLCLNP" CLNSCTE+3!, CLNSCTE+32*
^TMP("GMPLLKER" CLNVCDE+4!, CLNVCDE+8*, CLNVCDE+27
^TMP("GMPLSCT" SCANSCT+4!, SCANSCT+14*, CLNSCTE+6, CLNSCTE+7, CLNSCTE+12, CLNSCTE+33!
^TMP("GMPLVCDE" SCANVCDE+4!, SCANVCDE+14*, CLNVCDE+5, CLNVCDE+15, CLNVCDE+26!

Label References

Name Line Occurrences
$$CNVTFMDT CLNAUD+5
CLNAUD CLNSCTE+29
CLNSCTE SCANSCT+18
CLNVCDE SCANVCDE+17
FILEMT CLNSCTE+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
GMPCNT CLNSCTE+2~, CLNSCTE+4*, CLNSCTE+9*, CLNSCTE+10, CLNSCTE+34, CLNSCTE+40, CLNVCDE+1~, CLNVCDE+2*, CLNVCDE+7*, CLNVCDE+8
, CLNVCDE+27, CLNVCDE+29
GMPCODE FILEMT+12~, FILEMT+13*, FILEMT+14, FILEMT+16
GMPCSYS FILEMT+1~, FILEMT+2*, FILEMT+12, FILEMT+17
GMPDA FILEMT~, FILEMT+4, FILEMT+7, FILEMT+16, FILEMT+17, FILEMT+18
GMPDLM FILEMT~, FILEMT+2, FILEMT+15
GMPDT FILEMT+12~, FILEMT+15*, FILEMT+18
GMPFDA FILEMT+1~, FILEMT+12~, CLNAUD+10~, CLNVCDE+1~
GMPFDA( FILEMT+16*, FILEMT+17*, FILEMT+18*, CLNAUD+11*, CLNVCDE+17*, CLNVCDE+18*, CLNVCDE+19*, CLNVCDE+20*, CLNVCDE+21*, CLNVCDE+22*
, CLNVCDE+23*, CLNVCDE+24*
GMPI FILEMT+1~, FILEMT+11*, FILEMT+13
GMPICD FILEMT~, FILEMT+2, FILEMT+10, FILEMT+13
GMPJ FILEMT+1~, FILEMT+6*, FILEMT+7
GMPL0 SCANSCT+2~, SCANSCT+9*, SCANSCT+10, SCANSCT+11, CLNAUD+1~, CLNAUD+7*, CLNAUD+8, SCANVCDE+1~, SCANVCDE+7*, SCANVCDE+8
, SCANVCDE+10
GMPL1 SCANSCT+2~, SCANSCT+9*, SCANVCDE+1~, SCANVCDE+7*, SCANVCDE+12
GMPLAIEN CLNAUD+1~, CLNAUD+2*, CLNAUD+6*, CLNAUD+7, CLNAUD+11
GMPLDA SCANSCT+1~, SCANSCT+3*, SCANSCT+7*, SCANSCT+9, SCANSCT+12, SCANSCT+14, CLNSCTE+1~, CLNSCTE+4*, CLNSCTE+7*, CLNSCTE+8
, CLNSCTE+10, CLNSCTE+12, CLNSCTE+16, CLNSCTE+21, CLNSCTE+29, CLNSCTE+30, CLNSCTE+32, CLNAUD~, CLNAUD+2*, CLNAUD+3*
, CLNAUD+4, CLNAUD+6, SCANVCDE+1~, SCANVCDE+3*, SCANVCDE+6*, SCANVCDE+7, SCANVCDE+11, SCANVCDE+14, CLNVCDE+1~, CLNVCDE+2*
, CLNVCDE+5*, CLNVCDE+6, CLNVCDE+8, CLNVCDE+10, CLNVCDE+12, CLNVCDE+15, CLNVCDE+17
GMPLDIAG SCANSCT+1~, SCANSCT+3*, SCANSCT+6*, SCANSCT+7, SCANSCT+8, SCANSCT+14
GMPLDIEN CLNSCTE+2~, CLNSCTE+15*, CLNSCTE+29, CLNAUD~, CLNAUD+11, SCANVCDE+1~, SCANVCDE+8*, SCANVCDE+9, SCANVCDE+14, CLNVCDE+1~
, CLNVCDE+16*, CLNVCDE+21
GMPLDLM SCANSCT+1~, SCANSCT+3*, SCANSCT+10*, SCANSCT+14, CLNSCTE+1~, CLNSCTE+4*, CLNSCTE+6*, CLNSCTE+7, CLNSCTE+12, CLNSCTE+14
, CLNSCTE+16, CLNSCTE+17, CLNSCTE+29, CLNSCTE+32, CLNAUD~, CLNAUD+5
GMPLFDA CLNSCTE+1~, FILEMT+1~, CLNVCDE+1~
GMPLFDA( CLNSCTE+23*, FILEMT+7*
GMPLFDA(9000011 CLNSCTE+22*, CLNSCTE+25*, CLNSCTE+26*, CLNVCDE+10*
GMPLFDA1 CLNSCTE+2~
GMPLFDA1(9000011 CLNSCTE+24*
GMPLFLDN CLNAUD+1~, CLNAUD+8*, CLNAUD+9
GMPLFMDT CNVTFMDT+1~, CNVTFMDT+2*, CNVTFMDT+3*, CNVTFMDT+4
GMPLFROM SCANSCT+2~, SCANSCT+21*, SCANSCT+24, CLNSCTE+1~, CLNSCTE+5*, CLNSCTE+40, CLNSCTE+49, SCANVCDE+2~, SCANVCDE+20*, SCANVCDE+23
, CLNVCDE+1~, CLNVCDE+3*, CLNVCDE+29, CLNVCDE+35
GMPLICD CLNSCTE+1~, CLNSCTE+14*, CLNSCTE+15, CLNSCTE+16, CLNSCTE+22, CLNSCTE+32, SCANVCDE+1~, SCANVCDE+9*
GMPLIEN CLNSCTE+2~, CLNSCTE+21*, CLNSCTE+22, CLNSCTE+24, CLNSCTE+25, CLNSCTE+26
GMPLINVD CLNAUD+1~, CLNAUD+2*, CLNAUD+4*, CLNAUD+5, CLNAUD+6, CNVTFMDT~, CNVTFMDT+2
GMPLMSG SCANSCT+2~, SCANSCT+24, CLNSCTE+35~, CLNSCTE+40, SCANVCDE+2~, SCANVCDE+23
GMPLMSG(1 SCANSCT+22*, CLNSCTE+37*, SCANVCDE+21*
GMPLMSG(2 SCANSCT+23*, CLNSCTE+38*, SCANVCDE+22*
GMPLMSG(3 CLNSCTE+39*
GMPLNARR SCANSCT+1~, CLNSCTE+1~, CLNSCTE+18*, CLNSCTE+20*, CLNSCTE+23, CLNSCTE+32, SCANVCDE+1~, SCANVCDE+11*, SCANVCDE+14
GMPLNCLN CLNSCTE+1~, CLNSCTE+4*, CLNSCTE+31*, CLNSCTE+41, CLNSCTE+48, CLNSCTE+49, CLNVCDE+1~, CLNVCDE+2*, CLNVCDE+13*, CLNVCDE+30
, CLNVCDE+35
GMPLNERR SCANSCT+1~, SCANSCT+3*, SCANSCT+13*, SCANSCT+15, SCANSCT+16, SCANSCT+17, SCANVCDE+1~, SCANVCDE+3*, SCANVCDE+13*, SCANVCDE+15
, SCANVCDE+16
GMPLNIEN SCANSCT+1~, SCANSCT+11*, SCANSCT+14, CLNSCTE+2~, CLNSCTE+13*, CLNSCTE+23
GMPLNODE CLNSCTE+35~, CLNSCTE+36*, CLNSCTE+40, CLNVCDE+28~*, CLNVCDE+29
GMPLNVAL CLNAUD+1~, CLNAUD+8*, CLNAUD+9
GMPLPAT SCANVCDE+1~, SCANVCDE+10*, SCANVCDE+14
GMPLPIEN SCANSCT+2~
GMPLPROB SCANSCT+1~, SCANSCT+12*, SCANSCT+14, CLNSCTE+2~, CLNSCTE+18*, CLNSCTE+20*, CLNSCTE+24
GMPLPROV SCANVCDE+1~, SCANVCDE+12*, SCANVCDE+14, CLNVCDE+1~, CLNVCDE+16*, CLNVCDE+20, CLNVCDE+24
GMPLREC CLNSCTE+2~, CLNSCTE+12*, CLNSCTE+13, CLNVCDE+1~, CLNVCDE+15*, CLNVCDE+16
GMPLRNTM SCANSCT+2~, SCANSCT+5*, SCANSCT+16, SCANSCT+24, CLNSCTE+2~, CLNSCTE+4*, CLNSCTE+48, SCANVCDE+1~, SCANVCDE+5*, SCANVCDE+16
, SCANVCDE+23
GMPLSCTC CLNSCTE+1~, CLNSCTE+13*, CLNSCTE+14, CLNSCTE+17, CLNSCTE+25, CLNSCTE+32, SCANVCDE+1~, SCANVCDE+5*, SCANVCDE+6
GMPLSCTD CLNSCTE+1~, CLNSCTE+18*, CLNSCTE+20*, CLNSCTE+26, CLNSCTE+32
GMPLSUB SCANSCT+2~, SCANSCT+20*, SCANSCT+24, SCANVCDE+2~, SCANVCDE+19*, SCANVCDE+23
GMPLTEXT EN+2~, EN+10, EN1+2~, EN1+10
GMPLTEXT(1 EN+7*, EN1+7*
GMPLTEXT(2 EN+8*, EN1+8*
GMPLTEXT(3 EN+9*, EN1+9*
GMPMSG CLNSCTE+42~, CLNSCTE+49, CLNVCDE+31~, CLNVCDE+35
GMPMSG(1 CLNSCTE+44*, CLNVCDE+33*
GMPMSG(2 CLNSCTE+45*, CLNVCDE+34*
GMPMSG(3 CLNSCTE+46*
GMPMSG(4 CLNSCTE+47*
GMPN FILEMT+1~, FILEMT+10*, FILEMT+11
GMPNCNT FILEMT+1~, FILEMT+4*, FILEMT+5, FILEMT+6
GMPNOS FILEMT+12~*, FILEMT+14
GMPQT CLNAUD+1~, CLNAUD+2*, CLNAUD+6, CLNAUD+11*
GMPSUB CLNSCTE+42~, CLNSCTE+43*, CLNSCTE+49, CLNVCDE+31~, CLNVCDE+32*, CLNVCDE+35
GMPSYN CLNSCTE+2~
GMPSYN("P" CLNSCTE+18
U SCANSCT+8, SCANSCT+10, SCANSCT+11, SCANSCT+14, CLNSCTE+13, CLNSCTE+17, CLNSCTE+18, CLNSCTE+32, FILEMT+4, FILEMT+14
, CLNAUD+8, CLNAUD+9, SCANVCDE+8, SCANVCDE+10, SCANVCDE+12, SCANVCDE+14, CLNVCDE+16
ZTDESC EN+2~, EN+4*, EN1+2~, EN1+4*
ZTDTH EN+2~, EN+5*, EN1+2~, EN1+5*
ZTIO EN+2~, EN+5*, EN1+2~, EN1+5*
ZTRTN EN+2~, EN+3*, EN1+2~, EN1+3*
ZTSK EN+2~, EN+9, EN1+2~, EN1+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All