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
Print Page as PDF
Routine: DGGECSA

Package: Registration

Routine: DGGECSA


Information

DGGECSA ;ALB/RMO - Auto Generate Code Sheets for MAS AMIS(s) ; 13 AUG 90 8:52 am

Source Information

Source file <DGGECSA.m>

Entry Points

Name Comments DBIA/ICR reference
ASK ;Prompt user to generate AMIS code sheets
; Input -- None Required
; Output -- %=1 user entered 'YES'
; %=2 user entered 'NO'
; %<0 user timeout or entered an '^'
Q
QUE ;Queue generation of AMIS code sheet to default MAS code sheet printer
; Input -- DGSEG Segment Number ie, 334
; DGDIV Medical Ctr Div File (#40.8) IFN ie, 1
; DGMYR Month/Year in internal date format ie, 2900200
; Output -- Task is Queued to Generate a Code Sheet
START ;Auto generation of AMIS code sheet

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?3,"Enter 'YES' to generate code sheets, or 'NO' not to."
  • Line Location: ASK+6
Function Call: WRITE
  • Prompt: !!?3,"NOTE: AMIS Code Sheets will be queued to print on ",DGCODPRT,"."
  • Line Location: ASK+7
Info |  Source |  Entry Points |  Interaction Calls