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

Package: Automated Information Collection System

Routine: IBDFN7


Information

IBDFN7 ;ALB/CJM - ENCOUNTER FORM - validate logic for data ;MAY 10,1995

Source Information

Source file <IBDFN7.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Lexicon Utility 2 $$ICDONE^GMPTU  $$ICDONE^LEXU  
DRG Grouper 1 $$CPT^ICPTCOD  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Automated Information Collection System 2 IBDFDE21  IBDFDE41  

Entry Points

Name Comments DBIA/ICR reference
TESTLEX ; -- Is clinical lexicon pointer valid and does icdone, not return 799.9
TESTVST ;does X point to a valid visit code? If not, kills X.
TESTCPT ;does X point to a valid CPT4 code? Kills X if not.
TESTICD ; -- does X point to a valid ICD9 code? Kills X if not.
; -- input the icd code in X

External References

Name Field # of Occurrence
$$ICDONE^GMPTU TESTLEX+6
$$CPT^ICPTCOD TESTCPT+6, TESTVST+5
$$ICDONE^LEXU TESTLEX+14

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" TESTLEX+2
^GMP(757.01 TESTLEX+5
^IBE(357.69 - [#357.69] TESTVST+10
^ICD9 - [#80] TESTICD+6, TESTICD+7
^ICD9("BA" TESTICD+5
^LEX TESTLEX+2
^LEX(757.01 - [#757.01] TESTLEX+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> IBDLEXV TESTLEX+1*, TESTLEX+2*, TESTLEX+3, TESTLEX+11
IEN TESTVST+2~, TESTVST+10*
U TESTCPT+8, TESTCPT+9, TESTVST+7, TESTVST+8
>> VAL TESTLEX+6*, TESTLEX+7, TESTLEX+8, TESTLEX+14*, TESTLEX+15, TESTLEX+16
X TESTCPT+5!, TESTCPT+6, TESTCPT+7!, TESTCPT+8!, TESTCPT+9*, TESTICD+3!, TESTICD+4*, TESTICD+5*!, TESTICD+6!, TESTICD+7!
, TESTVST+3!, TESTVST+5, TESTVST+6!, TESTVST+7!, TESTVST+8*, TESTVST+9, TESTVST+10!, TESTLEX+2*, TESTLEX+4!, TESTLEX+5!
, TESTLEX+6, TESTLEX+7!, TESTLEX+8!, TESTLEX+9!, TESTLEX+12!, TESTLEX+13!, TESTLEX+14, TESTLEX+15!, TESTLEX+16!
XX TESTCPT+3~, TESTCPT+6*, TESTCPT+7, TESTCPT+8, TESTCPT+9, TESTVST+2~, TESTVST+5*, TESTVST+6, TESTVST+7, TESTVST+8
>> Y TESTCPT+4*, TESTCPT+8*, TESTICD+3*, TESTICD+5*, TESTICD+6*, TESTICD+7*, TESTVST+3*, TESTVST+6*, TESTVST+7*, TESTLEX+4*
, TESTLEX+5*, TESTLEX+7*, TESTLEX+8*, TESTLEX+9*, TESTLEX+12*, TESTLEX+13*, TESTLEX+15*, TESTLEX+16*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Local Variables |  All