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

Package: Utilization Management Rollup

Routine: IBQLPOST


Information

IBQLPOST ;LEB/MRY - CREATE IBQ ROLLUP MAILGROUP POST INT ;5-JUL-95

Source Information

Source file <IBQLPOST.m>

Entry Points

Name Comments DBIA/ICR reference
INDEX ; -- Index field #1.17 ACUTE CARE DISCHARGE DATE of File 356.1.
MAILGRP ; -- Stuff in new mail group
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"<<< Post init completed!"
  • Line Location: IBQLPOST+8
Function Call: WRITE
  • Prompt: !!,"Indexing field #1.17 ACUTE CARE DISCHARGE DATE of File #356.1."
  • Line Location: INDEX+1
Function Call: WRITE
  • Prompt: !,"working...."
  • Line Location: INDEX+2
Function Call: WRITE
  • Prompt: !,"<<< Re-indexing complete!"
  • Line Location: INDEX+4
Function Call: WRITE
  • Prompt: !!,"Creating new Mailgroup IBQ ROLLUP"
  • Line Location: MAILGRP+1
Function Call: WRITE
  • Prompt: !!,*7,"<<< Please add members to IBQ ROLLUP after install! >>>"
  • Line Location: MAILGRP+2
Function Call: WRITE
  • Prompt: !!,"<<< Adding mail group "_A,!
  • Line Location: MAILGRP+10

FileMan Files Accessed Via FileMan Db Call

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