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

Package: Consult Request Tracking

Routine: GMRCP5C


Information

GMRCP5C ;SLC/DCM,RJS - Print Consult form 513 (Assemble Segments And Print) ;4/30/98 09:41

Source Information

Source file <GMRCP5C.m>

Entry Points

Name Comments DBIA/ICR reference
ASSMBL(PAGELEN,PAGEWID) ;
FORMAT(SUB,PAGELEN,PAGEWID,OFFSET) ;
NEWSUB(ZONE,SUB,NDX,PAGEWID) ;
ADDFTR(SUB,NDX,PAGEWID) ;
NEWPAGE(SUB,NDX) ;
CHKPAGE(SUB,NDX,PAGELEN,OFFSET) ;
SIZE(SUB,NDX) ;
ROOM(LEN) ;
MERGE(SUB,NDX,ZONE) ;
BLDPAGE(ZONE,TEXT,PAGEWID,RUNTIME,SUB,NDX) ;
ADDLN(ZONE,TEXT,RUNTIME) ;
OUTPUT(GMRCPG) ;
CLRZONE(ZONE) ;
PRINT(PAGELEN,PAGEWID) ; Print the Consult
PAUSE(PF,PG) ; Pause After Each Screen for CRT's
CRT() ; IS THE PRINT DEVICE A CRT ?

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," Press: "
  • Line Location: PAUSE+5
Function Call: WRITE
  • Prompt: "<Enter> To Quit (^) To Quit : "
  • Line Location: PAUSE+7
Function Call: WRITE
  • Prompt: "<Enter> For Next Page (^) To Quit : "
  • Line Location: PAUSE+8
Function Call: WRITE
  • Prompt: "<Enter> To Quit (-) For Previous Page (^) To Quit : "
  • Line Location: PAUSE+9
Function Call: WRITE
  • Prompt: "<Enter> For Next Page (-) For Previous Page (^) To Quit : "
  • Line Location: PAUSE+10
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PAUSE+12
Function Call: WRITE
  • Prompt: " (timeout)"
  • Line Location: PAUSE+12
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+13
Info |  Source |  Entry Points |  Interaction Calls