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: QAMEDT7

Package: Clinical Monitoring System

Routine: QAMEDT7


Information

QAMEDT7 ;HISC/DAD-PROGRAMMER EDIT DATA ELEMENTS FILE ;2/10/92 07:33

Source Information

Source file <QAMEDT7.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 4 ^DIC  YN^DICN  ^DIE  (,IXALL)^DIK  
Clinical Monitoring System 1 LOOP^QAMPINQ3  
Kernel 1 HOME^%ZIS  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Clinical Monitoring System 1 QAM PGMR DATA ELEMENTS EDIT  

Entry Points

Name Comments DBIA/ICR reference
ASKELEM ;
ASKOK ;
ASKDD ;
ASKFLD ;
FLD
LOOP ;
DONE1 ;
DONE2 ;
EXIT ;

External References

Name Field # of Occurrence
HOME^%ZIS QAMEDT7+2
^DIC ASKELEM+1
YN^DICN ASKOK+1
^DIE ASKELEM+1, DONE2+1
^DIK ASKOK+2
IXALL^DIK DONE1+4
LOOP^QAMPINQ3 ASKELEM+3, DONE1+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKELEM+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKELEM+3
Function Call: WRITE
  • Prompt: !!?5,"Enter Y(es) to leave the path unchanged.",!?5,"Enter N(o) to rebuild the path for this element.",!
  • Line Location: ASKOK+1
Function Call: WRITE
  • Prompt: "."
  • Line Location: ASKOK+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKOK+3
Function Call: READ
  • Formatting: !
  • Prompt: "(SUB) DICT. #: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASKDD+1
Function Call: WRITE
  • Prompt: !!?5,"Enter the (sub) dictionary number where the field you want resides.",!?5,"You may enter (sub) Dictionary#,Field# if you wish to bypass the",!?5,"(SUB) FIELD # prompt (e.g. 2.98,.001).",!
  • Line Location: ASKDD+2
Function Call: WRITE
  • Prompt: " ??",*7,!!?5,"*** `",QAMDD,"' IS NOT A VALID (SUB) DICTIONARY NUMBER ***",!
  • Line Location: ASKDD+3
Function Call: WRITE
  • Prompt: " ",$S($D(^DIC(QAMDD,0))#2:$P(^(0),"^")_" FILE",1:$P(^DD(QAMDD,0),"^"))
  • Line Location: ASKDD+4
Function Call: READ
  • Formatting: !
  • Prompt: "(SUB) FIELD #: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASKFLD+1
Function Call: WRITE
  • Prompt: !!?5,"Enter the (sub) field number for this data element.",!
  • Line Location: FLD+0
Function Call: WRITE
  • Prompt: " ??",*7,!!?5,"*** `",QAMFLD,"' IS NOT A VALID (SUB) FIELD NUMBER ***",!
  • Line Location: FLD+1
Function Call: WRITE
  • Prompt: " ??",*7,!!?5,"*** YOU MAY NOT PICK THE TOP FIELD OF A MULTIPLE ***",!
  • Line Location: FLD+2
Function Call: WRITE
  • Prompt: " ",$P(^DD(QAMDD,QAMFLD,0),"^"),!!,"Building path to data element"
  • Line Location: FLD+3
Function Call: WRITE
  • Prompt: !!?5,"*** THERE IS A PROBLEM WITH THE",*7,!?5,"*** ^DD(",QAMDD,",""SB"",",QAMDD(0),",",!?5,"*** CROSS REFERENCE",*7,!
  • Line Location: LOOP+2
Function Call: WRITE
  • Prompt: !!,?5,"*** INVALID PATH FOR THE `",QAMPARNT(0),"' FILE (#",QAMPARNT,") ***",*7,!
  • Line Location: DONE1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DONE2+1
Routine Call
  • %ZIS
  • Line Location:
    • QAMEDT7+2
Routine Call
  • DIC
  • Line Location:
    • ASKELEM+1
Routine Call
  • DIE
  • Line Location:
    • ASKELEM+1
    • DONE2+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^QA(743.4 - [#743.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( ASKDD+3, ASKDD+4, FLD+1, FLD+2, FLD+3, LOOP+1
^DIC - [#1] ASKDD+4, DONE1+1
^QA(743.4 - [#743.4] ASKELEM+2, ASKOK+2, DONE1+1, DONE1+3*

Label References

Name Line Occurrences
ASKDD ASKELEM+2, ASKDD+2, ASKDD+3, DONE1+2
ASKELEM ASKELEM+2, ASKOK+1, ASKDD+1, ASKFLD+1, LOOP+2, DONE2+1
ASKFLD FLD, FLD+1, FLD+2
ASKOK ASKOK+1
DONE1 LOOP+1
DONE2 ASKOK+1
EXIT ASKELEM+1
FLD ASKDD+4
LOOP LOOP+3

Naked Globals

Name Field # of Occurrence
^("UP" LOOP+1
^(0 ASKDD+4, DONE1+1, DONE1+3*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ASKOK+1*, EXIT+1!
%Y EXIT+1!
BY EXIT+1!
D0 ASKOK+2*, DONE1+4*, EXIT+1!
D1 ASKOK+2*, EXIT+1!
DA ASKELEM+1*, ASKELEM+2, ASKOK+2*, DONE2+1*, EXIT+1!
DA(1 ASKOK+2*, DONE1+4*
DHD EXIT+1!
DIC ASKELEM+1*!, EXIT+1!
DIC("A" ASKELEM+1*
DIC(0 ASKELEM+1*
DIE ASKELEM+1*, DONE2+1*, EXIT+1!
DIK ASKOK+2*, DONE1+4*, EXIT+1!
DIOEND EXIT+1!
DLAYGO ASKELEM+1*, EXIT+1!
DQ EXIT+1!
DR ASKELEM+1*, DONE2+1*, EXIT+1!
DTIME ASKDD+1, ASKFLD+1
FLDS EXIT+1!
FR EXIT+1!
IOP EXIT+1!
J EXIT+1!
L EXIT+1!
QA DONE1+3*, EXIT+1!
QAM EXIT+1!
QAMCOUNT FLD+3*, LOOP+1, LOOP+3*, DONE1+2, DONE1+3*, EXIT+1!
QAMD0 ASKELEM+1*, ASKELEM+2, ASKELEM+3*, ASKOK+2, DONE1+1, DONE1+3, DONE1+4, DONE1+5*, DONE2+1, EXIT+1!
QAMD0SAV ASKELEM+1*, ASKELEM+3, DONE1+5, EXIT+1!
QAMD1 ASKOK+2*, EXIT+1!
QAMDATA EXIT+1!
QAMDD ASKDD+1*, ASKDD+2, ASKDD+3, ASKDD+4, FLD+1, FLD+2, FLD+3, LOOP+1*, LOOP+2, LOOP+3
, EXIT+1!
QAMDD(0 ASKDD+1*, LOOP+1, LOOP+2, LOOP+3*
QAMEDT7 ASKELEM+3*, DONE1+5*, EXIT+1!
QAMELEM EXIT+1!
QAMFILE EXIT+1!
QAMFLD ASKDD+4*, ASKFLD+1*, FLD, FLD+1, FLD+2, FLD+3, LOOP+1*, LOOP+2, EXIT+1!
QAMHDR1 EXIT+1!
QAMHDR2 EXIT+1!
QAMPARNT DONE1+1*, DONE1+2, EXIT+1!
QAMPARNT(0 DONE1+1*, DONE1+2
QAMPATH FLD+3!, EXIT+1!
QAMPATH( DONE1+3
QAMPATH(100 LOOP+1*, DONE1+2
QAMQUIT ASKELEM+3*, DONE1+5*, EXIT+1!
QAMUNDL ASKELEM+3!*, DONE1+5!*, EXIT+1!
TO EXIT+1!
X ASKDD+1*, ASKDD+4*, ASKFLD+1*, EXIT+1!
Y ASKELEM+1, ASKELEM+2, EXIT+1!
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