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 |  Local Variables  | All
Print Page as PDF
Routine: QAPSCRN1

Package: Survey Generator

Routine: QAPSCRN1


Information

QAPSCRN1 ;557/THM-USER INPUT FOR SURVEYS, PART 2 [ 07/24/96 2:37 PM ]

Source Information

Source file <QAPSCRN1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Survey Generator 4 (QATF,QAYN,USINPT,WP)^QAPCHX  ^QAPDEM1  ^QAPEDI1  EXIT^QAPUTIL  
VA FileMan 3 YN^DICN  ^DIE  ^DIK  
Kernel 1 ^%ZISC  

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

Package Total Caller Graph
Survey Generator 3 QAPDEM1  QAPEDI1  QAPSCRN  

Entry Points

Name Comments DBIA/ICR reference
EN1
KILL
EDITA
COMPL
QUIT
OUT3
ABORT
SUSPND
ABORT0
DEL
ABORT1

External References

Name Field # of Occurrence
^%ZISC EDITA+2
YN^DICN EDITA, COMPL, ABORT+1, ABORT0, ABORT0+2
^DIE EN1, COMPL+4, SUSPND+1
^DIK EN1+3, KILL, DEL
QATF^QAPCHX OUT3+4
QAYN^QAPCHX OUT3+4
USINPT^QAPCHX OUT3+4
WP^QAPCHX OUT3+4
^QAPDEM1 EN1+2
^QAPEDI1 EDITA+2
EXIT^QAPUTIL QUIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Demographics file error - response deleted !",!!
  • Line Location: EN1+3
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: KILL+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: KILL+2
Function Call: WRITE
  • Prompt: !!,"Do you want to edit your answers"
  • Line Location: EDITA+0
Function Call: WRITE
  • Prompt: !!,"Enter Y to edit the answers or N to continue",!," and complete the survey."
  • Line Location: EDITA+1
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: EDITA+2
Function Call: WRITE
  • Prompt: !,BLDON,"(Type ^ to edit answers)",BLDOFF,!!,"Is it Ok to register this survey as complete"
  • Line Location: COMPL+0
Function Call: WRITE
  • Prompt: !!,"Enter ^ edit your responses",!?6,"N to suspend/abort this response",!,?6,"Y to continue and register your survey as complete.",!!
  • Line Location: COMPL+1
Function Call: WRITE
  • Prompt: "If you declare this survey completed, you will not be",!,"allowed to make any further changes to it.",!
  • Line Location: COMPL+2
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: COMPL+3
Function Call: WRITE
  • Prompt: !!,"Survey completed. "
  • Line Location: COMPL+4
Function Call: WRITE
  • Prompt: X,!
  • Line Location: OUT3+0
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: OUT3+1
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: OUT3+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: OUT3+1
Function Call: WRITE
  • Prompt: "Question ",DISP,":",!!
  • Line Location: OUT3+2
Function Call: WRITE
  • Prompt: X,!
  • Line Location: OUT3+3
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: OUT3+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: OUT3+5
Function Call: WRITE
  • Prompt: !!,*7,"Do you wish to suspend this survey and continue later"
  • Line Location: ABORT+1
Function Call: WRITE
  • Prompt: !!,"Enter Y to suspend this survey",!?6,"^ to resume answer entry",!?6,"N to possibly abort this entry"
  • Line Location: ABORT+2
Function Call: WRITE
  • Prompt: !!,"If you suspend this survey you may finish it later or",!,"make any changes you wish, then complete the rest of it.",!!
  • Line Location: ABORT+3
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: ABORT+4
Function Call: WRITE
  • Prompt: "If you abort your entry, your answers will be erased.",!,"A ^ will allow you to resume answer entry.",!!,"Press RETURN "
  • Line Location: ABORT+4
Function Call: WRITE
  • Prompt: !!,"Timed out.. Survey suspended."
  • Condition for execution: $D(DTOUT)
  • Line Location: SUSPND+1
Function Call: WRITE
  • Prompt: !!,"Ok, see you later."
  • Line Location: SUSPND+1
Function Call: WRITE
  • Prompt: !!,"Do you want to abort the survey entry"
  • Line Location: ABORT0+0
Function Call: WRITE
  • Prompt: !!,"Enter Y to abort or N to continue. ",!
  • Line Location: ABORT0+1
Function Call: WRITE
  • Prompt: !!,*7,"If you abort now, all data entered so far will be erased.",!,"You must complete the survey for it to be counted.",!!,"Do you REALLY want to abort this survey"
  • Line Location: ABORT0+2
Function Call: WRITE
  • Prompt: !!,"Enter Y to abort or N to continue. "
  • Line Location: ABORT0+3
Function Call: WRITE
  • Prompt: *7,!!,">> Survey responses deleted! << "
  • Line Location: DEL+0
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: ABORT1+0
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: ABORT1+1
Routine Call
  • DIE
  • Line Location:
    • EN1
    • COMPL+4
    • SUSPND+1

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] KILL+4, OUT3, OUT3+1, OUT3+3, OUT3+4
^QA(748.3 - [#748.3] EN1+2

Label References

Name Line Occurrences
ABORT KILL+5, EDITA, COMPL, COMPL+3, COMPL+6, ABORT+4, ABORT1
ABORT0 ABORT0+1, ABORT0+3
ABORT1 ABORT+5, SUSPND+2, ABORT0+5
COMPL COMPL+3, COMPL+6
EDITA EDITA+1, COMPL+5
OUT3 KILL+5
QUIT EN1+2, EN1+3, KILL, KILL+6, EDITA, EDITA+2, COMPL, COMPL+3, COMPL+4
SUSPND KILL+1, OUT3+1, ABORT+1, ABORT+4, ABORT0, ABORT0+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EDITA*, EDITA+2, COMPL!*, COMPL+4, COMPL+5, COMPL+6, ABORT!, ABORT+1*, ABORT+5, SUSPND+1
, SUSPND+2, ABORT0!*, ABORT0+2*, ABORT0+5, DEL
%Y EDITA+1, COMPL+1, COMPL+2, COMPL+3, ABORT+2, ABORT+3, ABORT+4, ABORT0!, ABORT0+1, ABORT0+3
>> ANS COMPL+3*, OUT3+1*, ABORT+4*, ABORT1*
>> BLDOFF COMPL
>> BLDON COMPL
>> CLEOP EDITA+2, ABORT+1, ABORT0, ABORT0+3, ABORT1, ABORT1+1
>> CLEOP1 EDITA, COMPL
>> CQUES KILL+3*, KILL+5*, ABORT*, SUSPND*, SUSPND+1
DA EN1*, EN1+3*, KILL*, KILL+3!, COMPL+4*, SUSPND+1*, DEL*
>> DIC EN1*, COMPL+4*, SUSPND+1*
>> DIE EN1*, COMPL+4*, SUSPND+1*
>> DIK EN1+3*, KILL*, DEL*
>> DISP KILL+4*, KILL+5, OUT3+2
>> DR EN1*, COMPL+4*, SUSPND+1*
DSTOP EN1+1!, KILL, EDITA+2
DTIME COMPL+3, OUT3+1, ABORT+4, ABORT1
DTOUT EN1+1!, EDITA, COMPL, ABORT!, ABORT+1, ABORT+4*, SUSPND+1, SUSPND+2, ABORT0!, ABORT0+4
DUOUT EN1+1!, ABORT!, ABORT0!, ABORT0+2
EDIT EN1+1!, EN1+2*!, EN1+3, KILL
>> FILEDA EN1*, EN1+2, EN1+3, KILL*, COMPL+4, SUSPND+1, DEL
>> FSTOP EN1+3, KILL+1
>> I OUT3*, OUT3+3*
>> IFN EN1, KILL
IOF KILL+2, EDITA+2, OUT3+1, OUT3+5, ABORT1+1
>> LQUES EN1+2, ABORT1
NEWREC EN1!
>> QAPBAR KILL+2, EDITA+2, OUT3+1, OUT3+5, ABORT1+1
>> QAPCNT KILL+3*, KILL+5*, ABORT*, SUSPND*, SUSPND+1
>> QAPHDR KILL+2*
>> QAPOUT KILL+3*, KILL+4, KILL+5, COMPL, COMPL+6*, OUT3+4, ABORT+1*, SUSPND+1*, ABORT0+2*, ABORT1*
>> QAPX OUT3+4*
>> QLINE KILL+8*, COMPL*
>> QUES KILL+4*, OUT3, OUT3+1, OUT3+3, OUT3+4, ABORT1*
RESUME KILL+5!, ABORT+5*, SUSPND+2*, ABORT0+5*
STOP EN1+1!, EN1+2, KILL+1, KILL+3!, KILL+4, KILL+6, EDITA, EDITA+2, COMPL, COMPL+3
, COMPL+6, ABORT!, SUSPND+1*, ABORT0!, DEL*, ABORT1
>> SURVEY KILL+4, OUT3, OUT3+1, OUT3+3, OUT3+4
>> SVST EN1+2
>> TITLE KILL+2
U OUT3, OUT3+3, OUT3+4
WPNEWREC KILL+4!, QUIT!
X OUT3*, OUT3+3*, OUT3+4!
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 |  Local Variables  | All