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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: MCPFTP1

Package: Medicine

Routine: MCPFTP1


Information

MCPFTP1 ;WISC/TJK-PFT REPORT-DEMO INFO ;1/17/03 11:57

Source Information

Source file <MCPFTP1.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Medicine 6 COMPUTE^MCARBSA  (DTIME,HEAD)^MCARP  INIT^MCARP1  FOOTER^MCESPRT  EXIT^MCPFTP1A  ^MCPFTP2  
VA Fileman 2 NOW^%DTC  EN^DIQ1  
Kernel 1 ($$LENGTH,$$WEIGHT)^XLFMSMT  
Registration 1 (DEM,INP)^VADPT  

Caller Graph

Caller Graph Total: 10

Package Total Caller Graph
Medicine 10 MCARATVE  MCARP  MCBPFTP1  MCPFTE  MCPFTI  MCPFTP  MCPFTP2A  MCPFTP5  
MCPFTSS  MCRH1  

Entry Points

Name Comments DBIA/ICR reference
EXIT1 ;
PRED
ETHN(MCRSTR,MCETH) ; Get the Race and Ethnicity arrays and concat with Race
BSA(HT,WT) ; Compute BSA
NOTE
PREDS
PREDV(MCPV,VALUE)
ORIENTAL
MCRACE
CONFID(MCPV,VALUE) ;
EXIT
MCPV(MCDA) ; Get the Predicted Value entry

External References

Name Field # of Occurrence
NOW^%DTC MCPFTP1+30
EN^DIQ1 MCPFTP1+42
COMPUTE^MCARBSA BSA+1
DTIME^MCARP MCPFTP1+29, MCPFTP1+30
HEAD^MCARP MCPFTP1+32
INIT^MCARP1 MCPFTP1+31
FOOTER^MCESPRT MCPFTP1+47
EXIT^MCPFTP1A EXIT1+1
^MCPFTP2 MCPFTP1+46
DEM^VADPT MCPFTP1+10
INP^VADPT MCPFTP1+30
$$LENGTH^XLFMSMT MCPFTP1+20, MCPFTP1+22
$$WEIGHT^XLFMSMT MCPFTP1+21, MCPFTP1+23

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"SEX: ",MCSEX," AGE:",AGE,?30,+$J(HT1,0,2)," in/",+$J(WT1,0,1)," lb",?60,"AMBIENT: ",$P(MCPFT0,U,12),"C/",$P(MCPFT0,U,7),"T"
  • Line Location: MCPFTP1+33
Function Call: WRITE
  • Prompt: !,"RACE: ",RACE
  • Line Location: MCPFTP1+34
Function Call: WRITE
  • Prompt: ?60,"TECH: ",$E(TECH,1,14)
  • Line Location: MCPFTP1+36
Function Call: WRITE
  • Prompt: !,$S($P(MCPFT0,U,8)="Y":"SMOKER",$P(MCPFT0,U,8)="N":"NON-SMOKER",1:"")
  • Line Location: MCPFTP1+37
Function Call: WRITE
  • Prompt: ?30
  • Line Location: MCPFTP1+38
Function Call: WRITE
  • Prompt: "CURRENT BRONCHODILATOR USE"
  • Condition for execution: $P(MCPFT0,U,9)="Y"
  • Line Location: MCPFTP1+38
Function Call: WRITE
  • Prompt: ?60,"EFFORT: ",MCEFF
  • Line Location: MCPFTP1+39
Function Call: WRITE
  • Prompt: !!,"CONSULT DX: "
  • Line Location: MCPFTP1+41
Function Call: WRITE
  • Prompt: ?15,^("E"),!
  • Line Location: MCPFTP1+42
Function Call: WRITE
  • Prompt: !,MCDOT
  • Line Location: MCPFTP1+43

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^MCAR(700 - [#700] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^MCAR(700 - [#700] MCPFTP1+28, MCPFTP1+42, MCRACE+1, MCPV+1
^MCAR(700.1 - [#700.1] MCRACE, CONFID+1, PREDV+2
^MCAR(700.2 - [#700.2] MCRACE+9, CONFID+1, PREDV+3
^SC - [#44] MCPFTP1+16
^UTILITY("DIQ1" MCPFTP1+41!, MCPFTP1+42, MCPFTP1+43!
^VA(200 - [#200] MCPFTP1+34

Label References

Name Line Occurrences
$$BSA PREDS
$$CONFID PREDS, PREDS+1, PREDS+2, PREDS+3, PREDS+4, PREDS+5, PREDS+6, PREDS+7, PREDS+8, PREDS+9
$$ETHN MCPFTP1+17
$$MCPV PRED+1
$$PREDV PREDS, PREDS+1, PREDS+2, PREDS+3, PREDS+4, PREDS+5, PREDS+6, PREDS+7, PREDS+8, PREDS+9
MCRACE PRED+3
NOTE MCRACE+14
ORIENTAL MCRACE+11
PRED MCPFTP1+43
PREDS PRED+3

Naked Globals

Name Field # of Occurrence
^("E" MCPFTP1+42
^("PV" MCPV+1
^(0 MCPFTP1+16, MCPFTP1+34, MCRACE+9
^(17 MCPFTP1+28

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % MCPFTP1+30
>> ACT PRED*
>> AGE MCPFTP1+15*, MCPFTP1+33, PRED+2
>> BSA PREDS*
>> CDLCOSB PRED*, PREDS*
>> CFEF2575 PRED*, PREDS+4*
>> CFEV1 PRED*, PREDS+1*
>> CFRC PRED*, PREDS+2*
>> CFVC PRED*, PREDS+3*
>> CLIN MCPFTP1+16*
>> CMVV PRED*, PREDS+9*
>> COHB PRED*
>> CPF PRED*, PREDS+5*
>> CRV PRED*, PREDS+6*
>> CTLC PRED*, PREDS+7*
>> CVC PRED*, PREDS+8*
>> DA MCPFTP1+42*
>> DA( MCPFTP1+42*
>> DATE MCPFTP1+18*
>> DIC MCPFTP1+41*
DIQ MCPFTP1+43!
DIQ(0 MCPFTP1+41*, MCPFTP1+42*
>> DLCOSB PRED*, PREDS*
>> DR MCPFTP1+42*
>> DR( MCPFTP1+41*
EXPRESS PREDV+1~, PREDV+5*
>> FEF2575 PRED*, PREDS+4*
>> FEV1 PRED*, PREDS+1*
FORMULA PREDV+1~, PREDV+3*, PREDV+5
>> FRC PRED*, PREDS+2*
>> FVC PRED*, PREDS+3*
HT MCPFTP1+20*, MCPFTP1+22*, PRED+2, PREDS, BSA~
HT1 MCPFTP1+20*, MCPFTP1+22*, MCPFTP1+33!
HTCM MCPFTP1+19~, MCPFTP1+20*, MCPFTP1+22*
HTIN MCPFTP1+19~, MCPFTP1+20*, MCPFTP1+22*
>> I MCRACE+8*, MCRACE+10, PREDS*
IEN PREDV+1~, PREDV+2*, PREDV+3
J MCRACE+8*, MCRACE+9*, MCRACE+10, MCRACE+11!
>> K MCPFTP1+42*
>> MC17 MCPFTP1+28*
>> MCARDOB MCPFTP1+29*
>> MCARDTM MCPFTP1+30*
>> MCARGDA MCPFTP1+28, MCPFTP1+42, MCPFTP1+47, PRED+1, MCRACE+1
>> MCARGDT MCPFTP1+29*, MCPFTP1+31
>> MCARGDT2 MCPFTP1+29*
>> MCARGNM MCPFTP1+10*
>> MCARRB MCPFTP1+30*
>> MCARWARD MCPFTP1+30*
>> MCARZ MCPFTP1+29*, MCPFTP1+31
MCCTR ETHN+1~, ETHN+2*, ETHN+3
MCDA MCPV~, MCPV+1
>> MCDOT MCPFTP1+24*, MCPFTP1+43
>> MCEFF MCPFTP1+28*, MCPFTP1+39
>> MCESON MCPFTP1+29, MCPFTP1+47
MCETH ETHN~
MCETH(12 ETHN+2, ETHN+3
>> MCFF MCPFTP1+40*, MCPFTP1+42, MCPFTP1+43
>> MCFILE MCPFTP1+31, MCPFTP1+47
MCHOLD MCPFTP1+17~*
MCLP ETHN+1~, ETHN+3*
MCMRAC MCRACE+2~*, MCRACE+3*, MCRACE+4*, MCRACE+5, MCRACE+7, NOTE+1
>> MCOUT MCPFTP1+42, MCPFTP1+43, MCPFTP1+47
>> MCPFT0 MCPFTP1+11, MCPFTP1+16, MCPFTP1+18, MCPFTP1+20, MCPFTP1+21, MCPFTP1+22, MCPFTP1+23, MCPFTP1+29, MCPFTP1+33, MCPFTP1+34
, MCPFTP1+37, MCPFTP1+38, MCPFTP1+44
MCPV PRED+1*, PRED+2, MCRACE, CONFID~, CONFID+1, PREDV~, PREDV+2, PREDS, PREDS+1, PREDS+2
, PREDS+3, PREDS+4, PREDS+5, PREDS+6, PREDS+7, PREDS+8, PREDS+9
MCRAC MCRACE+2~, MCRACE+5*, MCRACE+7
>> MCRC MCRACE*, MCRACE+8
MCRC1 MCRACE+12, MCRACE+13, ORIENTAL!, ORIENTAL+1*
MCRC2 MCRACE+11!, ORIENTAL, ORIENTAL+1
MCRC3 MCRACE+12, MCRACE+13, ORIENTAL!, ORIENTAL+1!
MCRC4 MCRACE+12, MCRACE+13, ORIENTAL!, ORIENTAL+1!
MCRC5 MCRACE+12, MCRACE+13, ORIENTAL!, ORIENTAL+1*
MCRC6 MCRACE+11!, ORIENTAL, ORIENTAL+1!
>> MCRCN MCPFTP1+45, MCRACE+13*, ORIENTAL+1*, NOTE*, NOTE+1*
>> MCRCR MCRACE*, MCRACE+1*, MCRACE+5, MCRACE+6*, MCRACE+7*, MCRACE+11, NOTE+1
MCRSTR ETHN~, ETHN+4
>> MCSEX MCPFTP1+28*, MCPFTP1+29*, MCPFTP1+33
>> MCSTAT MCPFTP1+29
MCSTR ETHN+1~, ETHN+2*, ETHN+3*, ETHN+4
MCX ETHN+1~
>> MDX ETHN+3*
>> MVV PRED*, PREDS+9*
>> PF PRED*, PREDS+5*
>> RACE MCPFTP1+16*, MCPFTP1+17*, MCPFTP1+34, MCPFTP1+35, MCRACE+3, MCRACE+4, MCRACE+6
>> RDATE MCPFTP1+44*
RESULT PREDV+1~, PREDV+4*, PREDV+6
>> RV PRED*, PREDS+6*
>> SSN MCPFTP1+10*
>> TECH MCPFTP1+34*, MCPFTP1+36
>> TLC PRED*, PREDS+7*
U MCPFTP1+11, MCPFTP1+16, MCPFTP1+18, MCPFTP1+20, MCPFTP1+21, MCPFTP1+22, MCPFTP1+23, MCPFTP1+28, MCPFTP1+29, MCPFTP1+30
, MCPFTP1+33, MCPFTP1+34, MCPFTP1+37, MCPFTP1+38, MCPFTP1+44, MCRACE+1, MCRACE+5, MCRACE+8, MCRACE+9, CONFID+1
, PREDV+2, PREDV+3
>> VA("PID" MCPFTP1+10
>> VADM MCPFTP1+17
>> VADM(1 MCPFTP1+10
>> VADM(3 MCPFTP1+11, MCPFTP1+29
>> VADM(5 MCPFTP1+29
>> VADM(8 MCPFTP1+16
>> VAIN(4 MCPFTP1+30
>> VAIN(5 MCPFTP1+30
VALUE CONFID~, CONFID+1, PREDV~, PREDV+2
>> VC PRED*, PREDS+8*
WT MCPFTP1+21*, MCPFTP1+23*, PRED+2, PREDS, BSA~
WT1 MCPFTP1+21*, MCPFTP1+23*, MCPFTP1+33!
WTKG MCPFTP1+19~, MCPFTP1+21*, MCPFTP1+23*
WTLB MCPFTP1+19~, MCPFTP1+21*, MCPFTP1+23*
>> X MCPFTP1+29*, MCPFTP1+30*, BSA+2
>> X1 MCPFTP1+11*, MCPFTP1+15
>> X2 MCPFTP1+11*, MCPFTP1+15
Y ETHN+1~, ETHN+4*, ETHN+5
>> ZTQUEUED EXIT
>> ZTREQ EXIT*
ZTSK EXIT!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All