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

Package: Scheduling

Routine: SDAMLD


Information

SDAMLD ;ALB/CAW - Ambulartory Status Update Log Utilities ; 3/6/92

Source Information

Source file <SDAMLD.m>

Entry Points

Name Comments DBIA/ICR reference
EN
A ;
1 ;;Update Appointment Status
2 ;;View Log Date (single entry)
SELECT
SHOW
Q2
3 ;;View Log Date (date range)
Q3
4 ;;Purge log entries (data will be kept for current+1 FYs)
EN4 ;
Q4
LAST() ;
; input - no input (user selection of last)
; output - the latest date, beginning day or -100 days
BULL ; Bulletin for purge
SETLN ; Setting TMP global for bulletin
QUE() ; -- que job
; return: did job que [ 1|yes 0|no ]

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: A+1
Function Call: WRITE
  • Prompt: !!,"Select APPOINTMENT DATE: "_$S(SDEF]"":SDEF_"// ",1:"")
  • Line Location: SELECT+0
Function Call: WRITE
  • Prompt: $E("LAST",$L(SDWHEN)+1,4)
  • Line Location: SELECT+4
Function Call: WRITE
  • Prompt: !,*7,"o update has not completed in the last 100 days"
  • Line Location: SELECT+4
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $D(IOF)
  • Line Location: SHOW+0
Function Call: WRITE
  • Prompt: "Appointment Status Log"
  • Line Location: SHOW+0
Function Call: WRITE
  • Prompt: !,"This option will not purge dates beyond "
  • Line Location: 4+4
Function Call: WRITE
  • Prompt: "."
  • Line Location: 4+4

FileMan Files Accessed Via FileMan Db Call

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