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

Package: Occurrence Screen

Routine: QAOSCNV3


Information

QAOSCNV3 ;HISC/DAD-ASSOCIATED ADMISSION, COMMENTS FIELDS & E XREF ;7/26/93 12:18

Source Information

Source file <QAOSCNV3.m>

Entry Points

Name Comments DBIA/ICR reference
EXIT ;
AADM ; ASSOCIATED ADMISSION & 'E' XREF
REVR ; REVIEWER MULTIPLE
CMTE ; COMMITTEE MULTIPLE
SPC(X) ; REMOVE LEADING AND TRAILING SPACES

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Load ASSOCIATED ADMISSION field,"
  • Line Location: QAOSCNV3+3
Function Call: WRITE
  • Prompt: !,"convert COMMENTS to word processing"
  • Line Location: QAOSCNV3+4
Function Call: WRITE
  • Prompt: !,"and, index the 'E' cross reference"
  • Line Location: QAOSCNV3+5
Function Call: WRITE
  • Prompt: !,"-----------------------------------",!
  • Line Location: QAOSCNV3+6
Function Call: WRITE
  • Prompt: !!?5,"The associated admission dates will now be calculated for all"
  • Line Location: QAOSCNV3+7
Function Call: WRITE
  • Prompt: !?5,"Occurrence Screen records. The data is saved in the ASSOCIATED"
  • Line Location: QAOSCNV3+8
Function Call: WRITE
  • Prompt: !?5,"ADMISSION field (741,.02). Depending on the number of"
  • Line Location: QAOSCNV3+9
Function Call: WRITE
  • Prompt: !?5,"occurrences, this could take quite a while."
  • Line Location: QAOSCNV3+10
Function Call: WRITE
  • Prompt: !!?5,"Also, the data in the COMMENTS fields in the REVIEWER and"
  • Line Location: QAOSCNV3+11
Function Call: WRITE
  • Prompt: !?5,"COMMITTEE multiples (741.01,7 & 741.017,3) is copied to the"
  • Line Location: QAOSCNV3+12
Function Call: WRITE
  • Prompt: !?5,"new word processing COMMENTS fields (741.01,10 & 741.017,10)."
  • Line Location: QAOSCNV3+13
Function Call: WRITE
  • Prompt: !?5,"The old free text comments are deleted as they are converted."
  • Line Location: QAOSCNV3+14
Function Call: WRITE
  • Prompt: !?5,"The 'E' cross reference on the OCCURRENCE IDENTIFIER field"
  • Line Location: QAOSCNV3+15
Function Call: WRITE
  • Prompt: !?5,"(#741,2) will also be created."
  • Line Location: QAOSCNV3+16
Function Call: WRITE
  • Prompt: !!,"Working"
  • Line Location: QAOSCNV3+17

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^QA(741 - [#741] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call