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

Package: Survey Generator

Routine: QAPCHX


Information

QAPCHX ;557/THM-INPUT OF ANSWERS [ 06/22/95 8:14 AM ]

Source Information

Source file <QAPCHX.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
VA FileMan 2 FILE^DICN  ^DIE  

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

Package Total Caller Graph
Survey Generator 5 QAPCHX1  QAPDEMS1  QAPPT1  QAPSCRN1  QAPSTAT1  

Entry Points

Name Comments DBIA/ICR reference
USINPT ;multiple choice
A1
A1A
A2
QAYN ;yes/no/na
QAYNA
B2
QATF ;true/false/na
QATFA
C2
WP ;wp response
WP1
FILE
LIKRTLAB ;print Likert labels and gradient

External References

Name Field # of Occurrence
FILE^DICN A2, B2, C2, WP+3
^DIE WP1+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: USINPT+7
Function Call: WRITE
  • Prompt: ?40,X,". ",ANS(X),!
  • Condition for execution: $D(ANS(X))
  • Line Location: USINPT+10
Function Call: WRITE
  • Prompt: !
  • Line Location: USINPT+11
Function Call: WRITE
  • Prompt: !!
  • Line Location: A1+0
Function Call: WRITE
  • Prompt: ?10,"Enter the ",INSERT," of your response: "
  • Line Location: A1A+0
Function Call: READ
  • Variable: ANSW
  • Timeout: DTIME
  • Line Location: A1A+1
Function Call: WRITE
  • Prompt: *7,!!,"You must enter a ",$S(ANSTYPE="a":"letter",1:"number")," from the selection given. "
  • Line Location: A1A+4
Function Call: WRITE
  • Prompt: !
  • Line Location: A1A+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: QAYN+1
Function Call: READ
  • Variable: ANSW
  • Timeout: DTIME
  • Line Location: QAYNA+0
Function Call: WRITE
  • Prompt: *7
  • Line Location: QAYNA+3
Function Call: WRITE
  • Prompt: !!,"Enter Y for Yes or N for No or NA for not applicable. "
  • Line Location: QAYNA+3
Function Call: WRITE
  • Prompt: !!,"Enter Y for Yes or N for No or NA for not applicable. "
  • Line Location: QAYNA+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: QATF+1
Function Call: WRITE
  • Prompt: ?10,"True, False, or Not applicable (T/F/NA): "
  • Line Location: QATFA+0
Function Call: READ
  • Variable: ANSW
  • Timeout: DTIME
  • Line Location: QATFA+1
Function Call: WRITE
  • Prompt: *7,!!,"Enter T for True, F for False, or NA for not applicable."
  • Line Location: QATFA+4
Function Call: WRITE
  • Prompt: !
  • Line Location: QATFA+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: WP+4
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: WP1+0
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: WP1+1
Function Call: WRITE
  • Prompt: " ^ will skip entering any response to this question",!," RETURN will allow you to enter a response",!," Q will allow you to abort or suspend",!!,"Press RETURN "
  • Line Location: WP1+1
Function Call: WRITE
  • Prompt: *7,!!,"Invalid answer - must be Q, ^, or RETURN"
  • Line Location: WP1+4
Function Call: WRITE
  • Prompt: !
  • Line Location: WP1+4
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: WP1+5
Function Call: WRITE
  • Prompt: !!,?(IOM-($L(X))\2),X,!!
  • Line Location: LIKRTLAB+7
Routine Call
  • DIE
  • Line Location:
    • WP1+6

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^QA(748.25 - [#748.25] USINPT+2, USINPT+4, LIKRTLAB+1
^QA(748.3 - [#748.3] WP+2, WP+3, FILE*
^VA(200 - [#200] WP+1

Label References

Name Line Occurrences
A1A A1A+4
A2 A1A+3
B2 QAYNA+2
C2 QATFA+3
FILE A1, QAYN+1, QATF+1, WP+1
LIKRTLAB USINPT+6
QATFA QATFA+4
QAYNA QAYNA+3
WP1 WP1+1, WP1+4

Naked Globals

Name Field # of Occurrence
^(0 USINPT+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANS USINPT+1!, USINPT+6!, A2+1!, WP1*, WP1+1*, WP1+2, WP1+3*, WP1+4
ANS( USINPT+4*, USINPT+8, USINPT+10, A1A+4
ANSTYPE USINPT+2*, USINPT+3, USINPT+4, USINPT+6, USINPT+7, USINPT+10, A1A+2, A1A+4, A2+1!
ANSW A1A+1*, A1A+2*, A1A+3*, A1A+4, A2, A2+1!, QAYNA*, QAYNA+1*, QAYNA+2*, QAYNA+3
, B2, B2+1!, QATFA+1*, QATFA+2*, QATFA+3*, QATFA+4, C2, C2+1!
>> CLEOP1 A1A+4, QAYNA+3, QATFA+4, WP1+1, WP1+4
>> CNTA USINPT+3*, USINPT+4*, USINPT+8*, USINPT+9*, USINPT+10
DA WP+2*, WP+3*, FILE!*
DA(1 FILE+1*
DD A2!, B2!, C2!, WP+3!
DIC A2*, A2+1!, B2*, B2+1!, C2*, C2+1!, WP+2*, WP+3*, WP1+6*, WP1+7!
, FILE!
DIC("DR" A2*, B2*, C2*
DIC(0 A2*, B2*, C2*, WP+3*, WP1+6*
DIE A2*, A2+1!, B2*, B2+1!, C2*, C2+1!, WP+2*, WP+3*, WP1+6*, WP1+7!
, FILE!
DO A2!, B2!, C2!, WP+3!
>> DR WP1+6*
DTIME A1A+1, QAYNA, QATFA+1, WP1, WP1+1
DUZ WP+1
DX A2+1!
DY A2+1!
>> FILEDA WP+2, WP+3, FILE, FILE+1
GRADIENT USINPT+2*, A2+1!
INSERT USINPT+3*, A1A, A2+1!
IOF WP1+5
IOM LIKRTLAB+7
LDIRECT LIKRTLAB+2*, LIKRTLAB+3*, LIKRTLAB+5, LIKRTLAB+8!
>> LFTLBL LIKRTLAB+2*, LIKRTLAB+4*, LIKRTLAB+5
LKDTA LIKRTLAB+1*, LIKRTLAB+2, LIKRTLAB+8!
>> MSSG0 A1A+3, QAYNA+2, QATFA+3
QANS USINPT+4*, USINPT+6!, A2+1!
QAPEDTR WP+1*, WP1+5, WP1+7!
>> QAPOUT A1A+1*, QAYNA*, QATFA+1*, WP1*, WP1+1*, WP1+3*
QLINE A1*, A2+1!, QAYN+1*, QATF+1*, WP+4*
>> QUES USINPT+2, USINPT+4, A2, B2, C2, WP+2, WP+3, WP1+6, LIKRTLAB+1
>> REM USINPT+9*, USINPT+11
>> RGTLBL LIKRTLAB+2*, LIKRTLAB+4*, LIKRTLAB+6
>> SURVEY USINPT+2, USINPT+4, LIKRTLAB+1
U USINPT+2, USINPT+4, A1A+1, QAYNA, QATFA+1, WP+1, WP1+2, LIKRTLAB+2
X USINPT+8*, USINPT+10*, A2*, A2+1!, B2*, B2+1!, C2*, C2+1!, WP+3*, WP1+6*
, WP1+7!, FILE!, LIKRTLAB+5*, LIKRTLAB+6*, LIKRTLAB+7, LIKRTLAB+8!
XCOL A2+1!
>> XX USINPT+10*
Y USINPT+8*, WP+3, LIKRTLAB+8!
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