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

Package: Scheduling

Routine: SCMCCV5


Information

SCMCCV5 ;ALB/JAM;Allow edits of invalid .03 field in 404.52;12/1/99@1055

Source Information

Source file <SCMCCV5.m>

Entry Points

Name Comments DBIA/ICR reference
EDIT ;Entry point for cnahes to .03 field in file 404.52
PROCESS ;Get list of invalid .03 field in file 404.52, select and then edit
REP
GETIEN() ;Select IEN from FILE 404.52
LSTIEN ;Display a list of .03 entries stored in ^TMP("PCMM PRACTITIONER",$J
HDR(FL) ;Print header for list of invalid entries in file 404.52
DSP(DIEN) ;Display record from file 404.52 for DIEN entry
TPHIS(SCIEN) ;Display complete position history for team position
LST() ;Returns list of invalid entries from file #404.52 for field .03

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "No Entries found"
  • Line Location: PROCESS+4
Function Call: WRITE
  • Prompt: !,?20,"To Edit, enter an IEN number from the displayed list"
  • Line Location: LSTIEN+9
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,?23,$S(FL:"LIST OF",1:"EDITING")_" INVALID PRACTITIONER ENTRY",!!
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?20,"IEN",?27,"Effective Date",?44,"Team",?68,"Status",!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?20,"---",?27,"--------------",?44,"----",?68,"------",!
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: ?20,DIEN,?27,SCDT,?44,$E(SCTP,1,20),?68,SCSTA,!
  • Line Location: DSP+6
Function Call: WRITE
  • Prompt: !?25,"TEAM POSITION HISTORY"
  • Line Location: TPHIS+6
Function Call: WRITE
  • Prompt: !?10,"Effective Date",?30,"Staff",?54,"Status",!
  • Line Location: TPHIS+7
Function Call: WRITE
  • Prompt: ?10,$P(SCY,U,4),?30,$E(SCNAM,1,20),?54,$P(SCY,U,2)
  • Line Location: TPHIS+12
Function Call: WRITE
  • Prompt: " ***"
  • Condition for execution: SCNAM=""
  • Line Location: TPHIS+13
Function Call: WRITE
  • Prompt: !
  • Line Location: TPHIS+13

FileMan Files Accessed Via FileMan Db Call

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