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

Package: Survey Generator

Routine: QAPQCOPY


Information

QAPQCOPY ;557/THM-COPY SURVEY QUESTIONS [ 06/19/95 2:26 PM ]

Source Information

Source file <QAPQCOPY.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 4 %XY^%RCR  (FILE,YN)^DICN  ^DIE  IX^DIK  
Survey Generator 1 HELPLKE^QAPUTIL1  

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

Package Total Caller Graph
Survey Generator 2 QAPADD1  QAPEDIT1  

Entry Points

Name Comments DBIA/ICR reference
EN
START
SEL
QAPQN
QAPQN1
EDIT
EXIT

External References

Name Field # of Occurrence
%XY^%RCR QAPQN1+2
FILE^DICN QAPQN1
YN^DICN SEL
^DIE QAPQN1+2, EDIT
IX^DIK QAPQN1+4
HELPLKE^QAPUTIL1 START+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " Copy a question "
  • Line Location: EN+0
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: EN+2
Function Call: READ
  • Variable: DQUES
  • Timeout: DTIME
  • Line Location: START+0
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: START+1
Function Call: WRITE
  • Prompt: X,!
  • Line Location: START+3
Function Call: WRITE
  • Prompt: *7,!!,"There is no question number ",DQUES,!
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !!,*7,"Your entry must be numeric and also an existing question number. "
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: START+6
Function Call: WRITE
  • Prompt: "Is this correct question"
  • Line Location: SEL+0
Function Call: WRITE
  • Prompt: *7,!!,"Enter Y to proceed, N to go back and reselect",!,"""^"" to exit",!!
  • Line Location: SEL+1
Function Call: READ
  • Variable: QAPQN
  • Timeout: DTIME
  • Line Location: QAPQN+1
Function Call: WRITE
  • Prompt: !!,*7,"Entry must be 1-3 numbers (1-999) and must be unique. Enter ^ to exit.",!
  • Line Location: QAPQN+2
Function Call: WRITE
  • Prompt: !!,*7,"You must enter a different question number.",!,"That one has been used."
  • Line Location: QAPQN+3
Function Call: WRITE
  • Prompt: " Copied "
  • Line Location: QAPQN1+4
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: EDIT+0
Function Call: WRITE
  • Prompt: *7,!!,"Now you may edit the question header and text.",!,"The rest of the question definition will remain",!,"the same unless you change it specifically.",!!
  • Line Location: EDIT+0
Routine Call
  • DIE
  • Line Location:
    • QAPQN1+2
    • EDIT

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^QA(748.25 - [#748.25] EN+2, START+3, QAPQN+3, QAPQN1QAPQN1+3*

Label References

Name Line Occurrences
EXIT EN+2, STARTSTART+2, SEL
QAPQN QAPQN+2, QAPQN+3
QAPQN1 QAPQN
SEL SEL+1
START START+4, START+5, SEL

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % SEL*
>> %X QAPQN1+1*
>> %Y SEL+1, QAPQN1+1*
>> ANS EN+2*
>> BLDOFF QAPQN+1
>> BLDON QAPQN+1
>> CLEOP START+3
>> CLEOP1 SEL+1, QAPQN+1
>> DA START+3*, START+4, QAPQN1+2*, QAPQN1+3, QAPQN1+4*, EDIT*
>> DA(1 QAPQN1*, QAPQN1+2*, QAPQN1+3
DD QAPQN1!
DIC EN+1!, QAPQN1*, QAPQN1+2*, EDIT*
DIC(0 QAPQN1*
DIE EN+1!, QAPQN1*, QAPQN1+2*, EDIT*
>> DIK QAPQN1+4*
DO QAPQN1!
>> DQUES START*, START+1*, START+2, START+3, START+4, START+5
DR EN+1!, QAPQN1+2~*, EDIT*
DTIME EN+2, STARTQAPQN+1
>> I START+3*
IOF STARTSTART+1, EDIT
>> NUM QAPQN
>> QAPBAR STARTSTART+1, EDIT
QAPHDR EN+3~, START*
>> QAPOUT START*, START+2*, QAPQN+3
>> QAPQN START+1, START+2, QAPQN*, QAPQN+1*, QAPQN+2, QAPQN+3, QAPQN1+2
>> QLINE START+6*, QAPQN+1*
>> STOP EN+2*, START*, QAPQN+1*
>> SURVEY EN+2, START+3, QAPQN+3, QAPQN1QAPQN1+2, QAPQN1+4
U START+2, START+3, QAPQN+2, QAPQN1QAPQN1+3
X EN+1!, START+3*, QAPQN1*
>> XDA QAPQN1+1*, QAPQN1+2, EDIT
Y EN+1!, QAPQN1+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 |  Local Variables  | All