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 |  All
Print Page as PDF
Global: ^MCAR(700.1

Package: Medicine

Global: ^MCAR(700.1


Information

FileMan FileNo FileMan Filename Package
700.1 PFT PREDICTED VALUES Medicine

Description

Directly Accessed By Routines, Total: 7

Package Total Routines
Medicine 7 MCBPFTP1    MCBPFTP7    MCPFTP1    MCPFTP2A    MCPFTP5    MCPOS01G    MCPRE08    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Medicine 2 MCPFTE    MCPRE08    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Medicine 1 PULMONARY FUNCTION TESTS(#700)[28]    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Medicine 1 PFT FORMULA(#700.2)[123456788.591011121313.0113.021415]    

Fields, Total: 20

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  APR 10, 1991
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    This field identifies the name for the set of formulas used to calculate predicted values and corrections.  Current entries are Male and Female.
  • CROSS-REFERENCE:  700.1^B
    1)= S ^MCAR(700.1,"B",$E(X,1,30),DA)=""
    2)= K ^MCAR(700.1,"B",$E(X,1,30),DA)
.02 SEX TYPE 1;1 SET
************************REQUIRED FIELD************************
  • 'M' FOR MALE;
  • 'F' FOR FEMALE;

  • LAST EDITED:  MAR 04, 1992
  • HELP-PROMPT:  Enter the sex for which this set of predicted values formula is used: 'M' for Male; 'F' for Female
  • DESCRIPTION:  
    This field identifies which Sex the set of formulas are used for:  Male or Female.
  • CROSS-REFERENCE:  700.1^AC
    1)= S ^MCAR(700.1,"AC",$E(X,1,30),DA)=""
    2)= K ^MCAR(700.1,"AC",$E(X,1,30),DA)
    This x-ref facilitates screening logic.
1 TLC TLC;1 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""TLC"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAR 14, 1991
  • HELP-PROMPT:  Choose Total Lung Capacity formula that you wish to use by entering the formula or the reference name (ex. CRAPO '81)
  • DESCRIPTION:  
    This field contains the formula used for calculating the predicted value of the 'Total Lung Capacity'.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""TLC"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  Choose Total Lung Capacity formulas only
2 VC VC;1 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)[""VC"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAR 14, 1991
  • HELP-PROMPT:  Choose Vital Capacity Formula that you wish to use by entering the formula or the reference name (ex. CRAPO '81)
  • DESCRIPTION:  
    This field contains the formula for calculating the predicted value of the 'Vital Capacity'
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)[""VC"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  Choose Vital Capacity formulas only
3 FVC FVC;1 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)[""FVC"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAR 14, 1991
  • HELP-PROMPT:  Choose Forced Vital Capacity formula that you wish to use by entering the formula or the reference name (ex. CRAPO '81)
  • DESCRIPTION:  
    This contains the formula for calculating the predicted value of the Forced Vital Capacity
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)[""FVC"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  Choose Forced Vital Capacity formulas only
4 FRC FRC;1 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""FRC"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAR 14, 1991
  • HELP-PROMPT:  Choose Functional Residual Capacity formula that you wish to use by entering the formula or the reference name (ex. CRAPO '81)
  • DESCRIPTION:  
    This field contains the formula for calculating the predicted value of the Forced Residual Capacity
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""FRC"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  Choose Functional Residual Capacity formulas only
5 RV RV;1 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""RV"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAR 14, 1991
  • HELP-PROMPT:  Choose Residual Volume formula that you wish to use by entering the formula or the reference name (ex. CRAPO '81)
  • DESCRIPTION:  
    This field contains the formula for calculating the predicted value for the Residual Volume
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""RV"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  Choose Residual Volumes formulas only
6 FEV1 FEV1;1 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""FEV1"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAR 14, 1991
  • HELP-PROMPT:  Choose Forced Expiratory Volume (1 sec) formula that you wish to use by entering the formula or the reference name (ex. CRAPO '81)
  • DESCRIPTION:  
    This field contains the formula for calculating the predicted value for the Forced Expiratory Volume in 1 second
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""FEV1"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  Choose Forced Expiratory Volume (1 sec) formulas only
7 PF PF;1 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""PF"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAR 14, 1991
  • HELP-PROMPT:  Choose Peak Flow formula that you wish to use by entering the formula or the reference name (ex. CRAPO '81)
  • DESCRIPTION:  
    This field contains the formula for calculating the predicted value for the Peak Flow
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""PF"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  Choose Peak Flow formulas only
8 FEF25-75 FEF2575;1 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""FEF25-75"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAR 14, 1991
  • HELP-PROMPT:  Choose Forced Expiratory Flow formula that you wish to use by entering the formula or the reference name (ex. CRAPO '81)
  • DESCRIPTION:  
    This field contains the formula for calculating the predicted value of the Forced Expiratory Flow at 25 to 75 liters
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""FEF25-75"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  Choose Foreced Expired Flows only
8.5 MVV MVV;1 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""MVV"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAR 14, 1991
  • HELP-PROMPT:  Choose Maximal Voluntary Ventilation formula that you wish to use by entering the formula or the reference name (ex. CRAPO '81)
  • DESCRIPTION:  
    This field contains the formula for calculating the predicted value for the Maximal Voluntary Ventilation
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""MVV"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  Choose Maximal Voluntary Ventilation formulas only
9 DLCO-SB DLCOSB;1 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""DLCO-SB"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAR 14, 1991
  • HELP-PROMPT:  Choose Diffusion Capacity formula that you wish to use by entering the formula or the reference name (ex. CRAPO '81)
  • DESCRIPTION:  
    This field contains the formula for calculating the predicted value for the Diffusion
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""DLCO-SB"",$P(^MCAR(700.2,+Y,0),U,4)=$P(^MCAR(700.1,DA,1),U)",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  Choose Diffusion Capacity formulas only
10 TLC,VC,FVC,FEV1 CORR.-BLACK RC;1 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,11)=""B"",$P(^(0),U,2)[""TLC""",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 17, 1991
  • HELP-PROMPT:  Enter the formula for computing the race corrected values for Black patients for TLC,VC.FVC,FEV1: ACT refers to the actual measured value
  • DESCRIPTION:  
    This contains the formula for a race correction for Black patients on Total Lung Capacity, Vital Capacity, Forced Vital Capacity, and Forced Expiratory Volume.
  • SCREEN:  S DIC("S")="I $P(^(0),U,11)=""B"",$P(^(0),U,2)[""TLC""",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  ENTER FORMULA FOR RACE CORRECTION FOR BLACKS FOR TLC,VC,FVC,FEV1
11 TLC,VC,FVC,FEV1 CORR.-ORIENTAL RC;2 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,11)=""O"",$P(^(0),U,2)[""TLC""",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 17, 1991
  • HELP-PROMPT:  Enter the formula for computing the race corrected values for Oriental patients for TLC,VC,FVC,FEV1: ACT refers to the actual value of the measurement
  • DESCRIPTION:  
    This contains the formula for a race correction for Oriental patients on Total Lung Capacity, Vital Capacity, Forced Vital Capacity, and Forced Expiratory Volume.
  • SCREEN:  S DIC("S")="I $P(^(0),U,11)=""O"",$P(^(0),U,2)[""TLC""",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  CHOOSES TLC,VC,FVC,FEV1 RACE CORRECTION FORMULA FOR ORIENTAL PATIENTS
12 FRC,RV CORR.-BLACK RC;3 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,11)=""B"",$P(^(0),U,2)[""FRC""",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 17, 1991
  • HELP-PROMPT:  Enter the formula for computing the race corrected values for Black patients for FRC,RV: ACT refers to the actual values of the measurement
  • DESCRIPTION:  
    This contains the formula for a race correction for Black patients on Forced Residual Capacity and Residual Volume.
  • SCREEN:  S DIC("S")="I $P(^(0),U,11)=""B"",$P(^(0),U,2)[""FRC""",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  ENTER FROMULA FOR RACE CORRECTION FOR BLACKS FOR FRC,RV
13 FEF25-75 RACE CORR.-BLACK RC;4 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,11)=""B"",$P(^(0),U,2)[""FEF2575""",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 17, 1991
  • HELP-PROMPT:  Enter the formula for computing the corrected FEF25-75 for Black patients: ACT refers to the acutal measured FEF25-75 Value.
  • DESCRIPTION:  
    This contains the formula for a race correction for Black patients on the Forced Expiratory Flow at 25 to 75 liters.
  • SCREEN:  S DIC("S")="I $P(^(0),U,11)=""B"",$P(^(0),U,2)[""FEF2575""",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  RACE CORRECTION FORMULA FOR BLACKS FOR FEF25-75
13.01 MVV CORR.-BLACK RC;5 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,11)=""B"",$P(^(0),U,2)[""MVV""",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUN 23, 1999
  • HELP-PROMPT:  Enter the formula for computing the race corrected values for Black patients for MVV: ACT refers to the actual measured value
  • DESCRIPTION:  
    This contains the formula for a race correction for Black patients for Maximum Voluntary Ventilation.
  • SCREEN:  S DIC("S")="I $P(^(0),U,11)=""B"",$P(^(0),U,2)[""MVV""",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  Enter formula for race correction for Blacks for MVV
13.02 MVV CORR.-ORIENTAL RC;6 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,11)=""O"",$P(^(0),U,2)[""MVV""",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUN 23, 1999
  • HELP-PROMPT:  Enter the formula for computing the race corrected values for Oriental patients for MVV: ACT refers to the actual measured value
  • DESCRIPTION:  
    This contains the formula for a race correction for Oriental patients for Maximum Voluntary Ventilation.
  • SCREEN:  S DIC("S")="I $P(^(0),U,11)=""O"",$P(^(0),U,2)[""MVV""",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  Enter the formula for computing the race corrected values for Oriental patients for MVV: ACT refers to the actual measured value
14 COHB CORRECTION COHB;1 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""COHB""",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 17, 1991
  • HELP-PROMPT:  Enter the formula for correcting the diffusion for Carboxy: ACT refers to the actual measured Diffusion
  • DESCRIPTION:  
    This contains the formula for correcting the diffusion for Carboxyl.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""COHB""",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  CORRECTS THE DIFFUSION FOR CARBOXY
15 HB CORRECTION HB;1 POINTER TO PFT FORMULA FILE (#700.2) PFT FORMULA(#700.2)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""HB""",DIC("W")="D DISP^MCPFTE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 17, 1991
  • HELP-PROMPT:  Enter the formula for correcting the diffusion for Hemoglobin: ACT refers to the actual measured Diffusion.
  • DESCRIPTION:  
    This contains the formula for correcting the diffusion for Hemoglobin.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""HB""",DIC("W")="D DISP^MCPFTE"
  • EXPLANATION:  CORRECTS THE DIFFUSION FOR HEMOGLOBIN

Found Entries, Total: 2

NAME: FEMALE    NAME: MALE    
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  All