Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Source | Entry Points | Interaction Calls | FileMan Files Accessed Via FileMan Db Call

Print Page as PDF

Routine: MCARDPL

Package: Medicine

Routine: MCARDPL

Information

MCARDPL ;WISC/TJK,FDJW,JA-DISPLAY SCREEN ;8/31/92 09:03

Source Information

Source file <MCARDPL.m>

Entry Points

Name	Comments	DBIA/ICR reference
N
N1	;
N2
EN
EN1
HDH	;HEADING
ER	;

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: DJHIN Line Location: N1+4
Function Call: WRITE	Prompt: $J(V,2)," ",DJLIN Line Location: N1+4
Function Call: WRITE	Prompt: DJHIN Condition for execution: (V#1<1)&(V#1>0) Line Location: N1+5
Function Call: WRITE	Prompt: $P(DJ0,U,1) Line Location: N1+5
Function Call: WRITE	Prompt: DJLIN Line Location: N1+5
Function Call: WRITE	Prompt: ":" Condition for execution: $P(DJ0,U,5)>0 Line Location: N1+5
Function Call: WRITE	Prompt: DJHIN Line Location: N1+16
Function Call: WRITE	Prompt: DJDB Line Location: N1+23
Function Call: WRITE	Prompt: DJLIN Line Location: N1+29
Function Call: WRITE	Prompt: DJDB Line Location: N1+35
Function Call: WRITE	Prompt: $E(DJDB,1,80-DX),!,$E(DJDB,80-DX+1,$L(DJDB)) Line Location: N1+36
Function Call: WRITE	Prompt: @IOF,?(80-$L(DJT))/2-5,DJT," ",$E(DT,4,5),"/",$E(DT,6,7),"/",$E(DT,2,3) Line Location: HDH+1
Function Call: WRITE	Prompt: !,?DJK2,"",^TMP($J,"DJST",DJK,"TITLE"),"*" Line Location: HDH+2
Function Call: WRITE	Prompt: !,?3,"*",^TMP($J,"DJST",DJST,"TITLE"),"*" Line Location: HDH+3
Function Call: WRITE	Prompt: "SCREEN ",DJNM," HAS NOT BEEN PROPERLY CREATED. Check your 'A' XREF",*7 Line Location: ER+2

FileMan Files Accessed Via FileMan Db Call

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

Info | Source | Entry Points | Interaction Calls | FileMan Files Accessed Via FileMan Db Call