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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PSUDEM8

Package: Pharmacy Benefits Management

Routine: PSUDEM8


Information

PSUDEM8 ;BIR/DAM - ICD9 Codes for Inpatient PTF Record Extract ;20 DEC 2001

Source Information

Source file <PSUDEM8.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
DRG Grouper 2 $$CSI^ICDEX  $$ICDDATA^ICDXCODE  
Pharmacy Benefits Management 1 EN^PSUDEM9  

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

Package Total Caller Graph
Pharmacy Benefits Management 1 PSUDEM7  

Entry Points

Name Comments DBIA/ICR reference
EN ;EN CALLED FROM PSUDEM7
PTFIEN ;$O through ^XTMP("PSU_"_PSUJOB,"PSUIPV" to get all the PTF IEN's
PTF70 ;Find all ICD pointers present on ^DGPT(D0,70 node
ICD91 ;Find ICD codes from pointer on ^DGPT(D0,70 node and place in
DEL ;Delete duplicates
PTFM ;
FIN ;$O through array, and set codes into the Inpatient Record

External References

Name Field # of Occurrence
$$CSI^ICDEX PTF70+6, PTF70+9, PTF70+12, PTF70+15, PTF70+18, PTF70+21, PTF70+24, PTF70+27, PTF70+30, PTF70+33
, PTF70+36, PTFM+7
$$ICDDATA^ICDXCODE ICD91+5, ICD91+7, ICD91+9, ICD91+11, ICD91+13, ICD91+15, ICD91+17, ICD91+19, ICD91+21, ICD91+23
, ICD91+25, PTFM+7
EN^PSUDEM9 PTFIEN+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPT - [#45] PTF70+5, PTF70+8, PTF70+11, PTF70+14, PTF70+17, PTF70+20, PTF70+23, PTF70+26, PTF70+29, PTF70+32
, PTF70+35, PTFM+3
^XTMP("PSU_" PTFIEN+4, PTFIEN+7!, ICD91+6*, ICD91+8*, ICD91+10*, ICD91+12*, ICD91+14*, ICD91+16*, ICD91+18*, ICD91+20*
, ICD91+22*, ICD91+24*, ICD91+26*, PTFM+8*, DEL+2, DEL+3!, FIN+5, FIN+7, FIN+8, FIN+11*
, FIN+13, FIN+14*

Label References

Name Line Occurrences
DEL PTFM+9
FIN PTFIEN+7
ICD91 PTF70+37
PTF70 PTFIEN+5
PTFIEN EN+1
PTFM PTFIEN+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CSYS PTF70+3~
CSYS( PTFM+7*, PTFM+8
CSYS(1 PTF70+6*, ICD91+5
CSYS(10 PTF70+33*, ICD91+23
CSYS(11 PTF70+36*, ICD91+25
CSYS(2 PTF70+9*, ICD91+7
CSYS(3 PTF70+12*, ICD91+9
CSYS(4 PTF70+15*, ICD91+11
CSYS(5 PTF70+18*, ICD91+13
CSYS(6 PTF70+21*, ICD91+15
CSYS(7 PTF70+24*, ICD91+17
CSYS(8 PTF70+27*, ICD91+19
CSYS(9 PTF70+30*, ICD91+21
>> I PTFM+2*, PTFM+7, PTFM+8, PTFM+10*, DEL+3
ISYSCODE FIN+3~, FIN+8*, FIN+9, FIN+10*
>> N DEL+2*, FIN+4*, FIN+5, FIN+11, FIN+12*, FIN+13*, FIN+14
PSU1 PTF70+3~, PTF70+5*, PTF70+6, ICD91+5
PSU1("ICDSYS" PTF70+6*, ICD91+6
PSU10 PTF70+3~, PTF70+32*, PTF70+33, ICD91+23
PSU10("ICDSYS" PTF70+33*, ICD91+24
PSU11 PTF70+3~, PTF70+35*, PTF70+36, ICD91+25
PSU11("ICDSYS" PTF70+36*, ICD91+26
PSU2 PTF70+3~, PTF70+8*, PTF70+9, ICD91+7
PSU2("ICDSYS" PTF70+9*, ICD91+8
PSU3 PTF70+3~, PTF70+11*, PTF70+12, ICD91+9
PSU3("ICDSYS" PTF70+12*, ICD91+10
PSU4 PTF70+3~, PTF70+14*, PTF70+15, ICD91+11
PSU4("ICDSYS" PTF70+15*, ICD91+12
PSU5 PTF70+3~, PTF70+17*, PTF70+18, ICD91+13
PSU5("ICDSYS" PTF70+18*, ICD91+14
PSU6 PTF70+3~, PTF70+20*, PTF70+21, ICD91+15
PSU6("ICDSYS" PTF70+21*, ICD91+16
PSU7 PTF70+3~, PTF70+23*, PTF70+24, ICD91+17
PSU7("ICDSYS" PTF70+24*, ICD91+18
PSU8 PTF70+3~, PTF70+26*, PTF70+27, ICD91+19
PSU8("ICDSYS" PTF70+27*, ICD91+20
PSU9 PTF70+3~, PTF70+29*, PTF70+30, ICD91+21
PSU9("ICDSYS" PTF70+30*, ICD91+22
>> PSUC PTFIEN+3*, PTFIEN+4*, PTF70+5, PTF70+8, PTF70+11, PTF70+14, PTF70+17, PTF70+20, PTF70+23, PTF70+26
, PTF70+29, PTF70+32, PTF70+35, ICD91+6, ICD91+8, ICD91+10, ICD91+12, ICD91+14, ICD91+16, ICD91+18
, ICD91+20, ICD91+22, ICD91+24, ICD91+26, PTFM+3, PTFM+8, DEL+2, DEL+3, FIN+5, FIN+7
, FIN+8, FIN+11, FIN+13, FIN+14
>> PSUCD PTFM+1*, PTFM+3*, PTFM+4*, PTFM+6, PTFM+7
PSUCSYS1 FIN+16!*
PSUID1 ICD91+3~, ICD91+5*, ICD91+6
PSUID10 ICD91+4~, ICD91+23*, ICD91+24
PSUID11 ICD91+4~, ICD91+25*, ICD91+26
PSUID2 ICD91+3~, ICD91+7*, ICD91+8
PSUID3 ICD91+3~, ICD91+9*, ICD91+10
PSUID4 ICD91+3~, ICD91+11*, ICD91+12
PSUID5 ICD91+3~, ICD91+13*, ICD91+14
PSUID6 ICD91+3~, ICD91+15*, ICD91+16
PSUID7 ICD91+3~, ICD91+17*, ICD91+18
PSUID8 ICD91+3~, ICD91+19*, ICD91+20
PSUID9 ICD91+3~, ICD91+21*, ICD91+22
>> PSUIDF FIN+6*, FIN+7*, FIN+8, FIN+11
PSUIDT PTFM+5~, PTFM+7*, PTFM+8, DEL+2, DEL+3
>> PSUJOB PTFIEN+4, PTFIEN+7, ICD91+6, ICD91+8, ICD91+10, ICD91+12, ICD91+14, ICD91+16, ICD91+18, ICD91+20
, ICD91+22, ICD91+24, ICD91+26, PTFM+8, DEL+2, DEL+3, FIN+5, FIN+7, FIN+8, FIN+11
, FIN+13, FIN+14
SYSCODE FIN+3~, FIN+8*, FIN+9*, FIN+10, FIN+16
>> T FIN+4*, FIN+5*, FIN+7, FIN+8
U PTF70+5, PTF70+8, PTF70+11, PTF70+14, PTF70+17, PTF70+20, PTF70+23, PTF70+26, PTF70+29, PTF70+32
, PTF70+35, ICD91+5, ICD91+7, ICD91+9, ICD91+11, ICD91+13, ICD91+15, ICD91+17, ICD91+19, ICD91+21
, ICD91+23, ICD91+25, PTFM+7, FIN+11, FIN+13, FIN+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All