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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: IBDFN12

Package: Automated Information Collection System

Routine: IBDFN12


Information

IBDFN12 ;ALB/CJM - ENCOUNTER FORM - SELECTORS ;05/10/95

Source Information

Source file <IBDFN12.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Automated Information Collection System 2 ($$LEXICD10,INPHLP,SETPARAM)^IBDLXDG  $$ICD10DT^IBDUTICD  
CPT HCPCS Codes 1 $$CPT^ICPTCOD  
VA FileMan 1 ^DIC  

Entry Points

Name Comments DBIA/ICR reference
LOOKUP(FILE,SCREEN,X,NODE) ;
; -- lookup X in file using SCREEN
; -- kills X if lookup not successful, else sets X to the ien and returns NODE as the 0 node
; -- pass X and NODE by reference
SLCTCPT(X) ;for CPT codes
SLCTDX10(X) ;
SLCTDX(X) ;for ICD9 diagnosis codes
SLCTVST(X) ;for VISIT TYPE codes
SLCTED(X) ;for Education Topics
SLCTIMM(X) ;for Immunizations
SLCTEX(X) ;for Exams
SLCTSKN(X) ;for Skin Tests
SLCTHF(X) ;for Health Factors
SLCTTR(X) ;for Treatments
SLCTYN(X) ;for selecting YES or NO
SLCTCLS(PI,X) ;for visit classification

External References

Name Field # of Occurrence
^DIC LOOKUP+10
$$LEXICD10^IBDLXDG SLCTDX10+6
INPHLP^IBDLXDG SLCTDX10+4
SETPARAM^IBDLXDG SLCTDX10+5
$$ICD10DT^IBDUTICD SLCTDX10+6
$$CPT^ICPTCOD SLCTVST+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,IBDPARAM("NO DATA FOUND"),!,IBDPARAM("NO DATA FOUND 2"),!
  • Line Location: SLCTDX10+7
Function Call: WRITE
  • Prompt: "Enter YES or NO."
  • Line Location: SLCTYN+4
Routine Call
  • DIC
  • Line Location:
    • LOOKUP+10

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] LOOKUP+10

Label References

Name Line Occurrences
LOOKUP SLCTCPT+9, SLCTDX+9, SLCTVST+9, SLCTED+5, SLCTIMM+5, SLCTEX+5, SLCTSKN+5, SLCTHF+5, SLCTTR+5, SLCTCLS+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIC LOOKUP+8!*, LOOKUP+10!
DIC("S" LOOKUP+8*
DIC(0 LOOKUP+9*
DT SLCTDX10+6
FILE LOOKUP~, LOOKUP+5, LOOKUP+8, LOOKUP+10
IBDCODE SLCTDX10+2~, SLCTDX10+6*, SLCTDX10+7, SLCTDX10+8, SLCTDX10+9
>> IBDPARAM SLCTDX10+5, SLCTDX10+6
>> IBDPARAM("NO DATA FOUND 2" , SLCTDX10+7, DATA FOUND" , SLCTDX10+7
>> IBID SLCTCPT+10*, SLCTDX+10*, SLCTVST+12*, SLCTED+6*, SLCTIMM+6*, SLCTEX+6*, SLCTSKN+6*, SLCTHF+6*, SLCTTR+6*, SLCTYN+2*
, SLCTYN+3*, SLCTCLS+7*
>> IBLABEL SLCTCPT+10*, SLCTDX+10*, SLCTVST+12*, SLCTED+6*, SLCTIMM+6*, SLCTEX+6*, SLCTSKN+6*, SLCTHF+6*, SLCTTR+6*, SLCTCLS+7*
>> IBQUAL SLCTCLS+7*
NODE LOOKUP~, LOOKUP+7*, LOOKUP+12*, SLCTCPT+4~, SLCTCPT+9, SLCTCPT+10, SLCTDX+4~, SLCTDX+9, SLCTDX+10, SLCTVST+4~
, SLCTVST+9, SLCTVST+12*, SLCTED+4~, SLCTED+5, SLCTED+6, SLCTIMM+4~, SLCTIMM+5, SLCTIMM+6, SLCTEX+4~, SLCTEX+5
, SLCTEX+6, SLCTSKN+4~, SLCTSKN+5, SLCTSKN+6, SLCTHF+4~, SLCTHF+5, SLCTHF+6, SLCTTR+4~, SLCTTR+5, SLCTTR+6
, SLCTCLS+5~, SLCTCLS+6, SLCTCLS+7
PI SLCTCLS~
SCREEN LOOKUP~, LOOKUP+8, SLCTVST+4~
SCRN SLCTCPT+4~, SLCTCPT+8*, SLCTCPT+9, SLCTDX+4~, SLCTDX+8*, SLCTDX+9, SLCTVST+8*, SLCTVST+9
U SLCTDX10+9
X LOOKUP~, LOOKUP+5!, LOOKUP+12*, LOOKUP+13!, SLCTCPT~, SLCTCPT+9, SLCTCPT+10*, SLCTDX10~, SLCTDX10+3!, SLCTDX10+4!
, SLCTDX10+6, SLCTDX10+7!, SLCTDX10+8!, SLCTDX10+9*, SLCTDX~, SLCTDX+9, SLCTDX+10*, SLCTVST~, SLCTVST+9, SLCTVST+12*
, SLCTED~, SLCTED+5, SLCTED+6*, SLCTIMM~, SLCTIMM+5, SLCTIMM+6*, SLCTEX~, SLCTEX+5, SLCTEX+6*, SLCTSKN~
, SLCTSKN+5, SLCTSKN+6*, SLCTHF~, SLCTHF+5, SLCTHF+6*, SLCTTR~, SLCTTR+5, SLCTTR+6*, SLCTYN~, SLCTYN+2*
, SLCTYN+3*, SLCTYN+5!, SLCTCLS~, SLCTCLS+6, SLCTCLS+7*
Y LOOKUP+6~, LOOKUP+7*, LOOKUP+11, LOOKUP+12
Y(0 LOOKUP+12
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All