/* Padrao Intermec ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±± ±±ÉÍÍÍÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍ»±± ±±ºPrograma ³IMG03 ºAutor ³Sandro Valex º Data ³ 19/06/01 º±± ±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍ͹±± ±±ºDesc. ³Ponto de entrada referente a imagem de dispositivo de movi- º±± ±±º ³mentacao.(carrinho) º±± ±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ͹±± ±±ºUso ³ AP5 º±± ±±ÈÍÍÍÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ±± ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±± ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß */ User Function Img03 // imagem de etiqueta de dispositivo de movimentacao Local cCodigo Local nID := paramixb[1] IF nID # NIL cCodigo := nID ElseIf Empty(CB2->CB2_IDETIQ) IF UsaCB0("03") cCodigo := CBGrvEti('03',{CB2->CB2_DISPID}) RecLock("CB2",.F.) CB2->CB2_IDETIQ := cCodigo MsUnlock() Else cCodigo := CB2->CB2_DISPID EndIf Else IF UsaCB0("03") cCodigo := CB2->CB2_IDETIQ Else cCodigo := CB2->CB2_DISPID EndIf Endif cCodigo := Alltrim(cCodigo) //MSCBLOADGRF("SIGA.BMP") MSCBBEGIN(1,3) MSCBBOX(01,02,34,76,1) MSCBLineV(30,30,76,1) MSCBLineV(23,02,76,1) MSCBLineV(15,02,76,1) MSCBLineH(23,30,34,1) // MSCBGRAFIC(26,2,"SIGA",.T.) MSCBSAY(32,33,'DISP.MOVIMENT',"R","2","01,01") MSCBSAY(29,33,"CODIGO","R","2","01,01") MSCBSAY(26,33, CB2->CB2_DISPID, "R", "2", "01,01") MSCBSAY(22,05,"DESCRICAO","R","2","01,01") MSCBSAY(19,05,Tabela('J0',CB2->CB2_TIPO),"R", "2", "01,01") MSCBSAYBAR(12,22,cCodigo,"R","MB07",8.36,.F.,.T.,.F.,,2,2,.F.,.F.,"1",.T.) MSCBInfoEti("Disp.Moviment.","30X100") MSCBEND() Return .F.