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

Package: Order Entry Results Reporting

Routine: ORULG


Information

ORULG ; SLC/KER/JVS - COLUMNAR GLOBAL LISTING BY PIECE ;; 08-19-92

Source Information

Source file <ORULG.m>

Entry Points

Name Comments DBIA/ICR reference
EN(ROOT,PIE,HDR,COL) ; Entry Point - device selection not allowed
ENP(ROOT,PIE,HDR,COL) ; Entry Point - device selection allowed
INIT ;
VAL ;
OPEN ;
NY
RD
START ;
STORE ;
CNTRL ;
END ;
DISP ;
ELE ;
CONT ;
UPPER(STRING) ;
CENTER(STRING) ;
PGFMT(PGNO) ;
MDY() ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: INIT+4
Function Call: WRITE
  • Prompt: !!,"Global ",ROOT," not found",!!
  • Line Location: VAL+2
Function Call: WRITE
  • Prompt: !,"Not a valid Fileman Global"
  • Line Location: VAL+7
Function Call: WRITE
  • Prompt: !,$C(7),"Terminated. No device specified."
  • Line Location: OPEN+2
Function Call: WRITE
  • Prompt: !!,"Queueing report"
  • Line Location: OPEN+5
Function Call: WRITE
  • Prompt: !,"Enter 'N' or return for NO, 'Y' for YES"
  • Line Location: NY+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: RD+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !,MDY,?(IOM-($L("PAGE: "_FMTPG))),"PAGE: ",FMTPG,!
  • Line Location: CNTRL+2
Function Call: WRITE
  • Prompt: "-"
  • Line Location: CNTRL+3
Function Call: WRITE
  • Prompt: !
  • Condition for execution: CC=IOM
  • Line Location: CNTRL+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CONT+1
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue ""^"" to Quit, ""-"" for previous page "
  • Line Location: CONT+2
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue ""^"" to Quit "
  • Line Location: CONT+3
Function Call: READ
  • Variable: CONT
  • Timeout: DTIME
  • Line Location: CONT+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CONT+5
Function Call: WRITE
  • Prompt: !
  • Condition for execution: STRING=""
  • Line Location: CENTER+1
Function Call: WRITE
  • Prompt: !
  • Condition for execution: IOST["P-"
  • Line Location: CENTER+1
Function Call: WRITE
  • Prompt: ?($S($L(STRING)#2=0:(IOM\2)-($L(STRING)\2),1:((IOM\2)-1)-($L(STRING)\2))),STRING,!
  • Line Location: CENTER+1
Info |  Source |  Entry Points |  Interaction Calls