Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^MCAR(698.1

Package: Medicine

Global: ^MCAR(698.1


Information

FileMan FileNo FileMan Filename Package
698.1 V LEAD IMPLANT Medicine

Description

Directly Accessed By Routines, Total: 7

Package Total Routines
Medicine 7 ^MCAR(698.1    ICD DIAGNOSIS    MCAROPV    MCARPCS2    MCARPCS4    MCOBPV    MCPOS01E    

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
Medicine 3 MCARPAC    MCARPACE    MCARPCS4    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Consult Request Tracking 1 REQUEST/CONSULTATION(#123)[11#123.03(.01)]    

Pointer To FileMan Files, Total: 9

Package Total FileMan Files
Medicine 4 MEDICAL PATIENT(#690)[1]    REASON (MEDICINE)(#695.8)[57]    PACEMAKER EQUIPMENT(#698.4)[215]    PACEMAKER MANUFACTURER(#698.6)[3]    
Consult Request Tracking 1 REQUEST/CONSULTATION(#123)[1001]    
DRG Grouper 1 ICD DIAGNOSIS(#80)[#698.12(.01)]    
Kernel 1 NEW PERSON(#200)[300301302701]    
Order Entry Results Reporting 1 ORDER(#100)[1000]    
PCE Patient Care Encounter 1 VISIT(#9000010)[900]    

Fields, Total: 23

Field # Name Loc Type Details
.01 DATE/TIME OF IMPLANT 0;1 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
  • HELP-PROMPT:  ENTER THE DATE/TIME THE V LEAD WAS IMPLANTED
  • DESCRIPTION:  
    This field is the date/time that the procedure was entered into the database.
  • TECHNICAL DESCR:  
    ORDER ENTRY TYPE:  IDENTIFIER
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  698.1^B
    1)= S ^MCAR(698.1,"B",$E(X,1,30),DA)=""
    2)= K ^MCAR(698.1,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  698.1^AC^MUMPS
    1)= S MCARCDIE="^MCAR(698.1," D CHGDTE1^MCARPROC
    2)= S MCARCDIE="^MCAR(698.1," D CHGDTE^MCARPROC
    This cross-reference pakes an entry under the 'AC' index of the MEDICAL PATIENT file (#690) to record the most recent V lead implant procedure for this patient.
1 MEDICAL PATIENT 0;2 POINTER TO MEDICAL PATIENT FILE (#690)
************************REQUIRED FIELD************************
MEDICAL PATIENT(#690)

  • LAST EDITED:  FEB 02, 1996
  • HELP-PROMPT:  Enter the patient's name, SSN, or other identifier
  • DESCRIPTION:  
    This field identifies the field which identifies the patient.
  • TECHNICAL DESCR:  
    ORDER ENTRY TYPE:  IDENTIFIER
  • CROSS-REFERENCE:  698.1^C
    1)= S ^MCAR(698.1,"C",$E(X,1,30),DA)=""
    2)= K ^MCAR(698.1,"C",$E(X,1,30),DA)
    This cross-reference allows look-ups by patient.
  • CROSS-REFERENCE:  698.1^AD^MUMPS
    1)= S MCARCDIE="^MCAR(698.1," D CHGPAT^MCARPROC
    2)= S MCARCDIE="^MCAR(698.1," D KILL^MCARPROC
    This cross-reference makes an entry under the 'AC' index of the MEDICAL PATIENT file (#690) to record the most recent V lead implant procedure for this patient.
2 V LEAD MODEL 0;3 POINTER TO PACEMAKER EQUIPMENT FILE (#698.4) PACEMAKER EQUIPMENT(#698.4)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^MCAR(698.4,+Y,0),U,2)[""V""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  APR 23, 1996
  • HELP-PROMPT:  Enter the manufacturer's production name for this trasmitter.
  • DESCRIPTION:  
    This field identifies the V Lead Model.
  • TECHNICAL DESCR:  
    ORDER ENTRY TYPE:  DIAGNOSIS
  • SCREEN:  S DIC("S")="I $P(^MCAR(698.4,+Y,0),U,2)[""V"""
  • EXPLANATION:  CHOOSE LEADS THAT ARE V LEADS OR BOTH A AND V LEADS ONLY
  • CROSS-REFERENCE:  ^^TRIGGER^698.1^3
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^MCAR(698.1,D0,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y X ^DD(698.1,2,1,1,1.1) X ^DD(698.1,2,1,1,1.4)
    1.1)= S X=DIV S I(0,0)=$S($D(D0):D0,1:""),D0=DIV S:'$D(^MCAR(698.4,+D0,0)) D0=-1 S Y(101)=$S($D(^MCAR(698.4,D0,0)):^(0),1:"") S X=$P(Y(101),U,3),X=X S X=X S D0=I(0,0)
    1.4)= S DIH=$S($D(^MCAR(698.1,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,4)=DIV,DIH=698.1,DIG=3 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^MCAR(698.1,D0,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y X ^DD(698.1,2,1,1,2.1) X ^DD(698.1,2,1,1,2.4)
    2.1)= S X=DIV X ^DD(698.1,2,1,1,59.2) S X=$P(Y(101),U,3),X=X S X=X S D0=I(0,0)
    2.4)= S DIH=$S($D(^MCAR(698.1,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,4)=DIV,DIH=698.1,DIG=3 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    59.2)= S I(0,0)=$S($D(D0):D0,1:""),Y(1)=$S($D(^MCAR(698.1,D0,0)):^(0),1:""),D0=$P(Y(1),U,3) S:'$D(^MCAR(698.4,+D0,0)) D0=-1 S Y(101)=$S($D(^MCAR(698.4,D0,0)):^(0),1:"")
    CREATE VALUE)= INTERNAL(#2:#2)
    DELETE VALUE)= INTERNAL(#2:#2)
    FIELD)= #3
    This cross-reference triggers the V LEAD MANUFACTURER field (#3).
3 V LEAD MANUFACTURER 0;4 POINTER TO PACEMAKER MANUFACTURER FILE (#698.6) PACEMAKER MANUFACTURER(#698.6)

  • HELP-PROMPT:  Enter the producer of this transmitter.
  • DESCRIPTION:  
    This field identifies the V Lead Manufacturer.
    WRITE AUTHORITY:  ^
  • NOTES:  TRIGGERED by the V LEAD MODEL field of the V LEAD IMPLANT File
4 V LEAD SERIAL NUMBER 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>12!($L(X)<2) X
  • HELP-PROMPT:  ANSWER MUST BE 2-12 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field identifies the V Lead Serial number.
  • TECHNICAL DESCR:  
    ORDER ENTRY TYPE:  DIAGNOSIS
11 V LEAD THRESHOLD IN VOLTS 0;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>12)!(X<0)!(X?.E1"."2N.N) X
  • HELP-PROMPT:  Type a Number between 0 and 12, 1 Decimal Digit
  • DESCRIPTION:  
    This field identifies the V Lead threshold in Volts.
12 V LEAD THRESHOLD IN mA'S AT .5 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>12)!(X<0)!(X?.E1"."2N.N) X
  • HELP-PROMPT:  Type a Number between 0 and 12, 1 Decimal Digit
  • DESCRIPTION:  
    This field identifies the V lead threshold.
  • TECHNICAL DESCR:  
    ORDER ENTRY TYPE:  UNKNOWN
13 V LEAD RESISTANCE (OHMS) AT 5V 0;8 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>1000)!(X<0)!(X?.E1"."3N.N) X
  • HELP-PROMPT:  Type a Number between 0 and 1000, 2 Decimal Digits
  • DESCRIPTION:  
    This field identifies the V lead resistance.
  • TECHNICAL DESCR:  
    ORDER ENTRY TYPE:  UNKNOWN
14 R WAVE AMPLITUDE (mV) 0;9 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>25)!(X<0)!(X?.E1"."2N.N) X
  • HELP-PROMPT:  Type a Number between 0 and 25, 1 Decimal Digit
  • DESCRIPTION:  
    This field identifies the R wave amplitude.
  • TECHNICAL DESCR:  
    ORDER ENTRY TYPE:  UNKNOWN
15 V LEAD PSA USED 0;10 POINTER TO PACEMAKER EQUIPMENT FILE (#698.4) PACEMAKER EQUIPMENT(#698.4)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^MCAR(698.4,""C"",""P"",+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • DESCRIPTION:  
    This field identifies the V Lead PSA used.
  • SCREEN:  S DIC("S")="I $D(^MCAR(698.4,""C"",""P"",+Y))"
  • EXPLANATION:  CHOOSE PSA EQUIPMENT TYPE ONLY
56 EXPLANT DATE 1;1 DATE

  • INPUT TRANSFORM:  S %DT="ET" D ^%DT S X=Y K:Y<1 X
  • HELP-PROMPT:  Enter the date that this apparatus was removed.
  • DESCRIPTION:  
    This field identifies the explant date.
  • TECHNICAL DESCR:  
    ORDER ENTRY TYPE:  IDENTIFIER
57 V LEAD EXPLANT REASON 1;2 POINTER TO REASON (MEDICINE) FILE (#695.8) REASON (MEDICINE)(#695.8)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^MCAR(695.8,""AC"",""L"",+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • HELP-PROMPT:  Enter the reason for this explant/implant procedure.
  • DESCRIPTION:  
    This field identifies the V lead explant rationale.
  • SCREEN:  S DIC("S")="I $D(^MCAR(695.8,""AC"",""L"",+Y))"
  • EXPLANATION:  CHOOSE REASONS THAT APPLY TO LEAD EXPLANT ONLY
300 ATTENDING PHYSICIAN 3;1 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^XUSEC(""PROVIDER"",+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  APR 23, 1996
  • DESCRIPTION:  
    This field identifies the name of the Attending Physician for this V-Lead Implant.
  • SCREEN:  S DIC("S")="I $D(^XUSEC(""PROVIDER"",+Y))"
  • CROSS-REFERENCE:  ^^TRIGGER^698.1^701
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^MCAR(698.1,D0,"PROV")):^("PROV"),1:"") S X=$P(Y(1),U,1),X=X S DIU=X K Y S X=DIV S X=DIV,X=X X ^DD(698.1,300,1,1,1.4)
    1.4)= S DIH=$S($D(^MCAR(698.1,DIV(0),"PROV")):^("PROV"),1:""),DIV=X S $P(^("PROV"),U,1)=DIV,DIH=698.1,DIG=701 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^MCAR(698.1,D0,"PROV")):^("PROV"),1:"") S X=$P(Y(1),U,1),X=X S DIU=X K Y X ^DD(698.1,300,1,1,2.1) X ^DD(698.1,300,1,1,2.4)
    2.1)= S X=DIV S Y(1)=$S($D(^MCAR(698.1,D0,3)):^(3),1:"") S X=$P(Y(1),U,1),X=X
    2.4)= S DIH=$S($D(^MCAR(698.1,DIV(0),"PROV")):^("PROV"),1:""),DIV=X S $P(^("PROV"),U,1)=DIV,DIH=698.1,DIG=701 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    CREATE VALUE)= INTERNAL(#300)
    DELETE VALUE)= INTERNAL(#300)
    FIELD)= #701
    This trigger sets the primary provider file.
301 FELLOW-1st 3;2 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^XUSEC(""PROVIDER"",+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  OCT 25, 1994
  • DESCRIPTION:  
    This field identifies the name of a Cardiology Fellow for this V-Lead Implant.
  • SCREEN:  S DIC("S")="I $D(^XUSEC(""PROVIDER"",+Y))"
302 FELLOW-2nd 3;3 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^XUSEC(""PROVIDER"",+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  OCT 25, 1994
  • DESCRIPTION:  
    This field identifies the name of a Second Cardiology Fellow for this V-Lead Implant.
  • SCREEN:  S DIC("S")="I $D(^XUSEC(""PROVIDER"",+Y))"
500 COMMENTS 10;0 WORD-PROCESSING #698.11

  • DESCRIPTION:  
    This field identifies the comment field for this procedure.
  • TECHNICAL DESCR:  
    ORDER ENTRY TYPE:  UNKNOWN
600 PROCEDURE SUMMARY .2;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>79!($L(X)<1) X
  • LAST EDITED:  NOV 21, 1990
  • HELP-PROMPT:  Answer must be 1-79 characters in length. This will appear on the 'Summary of Patient Procedures'.
  • DESCRIPTION:  
    This 1-79 character field is for display on the medicine procedure summary report.
  • TECHNICAL DESCR:  
    ORDER ENTRY TYPE:  UNKNOWN
601 SUMMARY .2;1 SET
************************REQUIRED FIELD************************
  • 'A' FOR ABNORMAL;
  • 'N' FOR NORMAL;

  • LAST EDITED:  NOV 21, 1990
  • DESCRIPTION:  
    This field identifies the procedure summary.
  • TECHNICAL DESCR:  
    ORDER ENTRY TYPE:  UNKNOWN
700 ICD DIAGNOSIS ICD;0 POINTER Multiple #698.12 698.12

  • DESCRIPTION:  
    This field contains the ICD Diagnosis(es) for the procedure.
  • TECHNICAL DESCR:  
    ORDER ENTRY TYPE:  UNKNOWN
701 PRIMARY PROVIDER PROV;1 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^XUSEC(""PROVIDER"",+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  OCT 25, 1994
  • DESCRIPTION:  
    This contains the primary provider.  It is triggered by another field in the file and is located here to provider a standard provider location for use in transferring data to the PCC.
  • SCREEN:  S DIC("S")="I $D(^XUSEC(""PROVIDER"",+Y))"
    WRITE AUTHORITY:  ^
  • NOTES:  TRIGGERED by the ATTENDING PHYSICIAN field of the V LEAD IMPLANT File
900 PCC POINTER PCC;1 POINTER TO VISIT FILE (#9000010) VISIT(#9000010)

  • LAST EDITED:  MAY 17, 1996
  • DESCRIPTION:  
    This field is used to link the Medicine package results with the PCC Visit File for use by Queryman.
  • CROSS-REFERENCE:  698.1^APCE
    1)= S ^MCAR(698.1,"APCE",$E(X,1,30),DA)=""
    2)= K ^MCAR(698.1,"APCE",$E(X,1,30),DA)
    Pointer to the Visit file.
1000 ORIFN OR;1 POINTER TO ORDER FILE (#100) ORDER(#100)

  • LAST EDITED:  JUL 09, 1991
  • HELP-PROMPT:  Enter the 'Consult Orders' internal file number.
  • DESCRIPTION:  
    This field contains a pointer to the 'Consult Orders' internal file number, stored in file 100.  This field is entered when results are entered in the Medicine package.
1001 GMRCO OR;2 POINTER TO REQUEST/CONSULTATION FILE (#123) REQUEST/CONSULTATION(#123)

  • LAST EDITED:  AUG 16, 1991
  • HELP-PROMPT:  Enter the 'Request/Consultation' internal file number.
  • DESCRIPTION:  
    This field contains a pointer to the internal number of the consult order stored in the REQUEST/CONSULTATION file (123).  This field is entered when results are entered in the Medicine package.

External References

Name Field # of Occurrence
^%DT .01+1, 56+1
^DIC 2+1, 15+1, 57+1, 300+1, 301+1, 302+1, 701+1
^DICR 2(XREF 1n1.4), 2(XREF 1n2.4), 300(XREF 1n1.4), 300(XREF 1n2.4)
Y^DIQ ID1+1
CHGDTE^MCARPROC .01(XREF 2K)
CHGDTE1^MCARPROC .01(XREF 2S)
CHGPAT^MCARPROC 1(XREF 2S)
KILL^MCARPROC 1(XREF 2K)

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( 2(XREF 1n1.4), 2(XREF 1n2.4), 300(XREF 1n1.4), 300(XREF 1n2.4)
^DD(690 ID1+1
^DD(698.1 2(XREF 1S), 2(XREF 1K), 2(XREF 1n2.1), 300(XREF 1S), 300(XREF 1K)
^MCAR(690 - [#690] ID1+1
^MCAR(698.1 - [#698.1] .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 2(XREF 1S), 2(XREF 1n1.4), 2(XREF 1K), 2(XREF 1n2.4), 2(XREF 1n59.2), 300(XREF 1S)
300(XREF 1n1.4), 300(XREF 1K), 300(XREF 1n2.1), 300(XREF 1n2.4), 900(XREF 1S), 900(XREF 1K)
^MCAR(698.4 - [#698.4] 2(XREF 1n1.1), 2(XREF 1n59.2)

Naked Globals

Name Field # of Occurrence
^("PROV" 300(XREF 1S), 300(XREF 1n1.4), 300(XREF 1K), 300(XREF 1n2.4)
^(0 ID1+1, 2(XREF 1S), 2(XREF 1n1.1), 2(XREF 1n1.4), 2(XREF 1K), 2(XREF 1n2.4), 2(XREF 1n59.2)
^(3 300(XREF 1n2.1)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT .01+1*, 56+1*
%I ID1+1*!
>> C ID1+1*
>> D0 2(XREF 1S), 2(XREF 1n1.1), 2(XREF 1K), 2(XREF 1n2.1), 2(XREF 1n59.2), 300(XREF 1S), 300(XREF 1K), 300(XREF 1n2.1)
>> DA .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 2(XREF 1S), 2(XREF 1K), 300(XREF 1S), 300(XREF 1K), 900(XREF 1S), 900(XREF 1K)
DIC ID1+1, 2+1!*, 15+1!*, 57+1!*, 300+1!*, 301+1!*, 302+1!*, 701+1!*
DIC("S" 2+1*, 2SCR+1*, 15+1*, 15SCR+1*, 57+1*, 57SCR+1*, 300+1*, 301+1*, 302+1*, 701+1*
>> DIE 2+1, 15+1, 57+1, 300+1, 301+1, 302+1, 701+1
>> DIG 2(XREF 1n1.4), 2(XREF 1n2.4), 300(XREF 1n1.4), 300(XREF 1n2.4)
>> DIH 2(XREF 1n1.4), 2(XREF 1n2.4), 300(XREF 1n1.4), 300(XREF 1n2.4)
>> DIU 2(XREF 1S), 2(XREF 1K), 300(XREF 1S), 300(XREF 1K)
DIV 2(XREF 1S), 2(XREF 1n1.1), 2(XREF 1n1.4), 2(XREF 1K), 2(XREF 1n2.1), 2(XREF 1n2.4), 300(XREF 1S), 300(XREF 1n1.4), 300(XREF 1K), 300(XREF 1n2.1)
300(XREF 1n2.4)
DIV(0 2(XREF 1S), 2(XREF 1n1.4), 2(XREF 1K), 2(XREF 1n2.4), 300(XREF 1S), 300(XREF 1n1.4), 300(XREF 1K), 300(XREF 1n2.4)
>> I(0 2(XREF 1n1.1), 2(XREF 1n2.1), 2(XREF 1n59.2)
>> MCARCDIE .01(XREF 2S), .01(XREF 2K), 1(XREF 2S), 1(XREF 2K)
U ID1+1, 2(XREF 1S), 2(XREF 1n1.1), 2(XREF 1n1.4), 2(XREF 1K), 2(XREF 1n2.1), 2(XREF 1n2.4), 2(XREF 1n59.2), 300(XREF 1S), 300(XREF 1n1.4)
300(XREF 1K), 300(XREF 1n2.1), 300(XREF 1n2.4)
X .01+1*!, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 2+1*!, 2(XREF 1S), 2(XREF 1n1.1), 2(XREF 1n1.4), 2(XREF 1K)
2(XREF 1n2.1), 2(XREF 1n2.4), 4+1!, 11+1!, 12+1!, 13+1!, 14+1!, 15+1*!, 56+1*!, 57+1*!
, 300+1*!, 300(XREF 1S), 300(XREF 1n1.4), 300(XREF 1K), 300(XREF 1n2.1), 300(XREF 1n2.4), 301+1*!, 302+1*!, 600+1!, 701+1*!
900(XREF 1S), 900(XREF 1K)
Y ID1+1*, .01+1, 2+1, 2(XREF 1S), 2(XREF 1K), 15+1, 56+1, 57+1, 300+1, 300(XREF 1S)
300(XREF 1K), 301+1, 302+1, 701+1
Y(1 2(XREF 1S), 2(XREF 1K), 2(XREF 1n59.2), 300(XREF 1S), 300(XREF 1K), 300(XREF 1n2.1)
Y(101 2(XREF 1n1.1), 2(XREF 1n2.1), 2(XREF 1n59.2)
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All